abap中collect的使用
2018-01-23 09:16
204 查看
我们都知道collect语句,主要用于报表数据的合并计算的,简单理解是:如果非数据字段值相等,那么数值字段值相加,其实这种描述不准确。
COLLECT 简单的用法:
LOOP AT t_data.
COLLECT t_data INTO t_test.
ENDLOOP .
复制代码
其中 t_data和t_test结构相同,那么有以下疑问:
COLLECT实际运用中loop的内表(t_data)需要排序么?
loop语句中能不能用if或者delete语句,筛选部分数据,然后collect计算呢
1、问题一:
*----------------------------------------------------------------------*
* 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_data_1 LIKE w_test OCCURS 0 WITH HEADER LINE .
DATA : t_test LIKE w_test OCCURS 0 WITH HEADER LINE .
*----------------------------------------------------------------------*
* assign value to internal tables
* 给内表赋值用于测试
*----------------------------------------------------------------------*
DO 8 TIMES .
IF sy-index < 3 .
t_data-key = 'A' .
t_data-v1 = sy-index .
t_data-v2 = sy-index + 1 .
ELSEIF sy-index < 6 .
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 .
t_data_1[] = t_data[].
DO 2 TIMES .
APPEND LINES OF t_data_1 TO t_data.
ENDDO .
*----------------------------------------------------------------------*
* process interal table
* 处理内表(统计)
*----------------------------------------------------------------------*
LOOP AT t_data.
COLLECT t_data INTO t_test. "按关键列统计值
ENDLOOP .
*----------------------------------------------------------------------*
* output internal tables
* 打印输出内表
*----------------------------------------------------------------------*
WRITE : sy-uline .
WRITE : '内表数据:' .
LOOP AT t_data.
WRITE : / ' ' ,t_data-key ,t_data-v1, t_data-v2.
ENDLOOP .
WRITE : sy-uline .
WRITE : sy-uline .
WRITE : 'collect后的数据:' .
LOOP AT t_test.
WRITE : / ' ' ,t_test-key , t_test-v1, t_test-v2.
ENDLOOP .
WRITE : sy-uline .
复制代码
测试结果:
结论:COLLECT实际运用中loop的内表不需要排序,直接loop累加计算。
2、问题二:
以collect代码稍加改变:
LOOP AT t_data.
IF t_data-v1 = 2 OR t_data-v1 = 4 OR t_data-v1 = 5.
COLLECT t_data INTO t_test. "按关键列统计值
ELSE.
DELETE t_data.
ENDIF.
ENDLOOP .
复制代码
测试结果:
结论:COllECT语句支持这种在loop语句中筛选数据再计算。
由此可见,COLLECT语句还是很强大的,项目中经常会有这种筛选数据在计算,不需要再额外复制内表计算了
你在实际项目中可能使用collect是遇到下面问题:
'You can only use the collect command in a table if all of its non-keyfields are numeric(type I,P or F)
复制代码
只有在 COLLECT 命令的所有非关键字段均为数字(类型 I、P 或F)时才可在表中使用该命令。numeric (type I, P, or F)
使用collect就要求所有的非key fields均是I,P或者F数据类型,另外要注意的是对于standard table 而言,如果不指定key fields那么它的key fields就那些非I, P,F数据类型的fields,sorted
table 和 hash table均必须指定key fields。
注意:货币类型CURR实际类型是P,所以也可以使用collect累加
COLLECT 简单的用法:
LOOP AT t_data.
COLLECT t_data INTO t_test.
ENDLOOP .
复制代码
其中 t_data和t_test结构相同,那么有以下疑问:
COLLECT实际运用中loop的内表(t_data)需要排序么?
loop语句中能不能用if或者delete语句,筛选部分数据,然后collect计算呢
1、问题一:
*----------------------------------------------------------------------*
* 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_data_1 LIKE w_test OCCURS 0 WITH HEADER LINE .
DATA : t_test LIKE w_test OCCURS 0 WITH HEADER LINE .
*----------------------------------------------------------------------*
* assign value to internal tables
* 给内表赋值用于测试
*----------------------------------------------------------------------*
DO 8 TIMES .
IF sy-index < 3 .
t_data-key = 'A' .
t_data-v1 = sy-index .
t_data-v2 = sy-index + 1 .
ELSEIF sy-index < 6 .
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 .
t_data_1[] = t_data[].
DO 2 TIMES .
APPEND LINES OF t_data_1 TO t_data.
ENDDO .
*----------------------------------------------------------------------*
* process interal table
* 处理内表(统计)
*----------------------------------------------------------------------*
LOOP AT t_data.
COLLECT t_data INTO t_test. "按关键列统计值
ENDLOOP .
*----------------------------------------------------------------------*
* output internal tables
* 打印输出内表
*----------------------------------------------------------------------*
WRITE : sy-uline .
WRITE : '内表数据:' .
LOOP AT t_data.
WRITE : / ' ' ,t_data-key ,t_data-v1, t_data-v2.
ENDLOOP .
WRITE : sy-uline .
WRITE : sy-uline .
WRITE : 'collect后的数据:' .
LOOP AT t_test.
WRITE : / ' ' ,t_test-key , t_test-v1, t_test-v2.
ENDLOOP .
WRITE : sy-uline .
复制代码
测试结果:
结论:COLLECT实际运用中loop的内表不需要排序,直接loop累加计算。
2、问题二:
以collect代码稍加改变:
LOOP AT t_data.
IF t_data-v1 = 2 OR t_data-v1 = 4 OR t_data-v1 = 5.
COLLECT t_data INTO t_test. "按关键列统计值
ELSE.
DELETE t_data.
ENDIF.
ENDLOOP .
复制代码
测试结果:
结论:COllECT语句支持这种在loop语句中筛选数据再计算。
由此可见,COLLECT语句还是很强大的,项目中经常会有这种筛选数据在计算,不需要再额外复制内表计算了
你在实际项目中可能使用collect是遇到下面问题:
'You can only use the collect command in a table if all of its non-keyfields are numeric(type I,P or F)
复制代码
只有在 COLLECT 命令的所有非关键字段均为数字(类型 I、P 或F)时才可在表中使用该命令。numeric (type I, P, or F)
使用collect就要求所有的非key fields均是I,P或者F数据类型,另外要注意的是对于standard table 而言,如果不指定key fields那么它的key fields就那些非I, P,F数据类型的fields,sorted
table 和 hash table均必须指定key fields。
注意:货币类型CURR实际类型是P,所以也可以使用collect累加
相关文章推荐
- 实例:ABAP Tree Control 使用与ALV Grid对象关联
- 使用Java+SAP云平台+SAP Cloud Connector调用ABAP On-Premise系统里的函数
- ABAP--通过LDB_PROCESS函数使用逻辑数据库
- ABAP--关于Data Reference的使用
- ABAP—COLLECT的用法
- 如何查找Authorization object在哪些ABAP代码里使用到
- 【ABAP】在ALV 使用On_F4的事件例程
- ABAP--原生SQL接口API(ADBC)的使用
- ABAP游标的使用
- SAP ABAP 性能优化技巧 — 正确使用”move” 语句
- ABAP中COLLECT的用法
- 为什么ABAP开发者需要使用面向对象技术?
- ABAP中使用for all entries in小结
- ABAP--如何在'REUSE_ALV_GRID_DISPLAY'使用自定义F4帮助,返回多个字段以及计算修改其他字段
- ABAP:在Dynpro屏幕中使用Selection Screen
- ABAP: AT ... ENDAT的使用
- ABAP--如何使用CL_SALV_TABLE 的代码样例(2004以后版本)
- 使用abap向数据库直接写入数据
- 使用ABAP Push Channel(APC)开发的乒乓球游戏,可双打
- ABAP 使用向导创建TABLE CONTROL (TC 表控件)