Code: Alles auswählen.
BEGIN OF matnr_stock_tab_typ,
matnr TYPE mseg-matnr,
werks TYPE mbew-werks,
END OF matnr_stock_tab_typ.
DATA:
matnr_stock_tab TYPE TABLE OF matnr_stock_tab_typ
WITH KEY matnr stock,
wa_matnr_stock_tab LIKE LINE OF matnr_stock_tab.
FIELD-SYMBOLS <wa_main_tab> LIKE LINE OF main_tab.
SORT main_tab BY matnr stock. "main_tab enthält einträge von Materialien und Werken. n-m
LOOP AT main_tab ASSIGNING <wa_main_tab>.
wa_matnr_stock_tab-matnr = <wa_main_tab>-matnr.
wa_matnr_stock_tab-stock = <wa_main_tab>-stock.
COLLECT wa_matnr_stock_tab INTO matnr_stock_tab.
ENDLOOP.
DATA: wtab(72) OCCURS 0,
wtab_line LIKE LINE OF wtab,
or(2) TYPE c,
tmp_matnr(20) TYPE c,
tmp_stock(10) TYPE c.
FIELD-SYMBOLS <wa_matnr_stock_tab> LIKE LINE OF matnr_stock_tab.
* fill wtab
CLEAR: or.
LOOP AT matnr_stock_tab ASSIGNING <wa_matnr_stock_tab>.
tmp_matnr = <wa_matnr_stock_tab>-matnr.
tmp_stock = <wa_matnr_stock_tab>-stock.
CONCATENATE or
' ( matnr = ''' tmp_matnr ''' and werks = ''' tmp_stock ''' ) '
INTO wtab_line.
APPEND wtab_line TO wtab.
or = 'or'.
ENDLOOP.
SELECT * FROM mseg INTO tmp_mseg WHERE (wtab). "LAUFZEITFEHLER