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

Refactor: Simplify lock check for workbench objects (#6517)

Browse Source 
Co-authored-by: Lars Hvam <larshp@hotmail.com>
This commit is contained in:
Marc Bernard 2023-09-30 02:28:17 -04:00 committed by GitHub
parent 03033a2e89
commit 8420663819
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
6 changed files with 23 additions and 48 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
src/objects/zcl_abapgit_object_devc.clas.abap
View File

@ -727,16 +727,9 @@ CLASS zcl_abapgit_object_devc IMPLEMENTATION.
METHOD zif_abapgit_object~is_locked.
DATA: lv_object TYPE eqegraarg.
lv_object = |DV{ ms_item-obj_name }|.
OVERLAY lv_object WITH ' '.
lv_object = lv_object && '*'.
rv_is_locked = exists_a_lock_entry_for( iv_lock_object = 'EEUDB'
iv_argument = lv_object ).
iv_argument = ms_item-obj_name
iv_prefix = 'DV' ).
ENDMETHOD.

11
src/objects/zcl_abapgit_object_fugr.clas.abap
View File

@ -759,16 +759,9 @@ CLASS zcl_abapgit_object_fugr IMPLEMENTATION.
METHOD is_function_group_locked.
DATA: lv_object TYPE eqegraarg.
lv_object = |FG{ ms_item-obj_name }|.
OVERLAY lv_object WITH ' '.
lv_object = lv_object && '*'.
rv_is_functions_group_locked = exists_a_lock_entry_for( iv_lock_object = 'EEUDB'
iv_argument = lv_object ).
iv_argument = ms_item-obj_name
iv_prefix = 'FG' ).
ENDMETHOD.

13
src/objects/zcl_abapgit_object_para.clas.abap
View File

@ -13,7 +13,7 @@ ENDCLASS.
CLASS ZCL_ABAPGIT_OBJECT_PARA IMPLEMENTATION.
CLASS zcl_abapgit_object_para IMPLEMENTATION.
METHOD unlock.
@ -188,16 +188,9 @@ CLASS ZCL_ABAPGIT_OBJECT_PARA IMPLEMENTATION.
METHOD zif_abapgit_object~is_locked.
DATA: lv_argument TYPE seqg3-garg.
lv_argument = |PA{ ms_item-obj_name }|.
OVERLAY lv_argument WITH ' '.
lv_argument = lv_argument && '*'.
rv_is_locked = exists_a_lock_entry_for( iv_lock_object = 'EEUDB'
iv_argument = lv_argument ).
iv_argument = ms_item-obj_name
iv_prefix = 'PA' ).
ENDMETHOD.

10
src/objects/zcl_abapgit_object_pinf.clas.abap
View File

@ -334,15 +334,9 @@ CLASS zcl_abapgit_object_pinf IMPLEMENTATION.
METHOD zif_abapgit_object~is_locked.
DATA: lv_argument TYPE eqegraarg.
lv_argument = |PF{ ms_item-obj_name }|.
OVERLAY lv_argument WITH ' *'.
rv_is_locked = exists_a_lock_entry_for( iv_lock_object = 'EEUDB'
iv_argument = lv_argument ).
iv_argument = ms_item-obj_name
iv_prefix = 'PF' ).
ENDMETHOD.

12
src/objects/zcl_abapgit_object_tran.clas.abap
View File

@ -833,17 +833,9 @@ CLASS zcl_abapgit_object_tran IMPLEMENTATION.
METHOD zif_abapgit_object~is_locked.
DATA: lv_object TYPE eqegraarg.
lv_object = |TN{ ms_item-obj_name }|.
OVERLAY lv_object WITH ' '.
lv_object = lv_object && '*'.
rv_is_locked = exists_a_lock_entry_for( iv_lock_object = 'EEUDB'
iv_argument = lv_object ).
iv_argument = ms_item-obj_name
iv_prefix = 'TN' ).
ENDMETHOD.

14
src/objects/zcl_abapgit_objects_super.clas.abap
View File

@ -38,7 +38,8 @@ CLASS zcl_abapgit_objects_super DEFINITION
METHODS exists_a_lock_entry_for
IMPORTING
!iv_lock_object TYPE string
!iv_argument TYPE seqg3-garg OPTIONAL
!iv_argument TYPE csequence OPTIONAL
!iv_prefix TYPE csequence OPTIONAL
RETURNING
VALUE(rv_exists_a_lock_entry) TYPE abap_bool
RAISING
@ -213,11 +214,20 @@ CLASS ZCL_ABAPGIT_OBJECTS_SUPER IMPLEMENTATION.
METHOD exists_a_lock_entry_for.
DATA: lt_lock_entries TYPE STANDARD TABLE OF seqg3.
DATA: lv_argument TYPE seqg3-garg.
IF iv_prefix IS INITIAL.
lv_argument = iv_argument.
ELSE.
lv_argument = |{ iv_prefix }{ iv_argument }|.
OVERLAY lv_argument WITH ' '.
lv_argument = lv_argument && '*'.
ENDIF.
CALL FUNCTION 'ENQUEUE_READ'
EXPORTING
guname = '*'
garg = iv_argument
garg = lv_argument
TABLES
enq = lt_lock_entries
EXCEPTIONS