是否从另一个itab更新itab？

Question

如果选中了“LOCK”复选框，我的程序就会简单地对用户进行锁定。

一切正常，用户记录在USR02中更新。当这种变化发生时，我希望它也反映在IT_USR02中，即DB表USR02和itab it_usr02应该是相同的。

SELECT-OPTIONS: USER_ID FOR USR02-BNAME.
  START-OF-SELECTION.
  SELECT BNAME
         USTYP
         UFLAG
  FROM USR02
  INTO TABLE IT_USR02
  WHERE BNAME IN USER_ID.

  LOOP AT IT_USR02 INTO ST_USR02.
      IF LOCK = 'X'.
        CALL FUNCTION 'BAPI_USER_LOCK'
          EXPORTING
            USERNAME = ST_USR02-BNAME
          TABLES
            RETURN   = I_BAPI_RETURN.

        MOVE-CORRESPONDING IT_USR02[] TO IT_ZATO_LOCK_UNLOCK[].
        MODIFY ZATO_LOCK_UNLOCK FROM TABLE IT_ZATO_LOCK_UNLOCK.

      ENDIF.
  ENDLOOP.

从本质上讲，在调用BAPI_USER_LOCK函数之后，我也希望在IT_USR02表中进行该更改。从那里，我将IT_USR02的内容复制到我的定制表ZATO_LOCK_UNLOCK中。

这里的一切似乎都很好，我只是想不出如何更新我的内部表。任何帮助都将不胜感激。

Answer 1

如果我正确地理解了你的问题，那么你需要的就是这样的东西：

LOOP AT IT_USR02 ASSIGNING FIELD-SYMBOL(<USR02>).
  " Using field symbol for performance and so the entry can be changed

  IF LOCK = 'X'.
    CALL FUNCTION 'BAPI_USER_LOCK'
      EXPORTING
        USERNAME = ST_USR02-BNAME
      TABLES
        RETURN   = I_BAPI_RETURN.
    IF "All is OK in I_BAPI_RETURN
      " Change the table entry
      <USR02>-UFLAG = 32. " Not sure if this is the right value
    ENDIF.
  ENDIF.
ENDLOOP.
" This needs to be outside the loop since you are handling the complete table
MOVE-CORRESPONDING IT_USR02[] TO IT_ZATO_LOCK_UNLOCK[].
MODIFY ZATO_LOCK_UNLOCK FROM TABLE IT_ZATO_LOCK_UNLOCK.
" A commit work might be needed here

请注意，您仍然需要对条件进行编码，以检查BAPI调用是否一切正常。我不熟悉BAPI，所以不知道是否没有条目是好消息，或者您是否需要检查返回的表中是否有任何错误。