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

Update zcl_abapgit_object_cota.clas.abap

Browse Source
This commit is contained in:
Ben9ka 2025-02-05 12:16:55 +01:00 committed by GitHub
parent 4a53133ef6
commit 82568c2545
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 16 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

27
src/objects/aff/zcl_abapgit_object_cota.clas.abap
View File

@ -4,10 +4,10 @@ CLASS zcl_abapgit_object_cota DEFINITION
FINAL FINAL
CREATE PUBLIC . CREATE PUBLIC .
public section. PUBLIC SECTION.
METHODS zif_abapgit_object~changed_by REDEFINITION. METHODS zif_abapgit_object~changed_by REDEFINITION.
protected section. PROTECTED SECTION.
private section. PRIVATE SECTION.
ENDCLASS. ENDCLASS.
@ -15,14 +15,19 @@ ENDCLASS.
CLASS zcl_abapgit_object_cota IMPLEMENTATION. CLASS zcl_abapgit_object_cota IMPLEMENTATION.
METHOD zif_abapgit_object~changed_by. METHOD zif_abapgit_object~changed_by.
SELECT SINGLE changedby FROM ('sapcontargethead') DATA lx_error TYPE REF TO cx_root.
WHERE id = @ms_item-obj_name AND version = 'I' TRY.
INTO @rv_user. SELECT SINGLE changedby FROM ('sapcontargethead')
WHERE id = @ms_item-obj_name AND version = 'I'
INTO @rv_user.
IF rv_user IS INITIAL. IF rv_user IS INITIAL.
SELECT SINGLE changedby FROM ('sapcontargethead') SELECT SINGLE changedby FROM ('sapcontargethead')
WHERE id = @ms_item-obj_name AND version = 'A' WHERE id = @ms_item-obj_name AND version = 'A'
INTO @rv_user. INTO @rv_user.
ENDIF. ENDIF.
CATCH cx_root INTO lx_error.
zcx_abapgit_exception=>raise_with_text( lx_error ).
ENDTRY.
ENDMETHOD. ENDMETHOD.
ENDCLASS. ENDCLASS.