ABAP中按索引复制内表指定字段至另一内表的最优方法问询

问题背景 #

现有BAPI的导入参数包含：

• 采购订单(PO)的抬头数据
• 包含多行项目的PO内表po_itemdata，其中包含短文本字段（如short_text）

需要生成供应商发票(SI)文档，其行项目内表si_itemdata仅包含2个字段，其中短文本字段与PO的字段名一致。核心需求：当SI行项目的短文本为空时，按相同行索引将PO对应行的短文本复制到SI。

已尝试方法的问题：

• MOVE-CORRESPONDING会复制所有字段名匹配的字段，不符合仅补全短文本的需求
• 带MAPPING/EXCEPT的MOVE-CORRESPONDING会将未指定字段设为默认值，破坏SI内表原有数据
• 当前通过手动循环索引实现，希望找到更简洁的内置方法

解决方案 #

方法1：ABAP 7.40+ 简洁表达式写法 #

如果系统版本支持ABAP 7.40及以上，可利用CORRESPONDING表达式结合条件赋值，仅更新目标字段：

DATA(lt_si_itemdata_updated) = CORRESPONDING #( lt_si_itemdata
                                                FOR INDEX i
                                                WHEN lt_si_itemdata[ i ]-short_text IS INITIAL
                                                THEN VALUE #( BASE lt_si_itemdata[ i ]
                                                             short_text = lt_po_itemdata[ i ]-short_text ) ).

该表达式会遍历内表，仅对短文本为空的行，保留原有字段值的同时覆盖短文本字段，其他行保持原样。

方法2：低版本兼容的优化循环 #

若系统版本较低，可使用字段符号直接修改内表，避免冗余的MODIFY操作：

LOOP AT lt_si_itemdata ASSIGNING FIELD-SYMBOL(<fs_si>).
  DATA(lv_index) = sy-tabix.
  IF <fs_si>-short_text IS INITIAL AND lv_index <= lines(lt_po_itemdata).
    <fs_si>-short_text = lt_po_itemdata[ lv_index ]-short_text.
  ENDIF.
ENDLOOP.

添加索引越界判断可避免因PO与SI内表行数不一致导致的运行时错误。

关键注意事项 #

• 确保PO与SI内表的行索引严格对应，若存在排序/过滤操作，需改用采购订单行项目号等关键字段进行精准匹配，而非依赖索引
• 若内表数据量极大，可考虑批量处理优化性能，但上述两种写法在常规场景下已足够高效

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