How can i point to a specific field in DEEP structure and populate it?

Question

Hello,
I have declared a internal table as below,
DATA: BEGIN OF wa_data,
              vkorg TYPE vkorg
              vtweg TYPE vtweg
              spartTYPE spart
              field_name TYPE CHAR30
               value TYPE CHAR50
            END OF wa_data
DATA: ls_data TYPE wa_data,
            lt_data TYPE STANDARD TABLE OF wa_data.
The lt_data is populated as below,
VKORG-------VTWEG-------SPART-------FIELD_NAME-------VALUE
1000-----------10-------------01------------KALKS---------------ZP00 "Pricing procedure
1000-----------10-------------01------------ZTERM---------------15 days "Payment terms
1000-----------10-------------01------------MAHNA---------------09 "Dunning
Fine.
Now, i have a DEEP DEEP DEEP structure as belowm
DATA: ls_deep TYPE cmds_ei_extern. "Pls. see this deep structure 'cmds_ei_extern' in SAP DDIC / SE11
This deep structure is part of Customer master creation. Now, i would like to POPULATE this deep structure from my lt_data itab DYNAMICALLy, i mean, with out mentioning the field names (like, ZTERM, KALKS, MAHNA etc etc), bcz its these i am pulling this lt_data from a custom table, so going further business may also ADD a new record / field like BUSAB (Accouting clerk) with a value of AL (Allen Christi), hence i want to hv dynamic and its less tediuos also bcz,
We can LOOP lt_data INTO ls_data (for example, the ls_data-field_name = KALKS)
Now, point the KALKS in the deep deep deep structure and populate it with a value of ls_data-value (= 15 days)
ENDLLOOP.
Pls. let me know How can i do this, i guess, we need to use field symbols, pls. let me know the code to achieve my requirement
Thank you

Answer 1

Hi,
Please refer below code.This will populate field kunnr of the deep structure. Once you select the data as per your requirement,you can write similar code to populate rest of the fields in the deep strucure.
TYPES : BEGIN OF ty_data,
             kunnr TYPE kunnr,
             END OF ty_data.
FIELD-SYMBOLS : <lfs_cmds_ei_header>   TYPE cmds_ei_header,
                <lfs_cmds_ei_instance>              TYPE cmds_ei_instance,
                <lfs_kunnr>                                   TYPE kunnr.
DATA:  lfs_cmds_ei_extern  TYPE cmds_ei_extern,
             lr_dytable                  TYPE REF TO data,
             lr_dytable_wa           TYPE REF TO data,
             lt_data                       TYPE STANDARD TABLE of ty_data ,
             wa_data                   TYPE ty_data.
  SELECT kunnr
  FROM yalb_kunde
  UP TO 1 ROWS
  INTO TABLE lt_data.
  IF sy-subrc = 0.
    LOOP AT lt_data INTO lwa_data.
      ASSIGN COMPONENT 'HEADER' OF STRUCTURE lfs_cmds_ei_extern TO <lfs_cmds_ei_header>.
      IF sy-subrc = 0.
        ASSIGN COMPONENT 'OBJECT_INSTANCE' OF STRUCTURE <lfs_cmds_ei_header> TO <lfs_cmds_ei_instance>.
        IF sy-subrc = 0.
          ASSIGN COMPONENT 'KUNNR' OF STRUCTURE <lfs_cmds_ei_instance> TO <lfs_kunnr>.
          IF sy-subrc = 0.
            <lfs_kunnr> = lwa_data-kunnr.
          ENDIF.
        ENDIF.
      ENDIF.
    ENDLOOP.
  ENDIF.
Thanks,
Priya