PARA: implement is_locked

This commit is contained in:
Christian Guenter 2018-11-04 19:22:21 +01:00 committed by Lars Hvam
parent e326273f20
commit e17d3334ff

View File

@ -194,7 +194,16 @@ CLASS zcl_abapgit_object_para IMPLEMENTATION.
ENDMETHOD. ENDMETHOD.
METHOD zif_abapgit_object~is_locked. METHOD zif_abapgit_object~is_locked.
rv_is_locked = abap_false.
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 ).
ENDMETHOD. ENDMETHOD.