[AFF] More detailed error msg (#5709)

This commit is contained in:
Albert Mink 2022-08-04 13:28:33 +02:00 committed by GitHub
parent 2e879323c3
commit bef09c48cb
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -80,7 +80,7 @@ CLASS ZCL_ABAPGIT_OBJECT_COMMON_AFF IMPLEMENTATION.
LOOP AT <ls_messages> ASSIGNING <ls_message>. LOOP AT <ls_messages> ASSIGNING <ls_message>.
ASSIGN COMPONENT 'MESSAGE' OF STRUCTURE <ls_message> TO <ls_msg>. ASSIGN COMPONENT 'MESSAGE' OF STRUCTURE <ls_message> TO <ls_msg>.
CHECK <ls_msg>-msgty = 'E'. IF <ls_msg>-msgty = 'E'.
zcx_abapgit_exception=>raise_t100( zcx_abapgit_exception=>raise_t100(
iv_msgid = <ls_msg>-msgid iv_msgid = <ls_msg>-msgid
iv_msgno = <ls_msg>-msgno iv_msgno = <ls_msg>-msgno
@ -88,6 +88,7 @@ CLASS ZCL_ABAPGIT_OBJECT_COMMON_AFF IMPLEMENTATION.
iv_msgv2 = <ls_msg>-msgv2 iv_msgv2 = <ls_msg>-msgv2
iv_msgv3 = <ls_msg>-msgv3 iv_msgv3 = <ls_msg>-msgv3
iv_msgv4 = <ls_msg>-msgv4 ). iv_msgv4 = <ls_msg>-msgv4 ).
ENDIF.
ENDLOOP. ENDLOOP.
CALL FUNCTION 'TR_TADIR_INTERFACE' CALL FUNCTION 'TR_TADIR_INTERFACE'
@ -138,7 +139,8 @@ CLASS ZCL_ABAPGIT_OBJECT_COMMON_AFF IMPLEMENTATION.
<ls_messages> TYPE ANY TABLE, <ls_messages> TYPE ANY TABLE,
<ls_message> TYPE any, <ls_message> TYPE any,
<ls_text> TYPE any, <ls_text> TYPE any,
<ls_type> TYPE any. <ls_type> TYPE any,
<ls_msg> TYPE symsg.
lv_json_as_xstring = zif_abapgit_object~mo_files->read_raw( iv_ext = 'json' ). lv_json_as_xstring = zif_abapgit_object~mo_files->read_raw( iv_ext = 'json' ).
@ -218,12 +220,23 @@ CLASS ZCL_ABAPGIT_OBJECT_COMMON_AFF IMPLEMENTATION.
messages = <ls_messages>. messages = <ls_messages>.
LOOP AT <ls_messages> ASSIGNING <ls_message>. LOOP AT <ls_messages> ASSIGNING <ls_message>.
ASSIGN COMPONENT 'MESSAGE' OF STRUCTURE <ls_message> TO <ls_msg>.
ASSIGN COMPONENT 'TEXT' OF STRUCTURE <ls_message> TO <ls_text>. ASSIGN COMPONENT 'TEXT' OF STRUCTURE <ls_message> TO <ls_text>.
ASSIGN COMPONENT 'TYPE' OF STRUCTURE <ls_message> TO <ls_type>. ASSIGN COMPONENT 'TYPE' OF STRUCTURE <ls_message> TO <ls_type>.
ii_log->add( ii_log->add(
iv_msg = <ls_text> iv_msg = <ls_text>
iv_type = <ls_type> iv_type = <ls_type>
is_item = ms_item ). is_item = ms_item ).
IF <ls_msg>-msgty = 'E'.
zcx_abapgit_exception=>raise_t100(
iv_msgid = <ls_msg>-msgid
iv_msgno = <ls_msg>-msgno
iv_msgv1 = <ls_msg>-msgv1
iv_msgv2 = <ls_msg>-msgv2
iv_msgv3 = <ls_msg>-msgv3
iv_msgv4 = <ls_msg>-msgv4 ).
ENDIF.
ENDLOOP. ENDLOOP.
tadir_insert( ms_item-devclass ). tadir_insert( ms_item-devclass ).
@ -400,7 +413,7 @@ CLASS ZCL_ABAPGIT_OBJECT_COMMON_AFF IMPLEMENTATION.
LOOP AT <ls_messages> ASSIGNING <ls_message>. LOOP AT <ls_messages> ASSIGNING <ls_message>.
ASSIGN COMPONENT 'MESSAGE' OF STRUCTURE <ls_message> TO <ls_msg>. ASSIGN COMPONENT 'MESSAGE' OF STRUCTURE <ls_message> TO <ls_msg>.
CHECK <ls_msg>-msgty = 'E'. IF <ls_msg>-msgty = 'E'.
zcx_abapgit_exception=>raise_t100( zcx_abapgit_exception=>raise_t100(
iv_msgid = <ls_msg>-msgid iv_msgid = <ls_msg>-msgid
iv_msgno = <ls_msg>-msgno iv_msgno = <ls_msg>-msgno
@ -408,6 +421,7 @@ CLASS ZCL_ABAPGIT_OBJECT_COMMON_AFF IMPLEMENTATION.
iv_msgv2 = <ls_msg>-msgv2 iv_msgv2 = <ls_msg>-msgv2
iv_msgv3 = <ls_msg>-msgv3 iv_msgv3 = <ls_msg>-msgv3
iv_msgv4 = <ls_msg>-msgv4 ). iv_msgv4 = <ls_msg>-msgv4 ).
ENDIF.
ENDLOOP. ENDLOOP.
CALL METHOD lo_files_container->('IF_AFF_FILES_CONTAINER~GET_FILE') CALL METHOD lo_files_container->('IF_AFF_FILES_CONTAINER~GET_FILE')