FOR ALL ENTRIES IN 的删除重复功能

FOR ALL ENTRIES IN需要注意的问题，

SELECT A~EBELN A~EBELP A~MATNR A~NETPR A~PEINH A~BPRME A~MENGE A~MTART
INTO CORRESPONDING FIELDS OF TABLE ITABEK
FROM EKPO AS A
WHERE A~EBELN IN LR_EBELN    "采购订单号
AND A~EBELP IN LR_EBELP
AND A~MATNR IN LR_MATNR
AND A~MTART = 'FERT'.

IF ITABEK IS NOT INITIAL.
SELECT A~EBELN A~EBELP A~BWART A~MENGE
INTO CORRESPONDING FIELDS OF TABLE ITABBE
FROM EKBE AS A
FOR ALL ENTRIES IN ITABEK
WHERE A~EBELN = ITABEK-EBELN
AND   A~EBELP = ITABEK-EBELP
AND   A~BWART = '101'.
ENDIF.

1、首先，必须要判断For
all entries in后面的内表是否为空，如果它为空的话，那么在where条件中的与内表中字段进行比较的结果全部为真，也就是全部满足条件，这会导致取出非常多的数据，极大地影响系统的性能。

2、上面的例子，内表ITABBE本来要取出 EBELN,EBELP,BWART,MENGE 的，运行后的结果和预期的不一致。如果是新手这一块想找到原因确实会云里雾里的，我当时也就这样，反复调试，认真比对，就是找不出原因来。搞不定的情况下问了同事。同事一句一语中的!For
all entries in会自动distinct，删除重复的行。所以解决的办法就是：给ITABBE内表多加一列主键，(列值的选择上要看准是否唯一性)，这里我们加上这个字段，A~BUZEI
，程序正常了。