      *>
       METHOD-ID. GET PROPERTY DATA-NAME.
       DATA DIVISION.
       LINKAGE SECTION.
       01 LS1 DATA-DESCRIPTION.
       PROCEDURE DIVISION RETURNING LS1.
           SET LS1 TO DATA-NAME 
           EXIT METHOD.
       END METHOD.
