Code: Alles auswählen.
SELECT SINGLE * FROM t005 WHERE land1 = xxx-land1.
IF xxx-land1 = 'DE'.
infosatz_i1-yzauslindik = 0.
ELSE.
IF t005-xegld EQ 'x' OR t005-xegld EQ 'X'.
infosatz_i1-yzauslindik = 1.
ENDIF.
IF t005-xegld EQ space.
infosatz_i1-yzauslindik = 2.
ENDIF.
ENDIF.
Code: Alles auswählen.
DATA: gt_sel TYPE TABLE OF STRING
, g_sel TYPE STRING.
CONCATENATE 'LANDL =' g_tabname '-LANDL'
INTO g_sel.
APPEND g_sel TO gt_sel.
SELECT SINGLE *
FROM t005
INTO gt_data
WHERE (gt_sel).
Code: Alles auswählen.
data: land(10) value '____-LANDL'.
field-symbols <fs>.
land(4) = 'LFA1' "(oder KNA1)
assign (land) to <fs>.
select single * from t005 where landl = <fs>.
if <fs> = 'DE'.