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

More is_locked: ENHO, FORM, SFPF, SFPI (#1646)

Browse Source
This commit is contained in:
Christian Günter 2018-07-17 07:40:01 +02:00 committed by Lars Hvam
parent a4f8b4eed8
commit 394ea52d61
4 changed files with 43 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/objects/zcl_abapgit_object_enho.clas.abap
View File

@ -213,7 +213,14 @@ CLASS zcl_abapgit_object_enho IMPLEMENTATION.
METHOD zif_abapgit_object~is_locked.
rv_is_locked = abap_false.
DATA: lv_object TYPE seqg3-garg.
lv_object = |{ ms_item-obj_type }{ ms_item-obj_name }|.
OVERLAY lv_object WITH ' '.
lv_object = lv_object && '*'.
rv_is_locked = exists_a_lock_entry_for( iv_lock_object = 'E_ENHANCE'
iv_argument = lv_object ).
ENDMETHOD.

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

@ -436,7 +436,17 @@ CLASS zcl_abapgit_object_form IMPLEMENTATION.
METHOD zif_abapgit_object~is_locked.
rv_is_locked = abap_false.
DATA: lv_object TYPE seqg3-garg.
" example lock entry
"'001FORM ZTEST_SAPSCRIPT TXT'
lv_object = |{ sy-mandt }{ ms_item-obj_type } { ms_item-obj_name }|.
OVERLAY lv_object WITH ' '.
lv_object = lv_object && '*'.
rv_is_locked = exists_a_lock_entry_for( iv_lock_object = 'ESSFORM'
iv_argument = lv_object ).
ENDMETHOD.

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

@ -21,7 +21,7 @@ ENDCLASS.
CLASS ZCL_ABAPGIT_OBJECT_SFPF IMPLEMENTATION.
CLASS zcl_abapgit_object_sfpf IMPLEMENTATION.
METHOD fix_oref.
@ -227,7 +227,15 @@ CLASS ZCL_ABAPGIT_OBJECT_SFPF IMPLEMENTATION.
METHOD zif_abapgit_object~is_locked.
rv_is_locked = abap_false.
DATA: lv_object TYPE seqg3-garg.
lv_object = |{ ms_item-obj_name }|.
OVERLAY lv_object WITH ' '.
lv_object = lv_object && '*'.
rv_is_locked = exists_a_lock_entry_for( iv_lock_object = 'EFPFORM'
iv_argument = lv_object ).
ENDMETHOD.

9
src/objects/zcl_abapgit_object_sfpi.clas.abap
View File

@ -159,7 +159,14 @@ CLASS zcl_abapgit_object_sfpi IMPLEMENTATION.
METHOD zif_abapgit_object~is_locked.
rv_is_locked = abap_false.
DATA: lv_object TYPE seqg3-garg.
lv_object = |{ ms_item-obj_name }|.
OVERLAY lv_object WITH ' '.
lv_object = lv_object && '*'.
rv_is_locked = exists_a_lock_entry_for( iv_lock_object = 'EFPINTERFACE'
iv_argument = lv_object ).
ENDMETHOD.