减少LOOP AT语句能否提升ABAP程序效率？合并循环是否更优？

我正在排查一个填充自定义表的程序性能问题，想优化代码。考虑合并遍历同一张内表的两次LOOP AT语句，但不确定对性能的影响，特此咨询：减少LOOP AT语句数量是否能提升整体运行效率？以下是原代码（含两个带不同WHERE子句的循环）与我提出的合并循环并通过ELSEIF分支处理的优化代码示例，请问这个优化方案是否更优？

原代码 #

IF param = 'X'.
  LOOP AT lt_intab
     INTO wa_intab
    WHERE field_one = const_one.

          SELECT *
            FROM db_table
           WHERE field_two = wa_intab-field_two.

                 MOVE-CORRESPONDING db_table TO wa_outtab.
                 APPEND wa_outtab TO lt_outtab.
                 CLEAR wa_outtab.

          ENDSELECT.

  ENDLOOP.
ENDIF.

LOOP AT lt_intab
   INTO wa_intab
  WHERE field_one = const_two.

        SELECT *
          FROM db_table
         WHERE field_three = wa_intab-field_three.

               MOVE-CORRESPONDING db_table TO wa_outtab.
               APPEND wa_outtab TO lt_outtab.
               CLEAR wa_outtab.

        ENDSELECT.

ENDLOOP.

优化后代码 #

LOOP AT lt_intab
   INTO wa_intab.

        IF param     = 'X'
       AND wa_intab-field_one = const_one.

         SELECT *
           FROM db_table
          WHERE field_two = wa_intab-field_two.

                MOVE-CORRESPONDING db_table TO wa_outtab.
                APPEND wa_outtab TO lt_outtab.
                CLEAR wa_outtab.

         ENDSELECT.

    ELSEIF wa_intab-field_one = const_two.

         SELECT *
           FROM db_table
          WHERE field_three = wa_intab-field_three.

                MOVE-CORRESPONDING db_table TO wa_outtab.
                APPEND wa_outtab TO lt_outtab.
                CLEAR wa_outtab.

         ENDSELECT.

     ENDIF.

ENDLOOP.

问题分析与优化建议 #

1. 合并LOOP AT的性能影响

合并两次LOOP为一次，确实减少了内表遍历的次数，但对整体性能的提升非常有限：

• 内表遍历的耗时在整个程序中占比极低，真正的性能瓶颈是数据库交互。
• 合并后每次循环多了IF/ELSEIF的条件判断，这部分开销微乎其微，几乎可以忽略。
• 如果lt_intab中符合两个WHERE条件的数据占比很低，合并后的循环反而会遍历大量无关数据，甚至可能比原代码略慢。

因此，这个合并方案算不上“更优”，因为它没有触及核心性能问题。

2. 真正的性能瓶颈与核心优化方向

你给出的两段代码都存在同一个致命问题：在LOOP循环内执行SELECT语句。每次循环都发起一次数据库请求，频繁的IO交互会导致程序性能急剧下降，这是ABAP开发中的典型性能陷阱。

针对这个问题，正确的优化方向应该是：

• 批量查询数据库：先收集所有需要查询的条件值，再用FOR ALL ENTRIES或JOIN一次性从数据库获取所有数据，避免循环内的多次查询。
• **避免SELECT ***：只查询实际需要的字段，减少数据传输量和内存占用。
• 添加合适的索引：确保db_table的field_two和field_three字段有对应的数据库索引，加速查询。

3. 更优的代码示例

DATA: lt_field_two     TYPE STANDARD TABLE OF db_table-field_two,
      lt_field_three   TYPE STANDARD TABLE OF db_table-field_three,
      lt_db_result     TYPE STANDARD TABLE OF db_table,
      wa_outtab        TYPE ty_outtab.

* 第一步：收集所有需要查询的条件值
IF param = 'X'.
  SELECT field_two
    FROM @lt_intab
    INTO TABLE @lt_field_two
   WHERE field_one = @const_one.
ENDIF.

SELECT field_three
  FROM @lt_intab
  INTO TABLE @lt_field_three
 WHERE field_one = @const_two.

* 第二步：批量查询数据库（针对field_two）
IF lt_field_two IS NOT INITIAL.
  SELECT field_two field_xxx field_yyy " 只保留需要的字段
    FROM db_table
    INTO TABLE @lt_db_result
   FOR ALL ENTRIES IN @lt_field_two
   WHERE field_two = @lt_field_two-field_two.

  * 映射到输出表
  LOOP AT lt_db_result INTO DATA(wa_db).
    MOVE-CORRESPONDING wa_db TO wa_outtab.
    APPEND wa_outtab TO lt_outtab.
    CLEAR wa_outtab.
  ENDLOOP.
ENDIF.

* 第三步：批量查询数据库（针对field_three）
IF lt_field_three IS NOT INITIAL.
  SELECT field_three field_xxx field_yyy " 只保留需要的字段
    FROM db_table
    INTO TABLE @lt_db_result
   FOR ALL ENTRIES IN @lt_field_three
   WHERE field_three = @lt_field_three-field_three.

  * 映射到输出表
  LOOP AT lt_db_result INTO wa_db.
    MOVE-CORRESPONDING wa_db TO wa_outtab.
    APPEND wa_outtab TO lt_outtab.
    CLEAR wa_outtab.
  ENDLOOP.
ENDIF.

内容的提问来源于stack exchange，提问作者Piolo Quintos