How to assign idoc segment at runtime ??

Question

Hi ,
I have a ztable which is maintained via sm30.
The field1 is a key field and other fields are idocsegment name , idoc field , field value .
Field1 = key field
idoc segment name (field2)
idoc field (field3)
field value(field4)
How do i update idoc segment and particular field with field4 at runtime .
segment name , field and value changes with the matching key field.
  loop at it_edidd into wa_edidd
   where segnam = wa_ztable-idoc_segment.
wa_seg = wa_edidd-sdata.
how to assign the field at runtime ?????????????????????????
how to change the value of field ?????????????????????????
   update edid4 set   sdata =  wa_seg
                      where docnum  = wa_edidd-docnum
                      and   segnum  = wa_edidd-segnum
                      and   segnam = wa_edidd-segnam.
   if sy-subrc <> 0 .
     rollback work .
     write: / wa_edidd-docnum .
   else.
     commit work.
   endif.
  endloop.
Please help me with the above code .
Regards,
Rachel

Answer 1

Hello Rachel
You could do this the following way:
DATA: ls_edidd    TYPE edidd,
           ld_idx         TYPE i.
FIELD-SYMBOLS:
  <ls_segment>         TYPE any,
  <ld_field>                TYPE any.
LOOP AT it_edidd INTO ls_eddid
                             WHERE ( segnam = wa_ztable-idoc_segment ).
  ld_idx = syst-tabix.
  ASSIGN ls_edidd-sdata TO <ls_segment> CASTING TYPE (ls_edidd-segnam).  " <<<
  ASSIGN COMPONENT wa_ztable-field3 OF STRUCTURE <ls_segment>
                                  TO <ld_field>.
  <ld_field> = wa_ztable-field4.
  MODIFY it_edidd FROM ls_edidd INDEX ld_idx.
ENDLOOP.
However, be aware that your logic might fail in case of repetitive segments.
Regards
  Uwe