Assign anyr eference type of data to specific attributes

"To assign any data type reference  to specific val

DATA lt_tarikh TYPE zwdselopt.

DATA ls_tarikh TYPE selopt.

FIELD-SYMBOLS:    TYPE INDEX TABLE,

                    TYPE              any,

                  TYPE              char1,

                TYPE              char2,

                   TYPE              any,

                  TYPE              any.

DATA lt_datum TYPE REF TO data.

ASSIGN lt_datum->* TO .

IF IS ASSIGNED.

  LOOP AT ASSIGNING .

    ASSIGN COMPONENT 'SIGN' OF STRUCTURE TO .

    ASSIGN COMPONENT 'OPTION' OF STRUCTURE TO .

    ASSIGN COMPONENT 'LOW' OF STRUCTURE TO .

    ASSIGN COMPONENT 'HIGH' OF STRUCTURE TO .

    ls_tarikh-sign = .

    ls_tarikh-option = .

    ls_tarikh-low = .

    ls_tarikh-high = .

    APPEND ls_tarikh TO lt_tarikh.

  ENDLOOP.

ENDIF.