Код для сбора ошибки:
Включаем обработчик в dtp:
data :
l_error type abap_bool value abap_false ,
l_error_text like table of monitor_rec -msgv1 initial size 4,
l_error type abap_bool value abap_false ,
l_error_text like table of monitor_rec -msgv1 initial size 4,
l_error_str type string .
l_error_text = value # (
( |Не заполнен Материал : | )
( |BAL_ACC = { SOURCE_FIELDS - BAL_ACC }| )
).
monitor_rec = value #(
msgid = 'RSRMON'
msgty = 'E'
msgno = '000'
msgv1 = l_error_text[ 1 ]
msgv2 = l_error_text[ 2 ]
).
append monitor_rec to MONITOR .
* call function 'SOTR_SERV_TABLE_TO_STRING'
* importing
* text = l_error_str
* tables
* text_tab = l_error_text
* .
* write / l_error_str.
( |Не заполнен Материал : | )
( |BAL_ACC = { SOURCE_FIELDS - BAL_ACC }| )
).
monitor_rec = value #(
msgid = 'RSRMON'
msgty = 'E'
msgno = '000'
msgv1 = l_error_text[ 1 ]
msgv2 = l_error_text[ 2 ]
).
append monitor_rec to MONITOR .
* call function 'SOTR_SERV_TABLE_TO_STRING'
* importing
* text = l_error_str
* tables
* text_tab = l_error_text
* .
* write / l_error_str.
l_error = abap_true .
if l_error = abap_true .
"Обнаружены ошибки в данных.
raise exception type CX_RSROUT_SKIP_RECORD .
"Обнаружены ошибки в данных.
raise exception type CX_RSROUT_SKIP_RECORD .
endif .
Включаем обработчик в dtp:
Комментариев нет:
Отправить комментарий