点击蓝字 关注我们
一
前言
新开一个专题: ABAP基础知识. 用于介绍一些ABAP中的基础知识.希望可以帮助到一些新学ABAP的朋友.
本文主要介绍ABAP中使用内表统计的几种方式
二
四种统计方式
内表统计执行数据统计大致有下述几种方式, 这些方式本身没有优劣差异,根据实际情况选择一种使用就好.
-
COLLECT 语句实现
-
AT NEW 语句实现
-
LOOP AT GROUP 语句实现
-
READ 哈希表语句实现
三
数据准备
如图: 给出了内表定义及示例数据.
目标:原内表LT_DATA 结果按字段MATNR统计到内表LT_SUM中. 统计表中的WERKS 字留空或者保留第一行或最后一行的内容
四
COLLECT 语句实现
该语句的局限性: 目标内表中所有字段区分为关键字和指标(数字型).系统底层会是所有关键字创建临时哈希表,解决汇总的性能问题该方式另外的局限是: 不参与统计的字段必须清空.
五
AT NEW 语句实现
该语句的局限性: 参与统计的字段必须是内表前面的字段,并且需要先排序.如果统计结果中的地点需要放第一行或最后一行的地点, 可以通过特定逻辑实现.
六
LOOP AT GROUP实现
该语句无需排序,字段无需作为内表前面的字段, 但是性能比AT NEW 方式稍差.且无关字段只能使用第一行的.
备注: 如果统计表有多关键字,多关键字并列呈现即可
( MATNR = LW_GP-MATNR WERKS = LW_GP-WERKS ).
七
READ哈希表实现
需要定义一个哈希内表.循环内表读取哈希表.
*&---------------------------------------------------------------------**& Report ZTS_ITAB_SUM*&---------------------------------------------------------------------**&测试内表统计的几种方式*&---------------------------------------------------------------------*REPORT zts_itab_sum.DATA: BEGIN OF lw_data,matnr TYPE matnr,werks TYPE werks_d,menge TYPE menge_d,END OF lw_data.DATA: lt_data LIKE TABLE OF lw_data.DATA: BEGIN OF lw_sum,matnr TYPE matnr,werks TYPE werks_d,menge TYPE menge_d,END OF lw_sum.DATA: lt_sum LIKE TABLE OF lw_sum.START-OF-SELECTION.*准备数据lt_data = VALUE #(( matnr = 'M1' werks = 'W1' menge = 10 )( matnr = 'M2' werks = 'W1' menge = 20 )( matnr = 'M1' werks = 'W2' menge = 30 )( matnr = 'M2' werks = 'W2' menge = 40 )).*方式一:通过COLLECT 语句汇总.**该语句的局限性: 目标内表中所有字段区分未关键字和指标(数字型).系统底层会创建临时哈希表,解决汇总的性能问题**该方式另外的局限是: 不参与统计的字段必须清空.REFRESH lt_sum.LOOP AT lt_data INTO lw_data.CLEAR lw_sum.lw_sum-matnr = lw_data-matnr.lw_sum-werks = ''. "不能附加第一行或最后一行地点lw_sum-menge = lw_data-menge.COLLECT lw_sum INTO lt_sum.ENDLOOP.*方式二: 通过AT NEW 语句实现**该语句的局限性: 参与统计的字段必须是内表前面的字段,并且需要实现排序*如果统计结果中的地点需要放第一行或最后一行的地点, 可以通过特定逻辑实现DATA: lw_data_help LIKE lw_data.REFRESH lt_sum.SORT lt_data BY matnr werks.LOOP AT lt_data INTO lw_data.lw_data_help = lw_data.AT NEW matnr.CLEAR lw_sum.lw_sum-matnr = lw_data-matnr.lw_sum-werks = lw_data_help-werks. "使用第一个地点放到统计表中ENDAT.lw_sum-menge = lw_sum-menge + lw_data-menge.AT END OF matnr.lw_sum-werks = lw_data_help-werks. "使用最后一个地点放到统计表中APPEND lw_sum TO lt_sum.ENDAT.ENDLOOP.*方式三: 通过LOOP AT GROUP 实现*该语句无需排序,字段无需作为内表前面的字段, 但是性能比AT NEW 方式差.且无关字段只能使用第一行的* LOOP AT LT_DATA INTO DATA(LW_GP) GROUP BY ( MATNR = LW_GP-MATNR WERKS = LW_GP-WERKS ). "多关键字情况REFRESH lt_sum.LOOP AT lt_data INTO DATA(lw_gp) GROUP BY ( matnr = lw_gp-matnr ).CLEAR lw_sum.lw_sum-matnr = lw_gp-matnr.lw_sum-werks = lw_gp-werks. "只能使用第一个地点放到统计表中LOOP AT GROUP lw_gp INTO lw_data.lw_sum-menge = lw_sum-menge + lw_data-menge.ENDLOOP.APPEND lw_sum TO lt_sum.ENDLOOP.*方式四: 通过READ 哈希表实现DATA: lt_sum_hs LIKE HASHED TABLE OF lw_sum WITH UNIQUE KEY matnr .refresh lt_sum_hs.LOOP AT lt_data INTO lw_data.READ TABLE lt_sum_hs ASSIGNING FIELD-SYMBOL(<fs_sum>) WITH TABLE KEY matnr = lw_data-matnr.IF sy-subrc <> 0.CLEAR lw_sum.lw_sum-matnr = lw_data-matnr.lw_sum-werks = lw_data-werks. "使用第一行地点放到汇总表中INSERT lw_sum INTO TABLE lt_sum_hs ASSIGNING <fs_sum>.ENDIF.IF <fs_sum> IS ASSIGNED.<fs_sum>-menge = <fs_sum>-menge + lw_data-menge.<fs_sum>-werks = lw_data-werks. "使用最后一行地点放到汇总表.ENDIF.ENDLOOP.
九
总结
上述给出的四种常用的内表统计的方式.其中方式三的性能稍差,其它性能差不多. 实际应用中根据实际情况确定使用一种方式即可.
实际应用中,方式四使用更灵活. 方式一最简单,但是对汇总表结构要求较高.
THE
END
网友评论