Code: Alles auswählen.
LOOP AT itab INTO wa.
DO n TIMES.
ASSIGN COMPONENT sy-index OF STRUCTURE wa TO <fs>.
IF <fs> IS INITIAL.
"DO ANYTHING
ENDIF.
ENDDO.
ENDLOOP.
Code: Alles auswählen.
data: lt_index type INT4_TABLE.
field-symbols: <la_line> type any.
LOOP AT itab ASSIGNINg <la_line>.
DO.
ASSIGN COMPONENT sy-index OF STRUCTURE <la_line> TO <fs>.
IF sy-subrc NE 0.
exit. "Abbruchbedingung (Ende der Struktur erreicht)
ELSEIF <fs> IS NOT INITIAL.
append sy-index to lt_index. "Die befüllten Spaltenindizes merken
ENDIF.
ENDDO.
ENDLOOP.
SORT lt_index.
delete adjacent duplicates from lt_index. "Verdichten
LOOP AT itab ASSIGNINg <la_line>.
DO.
ASSIGN COMPONENT sy-index OF STRUCTURE <la_line> TO <fs>.
IF sy-subrc NE 0.
exit. "Abbruchbedingung (Ende der Struktur erreicht)
ELSE.
READ TABLE lt_index TRANSPORTING no fields binary search
with key table_line = sy-index. "Soll die Spalte ausgegeben werden?
IF sy-subrc EQ 0.
* Spalte ausgeben
ENDIF.
ENDIF.
ENDDO.
ENDLOOP.