以下面程式做測試
REPORT Z_TST_5 MESSAGE-ID ZCO.
DATA: I_BKPF LIKE STANDARD TABLE OF BKPF WITH HEADER LINE.
DATA: I_BSEG LIKE STANDARD TABLE OF BSEG WITH HEADER LINE.
PARAMETERS: P_BUKRS LIKE BKPF-BUKRS.
START-OF-SELECTION.
SELECT * UP TO 50000 ROWS INTO CORRESPONDING FIELDS OF TABLE I_BKPF
FROM BKPF.
LOOP AT I_BKPF.
SELECT * INTO CORRESPONDING FIELDS OF TABLE I_BSEG
FROM BSEG
WHERE BUKRS = I_BKPF-BUKRS
AND BELNR = I_BKPF-BELNR
AND GJAHR = I_BKPF-GJAHR.
ENDLOOP.
SELECT * UP TO 50000 ROWS INTO CORRESPONDING FIELDS OF TABLE I_BKPF
FROM BKPF.
LOOP AT I_BKPF.
SELECT * INTO CORRESPONDING FIELDS OF TABLE I_BSEG
FROM BSEG
WHERE BUKRS = I_BKPF-BUKRS
AND BELNR = I_BKPF-BELNR
AND GJAHR = I_BKPF-GJAHR.
ENDLOOP.
END-OF-SELECTION.
















