abap collect的用法与实例.doc

abap collect的用法与实例 最近发现SAP提供了好多功能，就拿collect来说，之前也用到这样的功能，但是都是自己手工写的代码，现在有了它，以后处理内表中的数据按某些列来统计数据就方便多了！collect可以用于select.....endselect，也可以用于内表中的数据处理，但是不推荐在select....endselect中使用。collect是根据某些关键列来分类统计数据某些数字列的和的过程，下列通过一个例子来了解collect的用法:处理结果如下所示：程序如下所示：*---------------------------------------------------------------------**?Report??ZTEST_COLLECT**---------------------------------------------------------------------**?Create??By??????:?flying*?Create??Date????:?2009-12-31*?Descriptions????:?测试collect的用法*---------------------------------------------------------------------*REPORT??ZTEST_COLLECT.*----------------------------------------------------------------------**???define?internal?tables?or?workarea*???定义内表或者工作区*----------------------------------------------------------------------*data:?begin?of?w_test,key?type?string,????????这是关键字段，用于根据这列来统计的V1、V2的值（这个关键字段可以是多个）v1??type?i,v2??type?i,end???of?w_test.data:?t_data?like?w_test?occurs?0?with?header?line.???????定义数据内表data:?t_test?like?HASHED?TABLE?OF?w_test?with?UNIQUE?key?key?with?header?line.??定义统计结果内表（必须是哈希内表)*----------------------------------------------------------------------**???assign?value?to?internal?tables*???给内表赋值用于测试*----------------------------------------------------------------------*do?10?times.if?sy-index??4.t_data-key?=?A.t_data-v1??=?sy-index.t_data-v2??=?sy-index?+?1.elseif?sy-index??7.t_data-key?=?B.t_data-v1??=?sy-index.t_data-v2??=?sy-index?-?1.else.t_data-key?=?C.t_data-v1??=?sy-index?-?1.t_data-v2??=?sy-index?-?2.endif.append?t_data.enddo.*----------------------------------------------------------------------**???process?interal?table*???处理内表（统计）*----------------------------------------------------------------------*loop?at?t_data.collect?t_data?into?t_test.?????????按关键列统计值endloop.*----------------------------------------------------------------------**??output?internal?tables*??打印输出内表*-----------------------------------------------