您的位置: 首页  >  文章  >  DELETE ADJACENT DUPLICATES FROM语句的深入研究及应用

DELETE ADJACENT DUPLICATES FROM语句的深入研究及应用

分类: 文章 • 2025-05-31 14:55:28
DELETE ADJACENT DUPLICATES FROM 语句，我们知道他的基本功能是：删除相邻行的重复数据。
但是他最终保留哪一行数据呢？

下面看看一个Demo：
  1. DATA : BEGIN OF itab OCCURS 0,
  2.          vbeln   TYPE lips-vbeln,
  3.          version TYPE c LENGTH 2,
  4.        END OF itab.

  6. itab-vbeln = '0084000010'.
  7. itab-version = '1'.
  8. APPEND itab.
  9. itab-vbeln = '0084000010'.
  10. itab-version = '2'.
  11. APPEND itab.
  12. itab-vbeln = '0084000010'.
  13. itab-version = '3'.
  14. APPEND itab.

  16. itab-vbeln = '0084000011'.
  17. itab-version = '2'.
  18. APPEND itab.
  19. itab-vbeln = '0084000011'.
  20. itab-version = '3'.
  21. APPEND itab.
  22. itab-vbeln = '0084000009'.
  23. itab-version = '2'.
  24. APPEND itab.
  25. itab-vbeln = '0084000009'.
  26. itab-version = '1'.
  27. APPEND itab.

  29. WRITE:/ '原始数据：'.
  30. LOOP AT itab.
  31.   WRITE: / itab-vbeln,itab-version.
  32. ENDLOOP.

  34. SORT itab BY vbeln ASCENDING version DESCENDING.
  35. WRITE:/ '排序数据：'.
  36. LOOP AT itab.
  37.   WRITE: / itab-vbeln,itab-version.
  38. ENDLOOP.

  40. DELETE ADJACENT DUPLICATES FROM itab COMPARING vbeln.
  41. WRITE:/ '排序数据：'.
  42. LOOP AT itab.
  43.   WRITE: / itab-vbeln,itab-version.
  44. ENDLOOP.
复制代码

测试结果：
DELETE ADJACENT DUPLICATES FROM语句的深入研究及应用 
可见DELETE ADJACENT DUPLICATES FROM只保留相邻重复行的第一行数据，大家也可以测试测试其他场景验证。

实战中用法举例：

主数据下发：一种主数据下发，可能有多个版本号，我们只保留版本号最大的一条数据，作为最新数据。用这种方法最简单啦

相关推荐