Заполнения пустых полей в таблице с закодированным текстом в соке ABAP

Question

У меня есть следующий код, который делает то, что я хочу, чтобы это сделать, но я хочу, чтобы добавить дополнительный код, чтобы любая пустая запись для полех exit_prnt_layout и exit_web_layout в таблице hrp5021 заполнен с текстом СТАНДАРТ. Я знаю, как извлекать данные из таблиц, но я изо всех сил пытаюсь понять, как добавить эту функциональность. Я очень новичок в абапе, и помощь приветствуется.

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. 

Answer 1

ОТКАЗ

Это почти никогда не хорошая идея, чтобы обновить стандартную таблицу SAP напрямую. Если вы новичок в SAP, вы можете удалить «почти» из этого утверждения.

Поэтому, хотя я отвечу на ваш вопрос, я настоятельно рекомендую вам попробовать найти утвержденный SAP способ обновления необходимых полей с помощью BDC, BAPI или выпущенного функционального модуля.

Следующий код будет обновить все записи, где exit_prnt_layout является пустым:

update hrp5021 set exit_prnt_layout = 'STANDARD' 
    where exit_prnt_layout = space. 

write:/ sy-dbcnt ' entries updated'. 

И то же самое для exit_web_layout:

update hrp5021 set exit_web_layout = 'STANDARD' 
    where exit_web_layout = space. 

write:/ sy-dbcnt ' entries updated'. 

Answer 2

Пожалуйста, добавьте «совершить работу», после обновления успешного, так что незавершенные транзакции в Вашем LUW получить физически приверженны дб на DBMS.