LOOP AT ITAB GROUP BY 多重维度去重数据

最新推荐文章于 2023-09-07 10:53:26 发布
最新推荐文章于 2023-09-07 10:53:26 发布
阅读量415 收藏
点赞数
分类专栏： ABAP 文章标签： bash 开发语言
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/Flauve/article/details/121214394
版权

数据去重 编程 多维度 重复项 条件去重
关键词由CSDN通过智能技术生成

因为最近有个需求要用到多重去重的功能，之前考虑过其他的办法。都过于复杂，经朋友提醒一下，想到了这个简单一些的办法。
话不多说，直接上代码操作，更简洁意懂。

第一种去重方法。

先做个申明

TYPES: BEGIN OF ty_data,
         matnr TYPE mara-matnr,
         mtart TYPE mara-mtart,
         matkl TYPE mara-matkl,
         text1 TYPE char50,
       END OF ty_data.
DATA lt_data TYPE TABLE OF ty_data.
DATA lt_table TYPE TABLE OF ty_data.

再造点数据进去

lt_data = VALUE #( ( matnr = 'Material-001'
                     mtart = 'FOOD'
                     matkl = '1020'
                     text1 = 'FIRST' )
                   ( matnr = 'Material-002'
                     mtart = 'WATR'
                     matkl = '1030'
                     text1 = 'SECOND' )
                   ( matnr = 'Material-003'
                     mtart = 'WATR'
                     matkl = '1020'
                     text1 = 'THIRD' )
                     ( matnr = 'Material-004'
                     mtart = 'WATR'
                     matkl = '1020'
                     text1 = 'FOURTH' )
                     ( matnr = 'Material-005'
                     mtart = 'WATR'
                     matkl = '1020'
                     text1 = 'FIFTH' )
                     ( matnr = 'Material-006'
                     mtart = 'WATR'
                     matkl = '1020'
                     text1 = 'SIXTH' )
                     ( matnr = 'Material-007'
                     mtart = 'WATR'
                     matkl = '1020'
                     text1 = 'SEVENTH' )
                     ( matnr = 'Material-008'
                     mtart = 'WATR'
                     matkl = '1030'
                     text1 = 'EIGHTH' )
                     ( matnr = 'Material-009'
                     mtart = 'WATR'
                     matkl = '1030'
                     text1 = 'NINTH' )
                     ( matnr = 'Material-010'
                     mtart = 'WATR'
                     matkl = ''
                     text1 = 'TENTH' )
                     ( matnr = 'Material-011'
                     mtart = 'WATR'
                     matkl = ''
                     text1 = 'ELEVENTH' )
                     ( matnr = 'Material-012'
                     mtart = 'WATR'
                     matkl = ''
                     text1 = 'TWELFTH' ) ).

SORT lt_data BY matkl.
DELETE ADJACENT DUPLICATES FROM lt_data COMPARING matkl.

CALL METHOD cl_demo_output=>display( lt_data ).

直接删除掉重复项，得到的结果
因为后面的数据，物料组为空，都被排除掉了
这种结果，不是我想要的。
所以要用其他的方法去重。

第二种

还是一样的操作

先做个申明

TYPES: BEGIN OF ty_data,
         matnr TYPE mara-matnr,
         mtart TYPE mara-mtart,
         matkl TYPE mara-matkl,
         text1 TYPE char50,
       END OF ty_data.
DATA lt_data TYPE TABLE OF ty_data.
DATA lt_table TYPE TABLE OF ty_data.
DATA lt_table1 TYPE TABLE OF ty_data.

加了一个操作的内表，再造点数据进去

lt_data = VALUE #( ( matnr = 'Material-001'
                     mtart = 'FOOD'
                     matkl = '1020'
                     text1 = 'FIRST' )
                   ( matnr = 'Material-002'
                     mtart = 'WATR'
                     matkl = '1030'
                     text1 = 'SECOND' )
                   ( matnr = 'Material-003'
                     mtart = 'WATR'
                     matkl = '1020'
                     text1 = 'SECOND' )
                     ( matnr = 'Material-004'
                     mtart = 'WATR'
                     matkl = '1020'
                     text1 = 'SECOND' )
                     ( matnr = 'Material-005'
                     mtart = 'WATR'
                     matkl = '1020'
                     text1 = 'THIRD' )
                     ( matnr = 'Material-006'
                     mtart = 'WATR'
                     matkl = '1020'
                     text1 = 'THIRD' )
                     ( matnr = 'Material-007'
                     mtart = 'WATR'
                     matkl = '1020'
                     text1 = 'THIRD' )
                     ( matnr = 'Material-008'
                     mtart = 'WATR'
                     matkl = '1030'
                     text1 = 'THIRD' )
                     ( matnr = 'Material-009'
                     mtart = 'WATR'
                     matkl = '1030'
                     text1 = 'FOURTH' )
                     ( matnr = 'Material-010'
                     mtart = 'WATR'
                     matkl = ''
                     text1 = 'FOURTH' )
                     ( matnr = 'Material-011'
                     mtart = 'WATR'
                     matkl = ''
                     text1 = 'FOURTH' )
                     ( matnr = 'Material-012'
                     mtart = 'WATR'
                     matkl = ''
                     text1 = 'FOURTH' ) ).

再来去重的代码。

LOOP AT lt_data INTO DATA(lwa_data) GROUP BY lwa_data-matkl INTO DATA(g1).
  IF g1 IS NOT INITIAL.
    lt_table1 = VALUE #( FOR lwa_table1 IN GROUP g1 ( lwa_table1 ) ).
    DELETE ADJACENT DUPLICATES FROM lt_table1 COMPARING matkl.      "第一个维度  物料组相同的去重
  ELSE.
    lt_table1 = VALUE #( FOR lwa_table1 IN GROUP g1 ( lwa_table1 ) ).
  ENDIF.

  LOOP AT lt_table1 INTO DATA(lwa_table).
    APPEND lwa_table TO lt_table.
  ENDLOOP.
ENDLOOP.
CALL METHOD cl_demo_output=>display( lt_table ).

分组去重
注意，数据有了不小的变化了。
因为要考虑到多个维度的去重，第一个维度的重复项已经去重了。
OK。

再来去重第二个维度的重复项。
还是一样的操作

先做个申明

TYPES: BEGIN OF ty_data,
         matnr TYPE mara-matnr,
         mtart TYPE mara-mtart,
         matkl TYPE mara-matkl,
         text1 TYPE char50,
       END OF ty_data.
DATA lt_data TYPE TABLE OF ty_data.
DATA lt_table TYPE TABLE OF ty_data.
DATA lt_table1 TYPE TABLE OF ty_data.

加了一个操作的内表，再造点数据进去

lt_data = VALUE #( ( matnr = 'Material-001'
                     mtart = 'FOOD'
                     matkl = '1020'
                     text1 = 'FIRST' )
                   ( matnr = 'Material-002'
                     mtart = 'WATR'
                     matkl = '1030'
                     text1 = 'SECOND' )
                   ( matnr = 'Material-003'
                     mtart = 'WATR'
                     matkl = '1020'
                     text1 = 'SECOND' )
                     ( matnr = 'Material-004'
                     mtart = 'WATR'
                     matkl = '1020'
                     text1 = 'SECOND' )
                     ( matnr = 'Material-005'
                     mtart = 'WATR'
                     matkl = '1020'
                     text1 = 'THIRD' )
                     ( matnr = 'Material-006'
                     mtart = 'WATR'
                     matkl = '1020'
                     text1 = 'THIRD' )
                     ( matnr = 'Material-007'
                     mtart = 'WATR'
                     matkl = '1020'
                     text1 = 'THIRD' )
                     ( matnr = 'Material-008'
                     mtart = 'WATR'
                     matkl = '1030'
                     text1 = 'THIRD' )
                     ( matnr = 'Material-009'
                     mtart = 'WATR'
                     matkl = '1030'
                     text1 = 'FOURTH' )
                     ( matnr = 'Material-010'
                     mtart = 'WATR'
                     matkl = ''
                     text1 = 'FOURTH' )
                     ( matnr = 'Material-011'
                     mtart = 'WATR'
                     matkl = ''
                     text1 = 'FOURTH' )
                     ( matnr = 'Material-012'
                     mtart = 'WATR'
                     matkl = ''
                     text1 = 'FOURTH' ) ).

再来去重的代码。

LOOP AT lt_data INTO DATA(lwa_data) GROUP BY lwa_data-matkl INTO DATA(g1).
  IF g1 IS NOT INITIAL.
    lt_table1 = VALUE #( FOR lwa_table1 IN GROUP g1 ( lwa_table1 ) ).
    DELETE ADJACENT DUPLICATES FROM lt_table1 COMPARING matkl.      "第一个维度  物料组相同的去重
  ELSE.
    lt_table1 = VALUE #( FOR lwa_table1 IN GROUP g1 ( lwa_table1 ) ).
    DELETE ADJACENT DUPLICATES FROM lt_table1 COMPARING text1.      "第二个维度  文本相同的去重    
  ENDIF.

  LOOP AT lt_table1 INTO DATA(lwa_table).
    APPEND lwa_table TO lt_table.
  ENDLOOP.
ENDLOOP.
CALL METHOD cl_demo_output=>display( lt_table ).

完成，达到我需要的结果了
在这里插入图片描述
多重去重，这种方法应该算是比较简单的了。
如果还有更简单的，欢迎大家一起来研讨一下。

Flauve
关注
  • 0
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
专栏目录
itabis入门实例
12-09
4. **数据驱动测试**：通过数据驱动测试，ITABIS可以使用不同的输入数据执行同一测试用例，提高测试覆盖率。 5. **可扩展性**：ITABIS设计时考虑了模块化和插件机制，允许开发自定义的测试步骤和报告生成器。 在...
itab-chome插件
最新发布
04-03
添加chrome标签页插件，拖进使用
LOOP AT GROUP语法练习
chibei9260的博客
07-11 431
DATA:P_MENGE TYPE EKKO-WKURS. DATA:P_MENGE1 TYPE EKKO-WKURS. SELECT * FROM EKKO INTO TABLE @DATA(LT_EKKO) UP TO 5 ROWS. SORT LT_EKKO BY LIFNR E...
LOOP AT GROUP BY语法练习
SAP ABAP开发技能记录分享
09-09 662
DATA:P_MENGE TYPE EKKO-WKURS. DATA:P_MENGE1 TYPE EKKO-WKURS. SELECT * FROM EKKO INTO TABLE @DATA(LT_EKKO) UP TO 5 ROWS. SORT LT_EKKO BY LIFNR ERNAM. LOOP AT LT_EKKO INTO DATA(LS_EKKO) GROUP BY ( LIFNR = LS_EKKO-LIFNR ERNAM = LS_EKKO-ERNAM )."按括号里的.
LOOP AT GROUP语法熟悉
weixin_30763455的博客
04-18 239
SELECT * FROM EKKO INTO TABLE @DATA(LT_EKKO) UP TO 100 ROWS. SORT LT_EKKO BY LIFNR ERNAM. LOOP AT LT_EKKO INTO DATA(LS_EKKO) GROUP BY LS_EKKO-LIFNR. "多个分组条件 "LOOP AT LT_EKKO INTO D...
LOOP GROUP BY
ki_laikun的博客
12-31 383
TYPES:BEGINOFty_data, idTYPEstring, numTYPEstring, ENDOFty_data. DATA:lv_connidTYPEstring. DATA:lt_resTYPETABLEOFty_data. DATA:ls_resTYPEty_data. SELECT*FROMsflightINTOTABLE@DATA(lt_tb). LOOPATlt...
ABAP新语法 LOOP AT ... GROUP BY ...
谁的博客来着？
09-29 870
ABAP新语法 LOOP AT ... GROUP BY ...
ITAB「iTab」-crx插件
03-23
iTab是一款基于Html5的Chrome浏览器扩展应用。它提供了网站快速拨号、扩展应用快捷访问等功能来增强 Chrome 原生新标签页（New Tab）。 ============================== 版本：1.2.3 更新日期: 2017-04-14 1. 每日...
iTab-crx插件
04-02
iTab是一款基于Html5的Chrome浏览器扩展应用。它提供了网站快速拨号、扩展应用快捷访问等功能来增强 Chrome 原生新标签页（New Tab）。==============================版本：1.2.3 更新日期: 2017-04-141. 每日更新...
iTab - Awesome Tab Manager-crx插件
04-03
语言:English 浏览器的强大功能扩展。...iTab是一款用于浏览器的简单免费的标签管理器，可在标签和窗口之间快速切换。 快捷键Alt + Space在选项卡中打开搜索栏。 搜索结果显示URL和标题与搜索词匹配的所有选项卡。
LOOP GROUP BY 分组循环的使用方法小栗子
寒武青锋的博客
12-17 7044
1.格式： LOOP AT 内表 INTO DATA(工作区) GROUP BY ( 字段 = 工作区-字段 size = GROUP SIZE "分组组数-- index = GROUP INDEX ) "分组的组序号 ASCENDING ASSIGNING FIELD-SYMBOL(<组>). LOOP AT GROUP &
2019.12.05【ABAP随笔】 分组循环(LOOP AT Group) / REDUCE
m0_37461511的博客
12-05 2651
ABAP 7.40新语法 LOOP AT Group 和 REDUCE 1 *LOOP AT itab result [cond] GROUP BY key ( key1 = dobj1 key2 = dobj2 … 2 * [gs = GROUP SIZE] [gi = GROUP INDEX] ) 3 * [ASCENDING|DESCENDING [AS...
阿语Python项目实操之美多后台管理-系统管理之用户组管理7.2.4节删除分组表数据...
zz77244920的博客
05-25 142
删除分组表数据接口分析请求方式：Delte /meiduo_admin/permission/groups/(?P<pk>\d+)/请求参数：通过请求头传递jwt token数...
业务场景2（按某一维度统计总目标金额）group by
zico_a的博客
04-10 238
业务场景2（按某一维度统计总目标金额） select 渠道编号,渠道名,sum(目标金额) from 文件夹.目标金额表名 group by 渠道编号,渠道名 获取结果
LOOP GROUP BY 分组循环的使用方法
woniu_maggie的博客
09-07 688
index = GROUP INDEX ) "分组的组序号"WRITE: / | 组序号: { <group>-index } 角色: { <group>-role WIDTH = 15 }|size = GROUP SIZE "分组组数"index = GROUP INDEX ) "分组的组序号。size = GROUP SIZE "分组组数--LOOP AT GROUP <组> ASSIGNING FIELD-SYMBOL(<指针>)."loop循环组，将组里的数据读出来"
真以为自己懂 Group By 了？
wujiandao的专栏
01-12 672
能一眼看懂这条语句在做什么吗？ SELECT OrderMonth,City,Sum(OrderAmount) AS OrderAmount FROM dbo.FctSalesMonthly GROUP BY Cube(OrderMonth,City) ORDER BY OrderMonth DESC,City 前两天我是真的认认真真在看 MSDN 的文档，我发现我们的开
group by 去重处理数据
qq_38807606的博客
03-22 4199
1. # 需求：结果： # + ----+------+ # | name|boy_id| # + ----+------+ # | A |1 | # | B |2 | # | C |3 | # + ----+------+ # group by 对结果的重复数据去重 select * from girl ; # +--+----+------+ # |id|name|boy_id| # +--+----+------+ # |1 |A |1
group by去重，按条件去重
湫止的博客
12-09 4537
group by去重，按条件去重
loop at 是什么意思
05-17
LOOP AT itab INTO wa [WHERE condition]. " 循环体 ENDLOOP. ``` 其中，`itab` 是内部表的名称，`wa` 是内部表中的一个行元素，`condition` 是可选的一个逻辑表达式，用于过滤内部表中的元素。 `LOOP AT` 会依次...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值