Populating values to internal table created dynamically

Question

Hi,
I am creating an internal table(it1) dynamically and assigned it to a field symbol. now i want to upload values
which are present in a field of another internal table being populated from a Funct Module.Could you tell me
how to assign those values across the fields of field symbol?
loop at itab_char.
LS_ALV_CAT-FIELDNAME = itab_char-charact.
append LS_ALV_CAT to I_ALV_CAT.
endloop.
CALL METHOD CL_ALV_TABLE_CREATE=>CREATE_DYNAMIC_TABLE
  EXPORTING
    IT_FIELDCATALOG = I_ALV_CAT
  IMPORTING
    EP_TABLE        = D_REF.
ASSIGN D_REF->* TO <F_FS>.
(Above my int tab is generated and now stored in <f_FS>)
loop at itab into w_lifnr.
CALL FUNCTION 'CLAF_CLASSIFICATION_OF_OBJECTS'
  EXPORTING
   CLASS                      = p_cname
   CLASSTYPE                  = w_ctype
   OBJECT                     = w_lifnr
  TABLES
    T_CLASS                    = t_class
    T_OBJECTDATA               = t_objectdata
w-lifnr is vendor number. and here we are populating t_objectdata with that vendor related datas. now i want to pass t_objectdata-ausp1 values for each vendor across the fields in <F_FS>.
FIELD-SYMBOLS : <F_FS> TYPE TABLE.
Please refer me the solution to this problem.
Thanks

Answer 1

Check below code and try to add in ur code....
    IF NOT it_bom_expl[] IS INITIAL.
The material number data varies from run to run. For this purpose
the data is been used to build dynamic internal table which stores the
material number data along the x-axis
      PERFORM build_matnr_table.
The material numbers data which is stored in the temp internal table
is been assigned to the dynamic internal table created along the
x-axis for the materials
      PERFORM assign_matnr_val_fields.
The component data which is stored in the internal table needs to be
moved to the dynamic internal table
      PERFORM move_bom_data_to_matnr_table.
*&      Form  build_matnr_table
Using the material number data the dynamic internal tables are been
built which holds the material number data along x-axis. Here the
first 3 columns are always constant which are Components-List,
Description, Count. From 4th column it depends on number of materials
FORM build_matnr_table .
  DATA: l_val(3) TYPE n,
        lf_mat(18) TYPE c.
Moving the Components-List details to the internal table 1st column
which will be used for creation of dynamic internal table
  CLEAR gf_xfc.
  gf_xfc-fieldname = text-t03.
  gf_xfc-datatype = c_val_c.
  gf_xfc-inttype = c_val_c.
  gf_xfc-intlen = 18.
  gf_xfc-decimals = 0.
  APPEND gf_xfc TO gf_ifc.
  APPEND gf_xfc TO gf_ipc.
  CLEAR gf_xfc.
Moving the Description details to the internal table 2nd column
which will be used for creation of dynamic internal table
  gf_xfc-fieldname = text-t04.
  gf_xfc-datatype = c_val_c.
  gf_xfc-inttype = c_val_c.
  gf_xfc-intlen = 40.
  gf_xfc-decimals = 0.
  APPEND gf_xfc TO gf_ipc.
  CLEAR gf_xfc.
Moving the Count details to the internal table 3rd column which will
be used for creation of dynamic internal table
  gf_xfc-fieldname = text-t05.
  gf_xfc-datatype = c_val_c.
  gf_xfc-inttype = c_val_c.
  gf_xfc-intlen = 5.
  gf_xfc-decimals = 0.
  APPEND gf_xfc TO gf_ifc.
  APPEND gf_xfc TO gf_ipc.
Moving the Material numbers are moved to the internal table from 4th
column onwards till all the material numbers are moved to the columns
which will be used for creation of dynamic internal table. Here
columns will be reffered to as Material001 ..... Materialxxn
  LOOP AT it_mat.
    CLEAR gf_xfc.
    l_val = l_val + 1.
    CONCATENATE text-t06 l_val INTO lf_mat.
    gf_xfc-fieldname = lf_mat.
    gf_xfc-datatype = c_val_c.
    gf_xfc-inttype = c_val_c.
    gf_xfc-intlen = 18.
    gf_xfc-decimals = 0.
    APPEND gf_xfc TO gf_ifc.
    APPEND gf_xfc TO gf_ipc.
  ENDLOOP.
Using the above data dynamic internal table is been created
  CALL METHOD cl_alv_table_create=>create_dynamic_table
    EXPORTING
      it_fieldcatalog = gf_ifc
    IMPORTING
      ep_table        = gf_table.
The dynamic internal table which is created is been assigned to
field-symbol which holds the data of the columns of X-axis
  ASSIGN gf_table->* TO <fs_dyn_table>.
Dynamic work area is been created usng the reference to the
field-symbol which has the data and the line item is been assign to
field-symbol to hold line item data for reading purposes line by line
  CREATE DATA gf_line LIKE LINE OF <fs_dyn_table>.
  ASSIGN gf_line->* TO <fs_dyn_wa>.
Using the above data dynamic internal table is been created
  CALL METHOD cl_alv_table_create=>create_dynamic_table
    EXPORTING
      it_fieldcatalog = gf_ipc
    IMPORTING
      ep_table        = gf_table1.
The dynamic internal table which is created is been assigned to
field-symbol which holds the data of the columns of X-axis
  ASSIGN gf_table1->* TO <fs_dyn_table1>.
Dynamic work area is been created usng the reference to the
field-symbol which has the data and the line item is been assign to
field-symbol to hold line item data for reading purposes line by line
  CREATE DATA gf_line1 LIKE LINE OF <fs_dyn_table1>.
  ASSIGN gf_line1->* TO <fs_dyn_wa1>.
Using the above data dynamic internal table is been created
  CALL METHOD cl_alv_table_create=>create_dynamic_table
    EXPORTING
      it_fieldcatalog = gf_ifc
    IMPORTING
      ep_table        = gf_table2.
The dynamic internal table which is created is been assigned to
field-symbol which holds the data of the columns of X-axis
  ASSIGN gf_table2->* TO <fs_dyn_table2>.
Dynamic work area is been created usng the reference to the
field-symbol which has the data and the line item is been assign to
field-symbol to hold line item data for reading purposes line by line
  CREATE DATA gf_line2 LIKE LINE OF <fs_dyn_table2>.
  ASSIGN gf_line2->* TO <fs_dyn_wa2>.
ENDFORM.                    " build_matnr_table
*&      Form  assign_matnr_val_fields
The material numbers data stored in the temp internal table needs to
be assigned to the dynamic internal table along x-axis as the first
record. The temp internal table is been looped and using the field
symbol concept the data is moved to the dynamic internal table
FORM assign_matnr_val_fields .
  DATA: l_cnt(3) TYPE n,
        l_nam(12),
        g_total(3) TYPE n.
  DESCRIBE TABLE it_mat LINES g_total.
  CLEAR l_cnt.
Looping the temp internal table and concatenating material as
material001 and the same is been checked against the dynamic
internal table and the material number value is moved to the
internal table. Finally, the data is been appened as first record.
  LOOP AT it_mat.
    l_nam = c_mat.
    l_cnt = l_cnt + 1.
    CONCATENATE l_nam l_cnt INTO l_nam.
Material which is in form Materialxxn is been assigned to the field
symbol which is checked against the field of dynamic internal table
and the value of the Material Number is been passed to the dynamic
internal table field value.
After all materials are been assigned the record is been appended
to the dynamic internal table.
    ASSIGN COMPONENT l_nam OF STRUCTURE <fs_dyn_wa> TO <fs_field>.
    <fs_field> = it_mat-matnr.
    IF l_cnt = g_total.
      INSERT <fs_dyn_wa> INTO TABLE <fs_dyn_table>.
    ENDIF.
  ENDLOOP.
Looping the temp internal table and concatenating material as
material001 and the same is been checked against the dynamic
internal table and the material number value is moved to the
internal table. Finally, the data is been appened as first record.
This is been used for downloading of data to excel sheet as it
contains additional field which is Description field.
  CLEAR l_cnt.
  LOOP AT it_mat.
    l_nam = c_mat.
    l_cnt = l_cnt + 1.
    CONCATENATE l_nam l_cnt INTO l_nam.
Material which is in form Materialxxn is been assigned to the field
symbol which is checked against the field of dynamic internal table
and the value of the Material Number is been passed to the dynamic
internal table field value.
After all materials are been assigned the record is been appended
to the dynamic internal table.
    ASSIGN COMPONENT l_nam OF STRUCTURE <fs_dyn_wa1> TO <fs_field>.
    <fs_field> = it_mat-matnr.
    IF l_cnt = g_total.
      INSERT <fs_dyn_wa1> INTO TABLE <fs_dyn_table1>.
    ENDIF.
  ENDLOOP.
The contents of one internal table is passed on to other internal
table for use while moving the component data for count purposes.
  <fs_dyn_table2>[] = <fs_dyn_table>[].
ENDFORM.                    " assign_matnr_val_fields
*&      Form  move_bom_data_to_matnr_table
The component data is been appended to the dynamic internal table
The component is checked against a material and if exists the corresp-
onding level is been appended to the record
The total count is derived as the in how many materials the component
exists
FORM move_bom_data_to_matnr_table .
  DATA: l_cnt(2) TYPE n,
        l_cnt1(3) TYPE n,
        l_nam(12),
        l_con(18) TYPE c,
        l_con1(18) TYPE c,
        lf_mat TYPE matnr.
  SORT it_bom_expl BY bom_comp bom_mat level.
  CLEAR: l_cnt1, <fs_dyn_wa>.
Looping the component internal table
  LOOP AT it_bom_expl INTO gf_it_bom_expl.
    CLEAR: l_cnt1.
    AT NEW bom_comp.
      CLEAR: l_cnt, <fs_dyn_wa>, lf_mat.
For every new bom component the material data is moved to
temp material table which will be used for assigning the levels
checking the count
      it_mat_temp[] = it_mat[].
Component data is been assigned to the field symbol which is checked
against the field of dynamic internal table and the value of the
component number is been passed to the dynamic internal table field
value.
      ASSIGN COMPONENT c_comp_list OF STRUCTURE <fs_dyn_wa> TO
      <fs_check>.
      <fs_check> = gf_it_bom_expl-bom_comp.
    ENDAT.
    AT NEW bom_mat.
      CLEAR l_con.
    ENDAT.
    lf_mat = gf_it_bom_expl-bom_mat.
Looping the temp internal table and looping the dynamic internal table
*by reading line by line into workarea, the materialxxn is been assigned
to field symbol which will be checked and used.
    LOOP AT it_mat_temp.
      l_nam = c_mat.
      l_cnt1 = l_cnt1 + 1.
      CONCATENATE l_nam l_cnt1 INTO l_nam.
      LOOP AT <fs_dyn_table2> ASSIGNING <fs_dyn_wa2>.
        ASSIGN COMPONENT l_nam OF STRUCTURE <fs_dyn_wa2> TO <fs_xy>.
      ENDLOOP.
      IF <fs_xy> = lf_mat.
        CLEAR lf_mat.
        l_con1 = l_con.
      ENDIF.
Checking whether the material exists for a component and if so it is
been assigned to the field symbol which is checked against the field
of dynamic internal table and the level of the component number
against material is been passed to the dynamic internal table field
value.
      IF <fs_xy> = gf_it_bom_expl-bom_mat.
        ASSIGN COMPONENT l_nam OF STRUCTURE <fs_dyn_wa> TO <fs_check>.
        CLEAR l_con.
        MOVE gf_it_bom_expl-level TO l_con.
        CONCATENATE c_val_l l_con INTO l_con.
        CONDENSE l_con NO-GAPS.
        IF l_con1 NE space.
          CONCATENATE l_con1 l_con INTO l_con SEPARATED BY c_comma.
          CLEAR l_con1.
          l_cnt = l_cnt - 1.
        ENDIF.
        <fs_check> = l_con.
        l_cnt = l_cnt + 1.
      ENDIF.
    ENDLOOP.
    AT END OF bom_comp.
At end of every new bom component the count is moved to the field
symbol which is checked against the field of dynamic internal table
and the count is been passed to the dynamic internal table field
value.
      ASSIGN COMPONENT c_count OF STRUCTURE <fs_dyn_wa> TO <fs_check>.
      <fs_check> = l_cnt.
      INSERT <fs_dyn_wa> INTO TABLE <fs_dyn_table>.
    ENDAT.
  ENDLOOP.
Looping the component internal table. This is used for the additional
Description field which is shown in the excel sheet
  LOOP AT it_bom_expl INTO gf_it_bom_expl.
    CLEAR: l_cnt1.
    AT NEW bom_comp.
      CLEAR: l_cnt, <fs_dyn_wa1>, lf_mat.
For every new bom component the material data is moved to
temp material table which will be used for assigning the levels
checking the count
      it_mat_temp[] = it_mat[].
Component data is been assigned to the field symbol which is checked
against the field of dynamic internal table and the value of the
component number is been passed to the dynamic internal table field
value.
      ASSIGN COMPONENT c_comp_list OF STRUCTURE <fs_dyn_wa1> TO
      <fs_check>.
      <fs_check> = gf_it_bom_expl-bom_comp.
    ENDAT.
    AT NEW bom_mat.
      CLEAR l_con.
    ENDAT.
    lf_mat = gf_it_bom_expl-bom_mat.
Looping the temp internal table and looping the dynamic internal table
*by reading line by line into workarea, the materialxxn is been assigned
to field symbol which will be checked and used.
    LOOP AT it_mat_temp.
      l_nam = c_mat.
      l_cnt1 = l_cnt1 + 1.
      CONCATENATE l_nam l_cnt1 INTO l_nam.
      LOOP AT <fs_dyn_table2> ASSIGNING <fs_dyn_wa2>.
        ASSIGN COMPONENT l_nam OF STRUCTURE <fs_dyn_wa2> TO <fs_xy>.
      ENDLOOP.
      IF <fs_xy> = lf_mat.
        CLEAR lf_mat.
        l_con1 = l_con.
      ENDIF.
Checking whether the material exists for a component and if so it is
been assigned to the field symbol which is checked against the field
of dynamic internal table and the level of the component number
against material is been passed to the dynamic internal table field
value.
      IF <fs_xy> = gf_it_bom_expl-bom_mat.
        ASSIGN COMPONENT l_nam OF STRUCTURE <fs_dyn_wa1> TO <fs_check>.
        CLEAR l_con.
        MOVE gf_it_bom_expl-level TO l_con.
        CONCATENATE c_val_l l_con INTO l_con.
        CONDENSE l_con NO-GAPS.
        IF l_con1 NE space.
          CONCATENATE l_con1 l_con INTO l_con SEPARATED BY c_comma.
          CLEAR l_con1.
          l_cnt = l_cnt - 1.
        ENDIF.
        <fs_check> = l_con.
        l_cnt = l_cnt + 1.
      ENDIF.
    ENDLOOP.
The description is moved to the field symbol which is checked against
the field of dynamic internal table and the count is been passed to
the dynamic internal table field value.
    ASSIGN COMPONENT c_description OF STRUCTURE <fs_dyn_wa1> TO
    <fs_check>.
    <fs_check> = gf_it_bom_expl-ojtxp.
At end of every new bom component the count is moved to the field
symbol which is checked against the field of dynamic internal table
and the count is been passed to the dynamic internal table field
value.
    AT END OF bom_comp.
      ASSIGN COMPONENT c_count OF STRUCTURE <fs_dyn_wa1> TO <fs_check>.
      <fs_check> = l_cnt.
      INSERT <fs_dyn_wa1> INTO TABLE <fs_dyn_table1>.
    ENDAT.
  ENDLOOP.
ENDFORM.                    " move_bom_data_to_matnr_table