Pages

Friday, June 12, 2015

DYnamic structure and table ceration


*** Test - TBDeleted
datals_segstruc TYPE REF TO cl_abap_structdescr,
      r_data_str TYPE REF TO data.

FIELD-SYMBOLS<fs> TYPE ANY.

ls_segstruc ?= cl_abap_typedescr=>DESCRIBE_BY_NAME'MARA' ).

CREATE DATA:
      r_data_tab TYPE HANDLE r_type_table,
             r_data_str TYPE HANDLE ls_segstruc.

FIELD-SYMBOLS<fs_table> TYPE INDEX TABLE,
               <fs_wa>    TYPE ANY.

ASSIGN:
r_data_tab->TO <fs_table>,
        r_data_str->TO <fs_wa>.