Problem with field-symbol values not updating

Question

H i ,
      I have following piece of code :
Assigning Dynamic Table to Field Symbol
    ASSIGN ist_dyn_table->* TO <gs_dyn_table>.
*   Creating Structure for dynamic table
    CREATE DATA gs_dyn_line LIKE LINE OF <gs_dyn_table>.
*   Creating line type for the Dynamic Values
    ASSIGN gs_dyn_line->* TO <gs_line>.
*   Populating values in the dynamic table
    LOOP AT ist_pwcl_main INTO wa_pwcl_main.
      ASSIGN COMPONENT gc_fld_werks OF STRUCTURE <gs_line> TO <gs_field>.
   1   IF sy-subrc EQ 0.
   2        <gs_field> = wa_pwcl_main-werks.
   3      ENDIF.
   5  IF <gs_field> IS ASSIGNED.
   6     <gs_field> = wa_pwcl_main-vbeln.
      ENDIF.
  7 IF <gs_field> IS ASSIGNED.
  8  <gs_field> =  wa_pwcl_main-posnr.
      ENDIF.
   IF <gs_field> IS ASSIGNED.
        <gs_field> = wa_pwcl_main-quant.
      ENDIF.
on debugging  at line 2 <gs_filed> contains the value of werks .
but at line 6 <gs_field> contains value of vbeln as 0 and at 8 of posnr as 0 .
What can be the problem ? Other values are getting assigned properly .
Plz help ...
Regards .

Answer 1

Hi,
Assigning Dynamic Table to Field Symbol
    ASSIGN ist_dyn_table->* TO <gs_dyn_table>.
  Creating Structure for dynamic table
    CREATE DATA gs_dyn_line LIKE LINE OF <gs_dyn_table>.
  Creating line type for the Dynamic Values
    ASSIGN gs_dyn_line->* TO <gs_line>.
  Populating values in the dynamic table
    LOOP AT ist_pwcl_main INTO wa_pwcl_main.
      ASSIGN COMPONENT gc_fld_werks OF STRUCTURE <gs_line> TO <gs_field>.
   1   IF sy-subrc EQ 0.
   2        <gs_field> = wa_pwcl_main-werks.
   3      ENDIF.
   5  IF <gs_field> IS ASSIGNED.
   6     <gs_field> = wa_pwcl_main-vbeln.
      ENDIF.
  7 IF <gs_field> IS ASSIGNED.
  8  <gs_field> =  wa_pwcl_main-posnr.
      ENDIF.
   IF <gs_field> IS ASSIGNED.
        <gs_field> = wa_pwcl_main-quant.
      ENDIF.
Based on your coding above, <gs_field> has been assigned with data type 'WERKS' (i'd assume component gc_fld_werks found from structure <gs_line> is a plant typed), which is a CHAR(4) data type.
Meaning, if <gs_field> is assigned with Plant type value, e.g. <gs_field> = '1000', field symbol <gs_field> will contain 4 character only.
At line 6, if wa_pwcl_main-vbeln = '0000201000', <gs_field> is only capturing '0000' only. This is also happened to line 8.
However, it looks like that <gs_field> is getting over-write if ASSIGNED statement returns SY-SUBRC = 0.
Hope this helps.
Regards,
Patrick