私がやりたいことを行う以下のコードがありますが、テーブルhrp5021のフィールドexit_prnt_layoutおよびexit_web_layoutの空白レコードがテキストSTANDARDで埋められるように追加のコードを追加したいと思います。テーブルからデータを抽出する方法は知っていますが、この機能を追加する方法を理解するのに苦労しています。私はabapに非常に慣れていないので、助けていただければ幸いです。
TABLES: hrp5021.
DATA: hrp5021_wa TYPE hrp5021.
PARAMETERS: objid LIKE hrp5021-objid.
END-OF-SELECTION.
SELECT SINGLE * FROM hrp5021 INTO hrp5021_wa
WHERE plvar = '01'
AND otype = 'VA'
AND objid = objid
AND istat = '4'
AND exit_prnt_layout = 'STANDARD'.
IF sy-subrc = 0.
hrp5021_wa-exit_prnt_layout = 'SMARTFORM'.
UPDATE hrp5021 FROM hrp5021_wa.
WRITE:/ 'VA', objid, 'was changed to Smartform'.
ELSE.
WRITE:/ 'No entry for conversion found'.
ENDIF.