SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-05-01 20:32:26 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

include "SPRX" in SPRX error description

Browse Source
This commit is contained in:
larshp 2019-02-05 15:11:47 +01:00 committed by Lars Hvam
parent 30547792dd
commit 474a4b9051
1 changed files with 71 additions and 69 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

140
src/objects/zcl_abapgit_object_sprx.clas.abap
View File

@ -12,6 +12,7 @@ CLASS zcl_abapgit_object_sprx DEFINITION PUBLIC INHERITING FROM zcl_abapgit_obje
RAISING RAISING
zcx_abapgit_exception. zcx_abapgit_exception.
PROTECTED SECTION.
PRIVATE SECTION. PRIVATE SECTION.
CONSTANTS: CONSTANTS:
BEGIN OF c_proxy, BEGIN OF c_proxy,
@ -67,7 +68,7 @@ ENDCLASS.
CLASS zcl_abapgit_object_sprx IMPLEMENTATION. CLASS ZCL_ABAPGIT_OBJECT_SPRX IMPLEMENTATION.
METHOD activate_classes. METHOD activate_classes.
@ -111,6 +112,29 @@ CLASS zcl_abapgit_object_sprx IMPLEMENTATION.
ENDMETHOD. ENDMETHOD.
METHOD check_sprx_tadir.
DATA: lt_abap_keys TYPE prx_abapobjects,
ls_abap_key LIKE LINE OF lt_abap_keys,
lx_error TYPE REF TO cx_proxy_gen_error.
ls_abap_key-object = mv_object.
ls_abap_key-obj_name = mv_obj_name.
APPEND ls_abap_key TO lt_abap_keys.
TRY.
cl_proxy_utils=>check_sprx_tadir(
objects = lt_abap_keys
repair = abap_true ).
CATCH cx_proxy_gen_error INTO lx_error.
zcx_abapgit_exception=>raise( iv_text = |{ lx_error->get_text( ) }|
ix_previous = lx_error ).
ENDTRY.
ENDMETHOD.
METHOD constructor. METHOD constructor.
super->constructor( is_item = is_item super->constructor( is_item = is_item
@ -172,6 +196,26 @@ CLASS zcl_abapgit_object_sprx IMPLEMENTATION.
ENDMETHOD. ENDMETHOD.
METHOD dequeue_proxy.
DATA: lo_proxy TYPE REF TO cl_proxy,
lx_error TYPE REF TO cx_proxy_gen_error.
TRY.
lo_proxy = cl_proxy_fact=>load_by_abap_name(
object = mv_object
obj_name = mv_obj_name ).
lo_proxy->dequeue( ).
CATCH cx_proxy_gen_error INTO lx_error.
zcx_abapgit_exception=>raise( iv_text = |{ lx_error->get_text( ) }|
ix_previous = lx_error ).
ENDTRY.
ENDMETHOD.
METHOD generate_service_definition. METHOD generate_service_definition.
DATA: lv_transport TYPE e070use-ordernum, DATA: lv_transport TYPE e070use-ordernum,
@ -217,6 +261,29 @@ CLASS zcl_abapgit_object_sprx IMPLEMENTATION.
ENDMETHOD. ENDMETHOD.
METHOD save.
DATA:
lt_sproxhdr_old TYPE sprx_hdr_t,
lt_sproxdat_old TYPE sprx_dat_t,
lt_sproxsvar_old TYPE sprx_svar_t,
lt_sproxintf_old TYPE sprx_matchintf_t,
lt_sproxsvar_new TYPE sprx_svar_t,
lt_sproxintf_new TYPE sprx_matchintf_t.
cl_proxy_data=>db_save(
sproxhdr_old = lt_sproxhdr_old
sproxdat_old = lt_sproxdat_old
sproxsvar_old = lt_sproxsvar_old
sproxintf_old = lt_sproxintf_old
sproxhdr_new = it_sproxhdr_new
sproxdat_new = it_sproxdat_new
sproxsvar_new = lt_sproxsvar_new
sproxintf_new = lt_sproxintf_new ).
ENDMETHOD.
METHOD zif_abapgit_object~changed_by. METHOD zif_abapgit_object~changed_by.
DATA lv_changed_by TYPE sproxhdr-changed_by. DATA lv_changed_by TYPE sproxhdr-changed_by.
@ -383,8 +450,9 @@ CLASS zcl_abapgit_object_sprx IMPLEMENTATION.
delta = lt_delta ). delta = lt_delta ).
CATCH cx_proxy_gen_error INTO lx_proxy_gen_error. CATCH cx_proxy_gen_error INTO lx_proxy_gen_error.
zcx_abapgit_exception=>raise( iv_text = lx_proxy_gen_error->get_text( ) zcx_abapgit_exception=>raise(
ix_previous = lx_proxy_gen_error ). iv_text = |SPRX, { lx_proxy_gen_error->get_text( ) }|
ix_previous = lx_proxy_gen_error ).
ENDTRY. ENDTRY.
LOOP AT ls_sprx_db_data-sproxhdr ASSIGNING <ls_sproxheader>. LOOP AT ls_sprx_db_data-sproxhdr ASSIGNING <ls_sproxheader>.
@ -413,70 +481,4 @@ CLASS zcl_abapgit_object_sprx IMPLEMENTATION.
ENDMETHOD. ENDMETHOD.
METHOD check_sprx_tadir.
DATA: lt_abap_keys TYPE prx_abapobjects,
ls_abap_key LIKE LINE OF lt_abap_keys,
lx_error TYPE REF TO cx_proxy_gen_error.
ls_abap_key-object = mv_object.
ls_abap_key-obj_name = mv_obj_name.
APPEND ls_abap_key TO lt_abap_keys.
TRY.
cl_proxy_utils=>check_sprx_tadir(
objects = lt_abap_keys
repair = abap_true ).
CATCH cx_proxy_gen_error INTO lx_error.
zcx_abapgit_exception=>raise( iv_text = |{ lx_error->get_text( ) }|
ix_previous = lx_error ).
ENDTRY.
ENDMETHOD.
METHOD dequeue_proxy.
DATA: lo_proxy TYPE REF TO cl_proxy,
lx_error TYPE REF TO cx_proxy_gen_error.
TRY.
lo_proxy = cl_proxy_fact=>load_by_abap_name(
object = mv_object
obj_name = mv_obj_name ).
lo_proxy->dequeue( ).
CATCH cx_proxy_gen_error INTO lx_error.
zcx_abapgit_exception=>raise( iv_text = |{ lx_error->get_text( ) }|
ix_previous = lx_error ).
ENDTRY.
ENDMETHOD.
METHOD save.
DATA:
lt_sproxhdr_old TYPE sprx_hdr_t,
lt_sproxdat_old TYPE sprx_dat_t,
lt_sproxsvar_old TYPE sprx_svar_t,
lt_sproxintf_old TYPE sprx_matchintf_t,
lt_sproxsvar_new TYPE sprx_svar_t,
lt_sproxintf_new TYPE sprx_matchintf_t.
cl_proxy_data=>db_save(
sproxhdr_old = lt_sproxhdr_old
sproxdat_old = lt_sproxdat_old
sproxsvar_old = lt_sproxsvar_old
sproxintf_old = lt_sproxintf_old
sproxhdr_new = it_sproxhdr_new
sproxdat_new = it_sproxdat_new
sproxsvar_new = lt_sproxsvar_new
sproxintf_new = lt_sproxintf_new ).
ENDMETHOD.
ENDCLASS. ENDCLASS.