首页 > 解决方案 > 在文档中的间隙之间生成数字

问题描述

如果有差距,我需要一些帮助来检查 A 列的每个索引的值。

READ TABLE ZVBELNEXTTAB INDEX x.
curr = ZVBELNEXTTAB-EVBELN.
READ TABLE ZVBELNEXTTAB INDEX y.
next = ZVBELNEXTTAB-EVBELN.
chck = next - curr.

IF chck GT 1.

chck = chck - 1.
DO chck TIMES.
  ZVBELNEXTTAB-EVBELN = curr + 1.
  ZVBELNEXTTAB-BUKRS = ''.
  ZVBELNEXTTAB-WERKS = ''.
  ZVBELNEXTTAB-VBELN = ''.
  ZVBELNEXTTAB-FKDAT = ''.
  ZVBELNEXTTAB-VBLSTAT = ''.
  ZVBELNEXTTAB-ZPRN = ''.
  ZVBELNEXTTAB-UNAME = ''.
  ZVBELNEXTTAB-TYPE = ''.
  ZVBELNEXTTAB-MANDT = ''.
  APPEND ZVBELNEXTTAB.
  SORT ZVBELNEXTTAB BY evbeln.
ENDDO.

ENDIF.

在此处输入图像描述

在此处输入图像描述

因为 SAP ABAP 不支持使用数组的概念。我想对整个列数据执行此操作。

谢谢!

标签: abapinternal-tables

解决方案


获取原始内部表的副本zvbelnexttab并在复制内部表处循环zvbelnexttab_copy。之后更新原始内部表-

DATA : lv_tab    TYPE sytabix.

LOOP AT zvbelnexttab_copy.

  curr = zvbelnexttab_copy-evbeln.  
  lv_tab = sy-tabix + 1.

  READ TABLE zvbelnexttab_copy INDEX lv_tab.
  next = zvbelnexttab_copy-evbeln.
  .....
  .....
  .....

ENDLOOP.

推荐阅读