ABAP高效率批量修改内表的数据-白红宇

ABAP高效率批量修改内表的数据

阅读量：2035 次

发布时间：2019-04-28

本文共 1488 字，大约阅读时间需要 4 分钟。

DATA : BEGIN OF hah,

flag TYPE c,

sex TYPE c,

END OF hah.

DATA it_hah like TABLE OF hah.

CLEAR hah.

hah-flag = 'X'.

hah-sex = 'f'.

APPEND hah to it_hah.

CLEAR hah.

hah-sex = 'm'.

APPEND hah to it_hah.

CLEAR hah.

hah-sex = 'm'.

APPEND hah to it_hah.

CLEAR hah.

hah-sex = 'm'.

APPEND hah to it_hah.

LOOP AT it_hah INTO hah.

WRITE :/ hah-flag,' ',hah-sex.

ENDLOOP.

这个结果是：

ABAP高效率批量修改内表的数据 - 孤独的神 - 孤独的神

现在，我要把凡是flag没有值的，都赋值为'x’，

第一种办法：

DATA : BEGIN OF hah,
        flag TYPE c,
        sex TYPE c,
       END OF hah.
DATA it_hah like TABLE OF hah.
CLEAR hah.
hah-flag = 'X'.
hah-sex = 'f'.
APPEND hah to  it_hah.
CLEAR hah.
hah-sex = 'm'.
APPEND hah to  it_hah.
CLEAR hah.
hah-sex = 'm'.
APPEND hah to  it_hah.
CLEAR hah.
hah-sex = 'm'.
APPEND hah to  it_hah.

*****************这里**************
LOOP AT it_hah INTO hah.
  IF hah-flag is INITIAL.
    hah-flag = 'x'.
  ENDIF.
  MODIFY it_hah FROM hah.
ENDLOOP.

************************************

LOOP AT it_hah INTO hah.
WRITE :/ hah-flag,' ',hah-sex.
ENDLOOP.

这种办法效率不够高，采用第二种办法的话，效率会高一点：

hah-flag = 'x'.
MODIFY it_hah FROM hah TRANSPORTING flag WHERE flag is INITIAL.

****************************
LOOP AT it_hah INTO hah.
WRITE :/ hah-flag,' ',hah-sex.
ENDLOOP.

明显第二种效率会高于第一种。

转载地址：http://tmqaf.baihongyu.com/

你可能感兴趣的文章