mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-01 12:20:51 +08:00
Add missing Subrc %3D { sy-subrc }
This commit is contained in:
parent
afa63c8f3b
commit
06097f9614
|
@ -307,7 +307,7 @@ CLASS ZCL_ABAPGIT_OBJECTS_PROGRAM IMPLEMENTATION.
|
||||||
OTHERS = 2.
|
OTHERS = 2.
|
||||||
IF sy-subrc <> 0.
|
IF sy-subrc <> 0.
|
||||||
* if moving code from SAPlink, see https://github.com/larshp/abapGit/issues/562
|
* if moving code from SAPlink, see https://github.com/larshp/abapGit/issues/562
|
||||||
zcx_abapgit_exception=>raise( 'error from RS_CUA_INTERNAL_WRITE' ).
|
zcx_abapgit_exception=>raise( |Error from RS_CUA_INTERNAL_WRITE. Subrc = { sy-subrc }| ).
|
||||||
ENDIF.
|
ENDIF.
|
||||||
|
|
||||||
zcl_abapgit_objects_activation=>add(
|
zcl_abapgit_objects_activation=>add(
|
||||||
|
@ -369,7 +369,7 @@ CLASS ZCL_ABAPGIT_OBJECTS_PROGRAM IMPLEMENTATION.
|
||||||
illegal_field_position = 9
|
illegal_field_position = 9
|
||||||
OTHERS = 10.
|
OTHERS = 10.
|
||||||
IF sy-subrc <> 2 AND sy-subrc <> 0.
|
IF sy-subrc <> 2 AND sy-subrc <> 0.
|
||||||
zcx_abapgit_exception=>raise( |error from RPY_DYNPRO_INSERT: { sy-subrc }| ).
|
zcx_abapgit_exception=>raise( |Error from RPY_DYNPRO_INSERT: { sy-subrc }| ).
|
||||||
ENDIF.
|
ENDIF.
|
||||||
* todo, RPY_DYNPRO_UPDATE?
|
* todo, RPY_DYNPRO_UPDATE?
|
||||||
|
|
||||||
|
@ -411,9 +411,9 @@ CLASS ZCL_ABAPGIT_OBJECTS_PROGRAM IMPLEMENTATION.
|
||||||
unknown_objectclass = 3
|
unknown_objectclass = 3
|
||||||
OTHERS = 4.
|
OTHERS = 4.
|
||||||
IF sy-subrc = 1.
|
IF sy-subrc = 1.
|
||||||
zcx_abapgit_exception=>raise( |RS_CORR_INSERT, Cancelled, { sy-msgid }, { sy-msgno }| ).
|
zcx_abapgit_exception=>raise( |Error from RS_CORR_INSERT, Cancelled, { sy-msgid }, { sy-msgno }| ).
|
||||||
ELSEIF sy-subrc <> 0.
|
ELSEIF sy-subrc <> 0.
|
||||||
zcx_abapgit_exception=>raise( |error from RS_CORR_INSERT, { sy-msgid }, { sy-msgno }| ).
|
zcx_abapgit_exception=>raise( |Error from RS_CORR_INSERT, { sy-msgid }, { sy-msgno }| ).
|
||||||
ENDIF.
|
ENDIF.
|
||||||
|
|
||||||
READ TABLE it_tpool INTO ls_tpool WITH KEY id = 'R'.
|
READ TABLE it_tpool INTO ls_tpool WITH KEY id = 'R'.
|
||||||
|
@ -510,7 +510,7 @@ CLASS ZCL_ABAPGIT_OBJECTS_PROGRAM IMPLEMENTATION.
|
||||||
not_exists = 1
|
not_exists = 1
|
||||||
OTHERS = 2.
|
OTHERS = 2.
|
||||||
IF sy-subrc <> 0.
|
IF sy-subrc <> 0.
|
||||||
zcx_abapgit_exception=>raise( 'not found in PROGDIR' ).
|
zcx_abapgit_exception=>raise( |not found in PROGDIR. Subrc = { sy-subrc }| ).
|
||||||
ENDIF.
|
ENDIF.
|
||||||
|
|
||||||
* todo, package?
|
* todo, package?
|
||||||
|
@ -533,7 +533,7 @@ CLASS ZCL_ABAPGIT_OBJECTS_PROGRAM IMPLEMENTATION.
|
||||||
not_executed = 1
|
not_executed = 1
|
||||||
OTHERS = 2.
|
OTHERS = 2.
|
||||||
IF sy-subrc <> 0.
|
IF sy-subrc <> 0.
|
||||||
zcx_abapgit_exception=>raise( 'PROG, error inserting' ).
|
zcx_abapgit_exception=>raise( |PROG, error inserting. Subrc = { sy-subrc }| ).
|
||||||
ENDIF.
|
ENDIF.
|
||||||
|
|
||||||
SELECT SINGLE * FROM progdir INTO ls_progdir_new
|
SELECT SINGLE * FROM progdir INTO ls_progdir_new
|
||||||
|
@ -734,7 +734,7 @@ CLASS ZCL_ABAPGIT_OBJECTS_PROGRAM IMPLEMENTATION.
|
||||||
unknown_version = 2
|
unknown_version = 2
|
||||||
OTHERS = 3.
|
OTHERS = 3.
|
||||||
IF sy-subrc > 1.
|
IF sy-subrc > 1.
|
||||||
zcx_abapgit_exception=>raise( |error from RS_CUA_INTERNAL_FETCH, { sy-subrc }| ).
|
zcx_abapgit_exception=>raise( |Error from RS_CUA_INTERNAL_FETCH, { sy-subrc }| ).
|
||||||
ENDIF.
|
ENDIF.
|
||||||
|
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
@ -765,7 +765,7 @@ CLASS ZCL_ABAPGIT_OBJECTS_PROGRAM IMPLEMENTATION.
|
||||||
not_found = 1
|
not_found = 1
|
||||||
OTHERS = 2.
|
OTHERS = 2.
|
||||||
IF sy-subrc = 2.
|
IF sy-subrc = 2.
|
||||||
zcx_abapgit_exception=>raise( 'error from screen_list' ).
|
zcx_abapgit_exception=>raise( |Error from RS_SCREEN_LIST. Subrc = { sy-subrc }| ).
|
||||||
ENDIF.
|
ENDIF.
|
||||||
|
|
||||||
SORT lt_d020s BY dnum ASCENDING.
|
SORT lt_d020s BY dnum ASCENDING.
|
||||||
|
@ -863,7 +863,7 @@ CLASS ZCL_ABAPGIT_OBJECTS_PROGRAM IMPLEMENTATION.
|
||||||
RETURN.
|
RETURN.
|
||||||
ELSEIF sy-subrc <> 0.
|
ELSEIF sy-subrc <> 0.
|
||||||
zcl_abapgit_language=>restore_login_language( ).
|
zcl_abapgit_language=>restore_login_language( ).
|
||||||
zcx_abapgit_exception=>raise( 'Error reading program' ).
|
zcx_abapgit_exception=>raise( |Error reading program with RPY_PROGRAM_READ. Subrc = { sy-subrc }| ).
|
||||||
ENDIF.
|
ENDIF.
|
||||||
|
|
||||||
zcl_abapgit_language=>restore_login_language( ).
|
zcl_abapgit_language=>restore_login_language( ).
|
||||||
|
|
Loading…
Reference in New Issue
Block a user