| ABAP基础知识 内表汇总数据的方式 | 您所在的位置：网站首页 › 合计汇总表 › ABAP基础知识 内表汇总数据的方式 |
ABAP基础知识 内表汇总数据的方式
|
点击蓝字 关注我们 一 前言 新开一个专题: ABAP基础知识. 用于介绍一些ABAP中的基础知识.希望可以帮助到一些新学ABAP的朋友. 本文主要介绍ABAP中使用内表统计的几种方式 二 四种统计方式 内表统计执行数据统计大致有下述几种方式, 这些方式本身没有优劣差异,根据实际情况选择一种使用就好. COLLECT 语句实现 AT NEW 语句实现 LOOP AT GROUP 语句实现 READ 哈希表语句实现. SELECT SUM 也能汇总内表 三 数据准备 如图: 给出了内表定义及示例数据. 目标:原内表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() 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 . ENDIF. IF IS ASSIGNED. -menge = -menge + lw_data-menge. -werks = lw_data-werks. "使用最后一行地点放到汇总表. ENDIF. ENDLOOP.九 总结 上述给出的四种常用的内表统计的方式.其中方式三的性能稍差,其它性能差不多. 实际应用中根据实际情况确定使用一种方式即可. 实际应用中,方式四使用更灵活. 方式一最简单,但是对汇总表结构要求较高. THE END 约定 如果你对这篇文章感兴趣,请帮忙点赞,在看,分享. (如果你真的喜欢这篇文章,请记得回来打个赏,作为支持我继续下去的动力,这是一个正反馈过程. 越多的人打赏,作者越有动力分享,读者就能享受更多的福利.毕竟打赏的金额富不了我,穷不了你,却能支持这个公众号长久发文.)
公众号 : syjf1976_abap ABAP开发技巧 微信号 : 392077 公众号主群加入受限, 请扫码加入副群后,向管理员申请加入主群
|
【本文地址】