一、FOR ALL ENTRIES IN 案例
今天碰到工单报工统计分析表查询速度特别慢
经查看源代码：
SELECT afpo~dwerk afko~aufnr afpo~matnr AS plnbez afpo~charg afpo~psmng afko~fevor afko~aufpl
FROM afko INNER JOIN afpo
ON afko~aufnr = afpo~aufnr
INTO CORRESPONDING FIELDS OF TABLE it_afpo
WHERE afpo~dwerk = p_dwerk
AND afpo~aufnr IN p_aufnr
AND afpo~matnr IN p_matnr
AND afko~fevor IN p_fevor
AND afpo~charg IN p_charg.
IF f_wr = 'X'.
SELECT *
FROM afru
INTO CORRESPONDING FIELDS OF TABLE it_afru
FOR ALL ENTRIES IN it_afpo
WHERE werks = it_afpo-dwerk
AND aufnr = it_afpo-aufnr
AND ersda IN p_ersda
AND prdut IN p_prdut
AND stokz <> 'X'
AND stzhl = 0 .
ELSE.
SELECT *
FROM afru
INTO CORRESPONDING FIELDS OF TABLE it_afru
FOR ALL ENTRIES IN it_afpo
WHERE werks = it_afpo-dwerk
AND aufnr = it_afpo-aufnr
AND ersda IN p_ersda
AND prdut IN p_prdut.
ENDIF.
FOR ALL ENTRIES IN 使用前需判断后面的内表是否为空，为空则查询出的数据特别多，影响查询速度，如内表数据量很大，速度也很慢。
这样就是 FOR ALL ENTRIES IN 后面内表的数据量很大。一年的工单有一万多条。
所以这里，不使用FOR ALL ENTRIES IN语句。
解决方法：
1、where语句in该内表，定义range类型内表：it_aufnr 存储 it_afpo-aufnr 数据。
RANGES: it_aufnr FOR afko-aufnr.
LOOP AT it_afpo.
it_aufnr-low = it_afpo-aufnr.
it_aufnr-sign = 'I'.
it_aufnr-option = 'EQ'.
APPEND it_aufnr.
ENDLOOP.
也可以查询it_afpo的时候就直接赋值给it_aufnr
例：（查询出的数据要用low，需要定义sign和option）
SELECT aufnr INTO it_aufnr-low FROM afko WHERE dwerk = p_dwerk AND gltri IN p_ersda.
it_matnr-sign = 'I'.
it_matnr-option = 'EQ'.
APPEND it_matnr.
ENDSELECT.
IF NOT it_aufnr[] IS INITIAL.
SELECT * INTO CORRESPONDING FIELDS OF TABLE it_afru
FROM afko WHERE dwerk = p_dwerk AND ersda IN p_ersda AND aufnr IN it_aufnr
AND prdut IN p_prdut AND stokz <> 'X' AND stzhl = 0 .
也可以这样写：
append it_aufnr to it_aufnr[].
WHERE aufnr IN it_aufnr[].
2、loop 循环 it_afru 内表，删除 it_afpo 中不存在的 aufnr 行。
SELECT * FROM afru
INTO CORRESPONDING FIELDS OF TABLE it_afru
* FOR ALL ENTRIES IN it_afpo
WHERE werks = p_dwerk
* AND aufnr = it_afpo-aufnr
AND ersda IN p_ersda
AND prdut IN p_prdut
AND stokz <> 'X'
AND stzhl = 0 .
IF NOT it_afru[] IS INITIAL.
LOOP AT it_afru .
READ TABLE it_afpo WITH KEY aufnr = it_afru-aufnr.
IF sy-subrc <> 0.
DELETE it_afru[].
CONTINUE..
ENDIF.
ENDLOOP.
未完待续~~~