Code: Alles auswählen.
DATA: LAYOUT(5) TYPE c VALUE '/TEST'.
DATA : REPNAME TYPE TSTC-PGMNA VALUE 'RKAEP000'.
PARAMETERS P_TCODE TYPE SY-TCODE DEFAULT 'KSB1' NO-DISPLAY.
PARAMETERS: P_KOKRS TYPE TKA01-KOKRS DEFAULT '021' NO-DISPLAY.
SELECT-OPTIONS: S_KOSTL FOR CSKS-KOSTL NO INTERVALS DEFAULT 1000 TO 999999,
S_KSTAR for CSKB-KSTAR NO INTERVALS,
S_BUDAT FOR COBK-BUDAT NO-EXTENSION.
SUBMIT (REPNAME)WITH P_KOKRS EQ P_KOKRS
WITH P_TCODE EQ P_TCODE
WITH KOSTL IN S_KOSTL
WITH KSTAR IN S_KSTAR
WITH gestern IN S_BUDAT
WITH LAYOUT EQ VARI
USING SELECTION-SCREEN 100
EXPORTING LIST
TO MEMORY AND RETURN.