ABAP中COLLECT的用法

SAP中ABAP对内表插入数据的时候有3种：APPEND，COLLECT，INSERT。

要填充内表 ，既可逐行 添加数据， 也可复制另 一个表格的 内容。

要逐行填充 内表，可以 使用 APPEND、 COLLECT 或 INSERT 语句。

_ 要将内表 仅用于存储 数据，出于 性能方面的 考虑，建议 使用 APPEND。 用 APPEND 也可以创建 序列清单。

_ 要计算数 字字段之和 或要确保内 表中没有出 现重复条目 ，请使用 COLLECT 语句，它根 据标准关键 字处理行。

_ 要在内表 现有行之前 插入新行， 请使用 INSERT 语句。

要将内表内 容复制到另 一个内表中 ，请使用 APPEND、 INSERT 或 MOVE 语句的变式 。

_ 要将内表 行附加到另 一个内表中 ，请使用 APPEND 语句的变式 。

_ 要将内表 行插入另一 个内表中， 请使用 INSERT 语句的变式 。

_ 要将内表 条目内容复 制到另一个 内表中，并 且覆盖该目 标表格，请 使用 MOVE 语句。

COLLECT的特性让我看到了企业写报表的曙光。有的时候我们需要对某个区域或者某个客户年度营业额进行汇总，于是COLLECT就大派用场了，甚至可以不用跟QAD一样判断是否有存在这个记录而进行汇总，SAP就已经帮你处理好这一切！

不过，默认COLLECT只是对非P和I进行汇总，所以有的时候这也带来很多不方便。这个问题留下一篇博文解决吧！请看如下例子：

REPORT Z_COLLECT.
DATA: BEGIN OF ITAB OCCURS 4,
COLUMN1(3) TYPE C,
COLUMN2(2) TYPE N,
COLUMN3    TYPE I,
COLUMN4(5) TYPE C,
END OF ITAB.
ITAB-COLUMN1 = ‘abc’. ITAB-COLUMN2 = ‘12′. ITAB-COLUMN3 = 3. ITAB-COLUMN4 = ‘xyz’.
COLLECT ITAB.
WRITE / SY-TABIX.
ITAB-COLUMN1 = ‘def’. ITAB-COLUMN2 = ‘34′. ITAB-COLUMN3 = 5. ITAB-COLUMN4 = ‘xyz’.
COLLECT ITAB.
WRITE / SY-TABIX.
ITAB-COLUMN1 = ‘abc’. ITAB-COLUMN2 = ‘12′. ITAB-COLUMN3 = 15. ITAB-COLUMN4 = ‘xyz’.
COLLECT ITAB.
WRITE / SY-TABIX.
LOOP AT ITAB.
WRITE: / ITAB-COLUMN1, ITAB-COLUMN2, ITAB-COLUMN3, ITAB-COLUMN4.
ENDLOOP.

结果：

1

2

1

abc 12 18 xyz

def 34 5 xyz