DATA:BEGIN OF ty,aa1 TYPE c,
aa2 TYPE c,
bb1 type c,
bb2 TYPE c,
END OF ty.
DATA:wa_itab like ty .
DATA:wa_itab1 like TABLE OF ty.
DATA:wa_itab2 like TABLE OF ty.
FIELD-SYMBOLS:<fs> like ty.
FIELD-SYMBOLS:<gs> TYPE ANY.
FIELD-SYMBOLS:<gs1> TYPE ANY.
wa_itab-aa1 = 1.
wa_itab-aa2 = ''.
wa_itab-bb1 = ''.
wa_itab-bb2 = ''.
APPEND wa_itab to wa_itab1.
wa_itab-aa1 = 2.
wa_itab-aa2 = ''.
wa_itab-bb1 = ''.
wa_itab-bb2 = ''.
APPEND wa_itab to wa_itab1.
wa_itab-aa1 = ''.
wa_itab-aa2 = '1'.
wa_itab-bb1 = ''.
wa_itab-bb2 = ''.
APPEND wa_itab to wa_itab1.
wa_itab-aa1 = ''.
wa_itab-aa2 = '2'.
wa_itab-bb1 = ''.
wa_itab-bb2 = ''.
APPEND wa_itab to wa_itab1.
CLEAR wa_itab.
DATA:dd TYPE c.
START-OF-SELECTION.
DATA:XX(3) TYPE C.
DATA:YY(6) TYPE C.
ASSIGN ty to <fs>.
LOOP AT wa_itab1 INTO ty.
WRITE:/ ty-aa1,ty-aa2,ty-bb1,ty-bb2.
ENDLOOP.
uline.
LOOP AT wa_itab1 INTO ty .
do 2 times.
dd = dd + 1.
CONCATENATE 'BB' dd INTO xx.
CONCATENATE 'AA' dd INTO YY.
ASSIGN COMPONENT yy OF STRUCTURE <fs> TO <GS>.
IF <GS> = 1.
ASSIGN COMPONENT xx OF STRUCTURE <fs> TO <GS1>.
<gs1> = 2.
ENDIF.
ENDDO.
MODIFY wa_itab1 FROM <FS> INDEX sy-tabix.
CLEAR dd.
ENDLOOP.
LOOP AT wa_itab1 INTO ty.
WRITE:/ ty-aa1,ty-aa2,ty-bb1,ty-bb2.
ENDLOOP.