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

Lookup user name and email from SU01 in background

Browse Source 
Use BAPI_USER_GET_DETAIL to read the committer user's email and full name from SU01 when commiting in the background.
This commit is contained in:
Oliver Rogers 2018-02-20 23:47:15 +00:00
parent 59c1f277ab
commit 57a3539ae7
1 changed files with 29 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

33
src/zcl_abapgit_background.clas.abap
View File

@ -26,7 +26,7 @@ ENDCLASS.
CLASS ZCL_ABAPGIT_BACKGROUND IMPLEMENTATION.
CLASS zcl_abapgit_background IMPLEMENTATION.
METHOD build_comment.
@ -91,7 +91,11 @@ CLASS ZCL_ABAPGIT_BACKGROUND IMPLEMENTATION.
lt_users TYPE STANDARD TABLE OF xubname WITH DEFAULT KEY,
ls_user_files LIKE ls_files,
lv_changed_by TYPE xubname,
lo_stage TYPE REF TO zcl_abapgit_stage.
lo_stage TYPE REF TO zcl_abapgit_stage,
lt_return TYPE TABLE OF bapiret2,
ls_address TYPE bapiaddr3,
lt_smtp TYPE TABLE OF bapiadsmtp,
ls_smtp TYPE bapiadsmtp.
FIELD-SYMBOLS: <ls_changed> LIKE LINE OF lt_changed,
<ls_remote> LIKE LINE OF ls_files-remote,
@ -114,8 +118,29 @@ CLASS ZCL_ABAPGIT_BACKGROUND IMPLEMENTATION.
LOOP AT lt_users INTO lv_changed_by.
CLEAR ls_comment.
ls_comment-committer-name = lv_changed_by.
ls_comment-committer-email = |{ ls_comment-committer-name }@localhost|.
CALL FUNCTION 'BAPI_USER_GET_DETAIL'
EXPORTING
username = lv_changed_by
IMPORTING
address = ls_address
TABLES
return = lt_return
addsmtp = lt_smtp.
LOOP AT lt_smtp INTO ls_smtp.
ls_comment-committer-email = ls_smtp-e_mail.
ENDLOOP.
IF ls_comment-committer-email IS INITIAL.
ls_comment-committer-email = |{ lv_changed_by }@localhost|.
ENDIF.
ls_comment-committer-name = ls_address-fullname.
IF ls_comment-committer-name IS INITIAL.
ls_comment-committer-name = lv_changed_by.
ENDIF.
CREATE OBJECT lo_stage
EXPORTING