TABLES: vbak.
DATA: BEGIN OF gt_vbak OCCURS 0,
kunag LIKE vbak-kunnr,
kunwe LIKE vbak-kunnr,
END OF gt_vbak.
gt_vbak-kunag = '0000200949'.
gt_vbak-kunwe = '0000200004'.
APPEND gt_vbak.
*------- 第一种方法:不用for all entries -------------------------------------
DATA: BEGIN OF gt_kna1 OCCURS 0,
kunnr LIKE kna1-kunnr,
name1 LIKE kna1-name1,
END OF gt_kna1.
SELECT * FROM kna1 APPENDING CORRESPONDING FIELDS OF TABLE gt_kna1
FOR ALL ENTRIES IN gt_vbak
WHERE kunnr = gt_vbak-kunag.
SELECT * FROM kna1 APPENDING CORRESPONDING FIELDS OF TABLE gt_kna1
FOR ALL ENTRIES IN gt_vbak
WHERE kunnr = gt_vbak-kunwe.
LOOP AT gt_kna1.
WRITE:/ gt_kna1-kunnr, gt_kna1-name1.
ENDLOOP.
*------- 第二种方法 -------------------------------------------------------
TABLES kna1.
SELECT * FROM kna1
FOR ALL ENTRIES IN gt_vbak
WHERE kunnr = gt_vbak-kunag OR kunnr = gt_vbak-kunwe.
WRITE:/ kna1-kunnr, kna1-name1.
ENDSELECT.
评论