ABAP大內表拆分：31000行拆为1000行小表的最短高效实现

嘿，针对你拆分31000行大型内表的需求，其实有比你贴出来的常规逐行循环更简洁、性能更优的方法——这些方法都是ABAP内核层面优化过的操作，完全不用手动处理行计数和插入逻辑，省心又高效。

方法一：用PACKAGE SIZE直接循环处理（最简洁，首推） #

从ABAP 7.02开始支持的PACKAGE SIZE子句，可以让你直接按指定行数批量遍历内表，内核会自动帮你拆分好子包，代码短到离谱：

DATA: lc_package_size TYPE i VALUE 1000,
      rt_result       TYPE STANDARD TABLE OF tt_table_type.

LOOP AT it_large_table ASSIGNING FIELD-SYMBOL(<fs_package>) 
                        PACKAGE SIZE lc_package_size.
  " 如果需要把包存入结果表，直接插入即可
  INSERT <fs_package> INTO TABLE rt_result.
  
  " 这里也可以直接处理当前子包，比如调用批量BAPI、更新数据库等
ENDLOOP.

这个方法的优势很明显：完全不需要手动维护子表、判断行数，所有拆分逻辑由ABAP内核完成，性能比逐行循环高很多——毕竟内核操作是原生优化的，避免了大量逐行INSERT带来的额外开销，31000行的场景下效率提升会非常直观。

方法二：用SLICE操作符直接截取内表片段（ABAP 7.40 SP08+） #

如果你需要一次性把所有子包都构建到结果表中，或者更灵活地控制索引范围，可以用内表的切片语法（内表[ 起始索引 TO 结束索引 ]），这同样是内核级别的高效操作：

DATA: lc_package_size TYPE i VALUE 1000,
      rt_result       TYPE STANDARD TABLE OF tt_table_type,
      lv_total_lines  TYPE i,
      lv_current_idx  TYPE i VALUE 1,
      lv_end_idx      TYPE i.

lv_total_lines = lines( it_large_table ).

WHILE lv_current_idx <= lv_total_lines.
  lv_end_idx = MIN( lv_current_idx + lc_package_size - 1, lv_total_lines ).
  " 直接截取指定范围的内表行作为子包，插入结果表
  INSERT VALUE #( ( it_large_table[ lv_current_idx TO lv_end_idx ] ) ) INTO TABLE rt_result.
  lv_current_idx = lv_end_idx + 1.
ENDWHILE.

这种方法同样不需要逐行处理，直接通过索引范围一次性获取子表，性能和PACKAGE SIZE循环不相上下，适合需要提前构建所有子包的场景。

和你给出的常规方法对比 #

你贴的逐行循环方法虽然能实现功能，但在大数据量下（比如31000行），逐行INSERT到子表的操作会带来额外的开销，代码也相对冗长。而上面两种方法都是利用ABAP内核的优化机制，不仅代码更短，性能也更优。

当然，如果你的系统版本低于7.02，那常规方法就是可行的替代方案，但只要版本允许，优先用上面两种方法。

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