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

authorization constants renamed

Browse Source
This commit is contained in:
larshp 2017-04-05 17:56:29 +02:00
parent bcd76aa0ae
commit 57bf690d17
2 changed files with 9 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
src/zabapgit_authorizations.prog.abap
View File

@ -2,16 +2,16 @@
*& Include ZABAPGIT_AUTHORIZATIONS
*&---------------------------------------------------------------------*
TYPES: ty_activity TYPE string.
TYPES: ty_authorization TYPE string.
CONSTANTS: BEGIN OF gc_activities,
uninstall TYPE ty_activity VALUE 'UNINSTALL',
END OF gc_activities.
CONSTANTS: BEGIN OF gc_authorization,
uninstall TYPE ty_authorization VALUE 'UNINSTALL',
END OF gc_authorization.
INTERFACE lif_auth.
METHODS:
is_allowed
IMPORTING iv_activity TYPE ty_activity
IMPORTING iv_authorization TYPE ty_authorization
iv_param TYPE string OPTIONAL
RETURNING VALUE(rv_allowed) TYPE abap_bool.
ENDINTERFACE.
@ -27,7 +27,7 @@ CLASS lcl_auth DEFINITION FINAL.
PUBLIC SECTION.
CLASS-METHODS:
is_allowed
IMPORTING iv_activity TYPE ty_activity
IMPORTING iv_authorization TYPE ty_authorization
iv_param TYPE string OPTIONAL
RETURNING VALUE(rv_allowed) TYPE abap_bool.
@ -41,8 +41,8 @@ CLASS lcl_auth IMPLEMENTATION.
TRY.
CREATE OBJECT li_auth TYPE ('LCL_AUTH_EXIT').
rv_allowed = li_auth->is_allowed( iv_activity = iv_activity
iv_param = iv_param ).
rv_allowed = li_auth->is_allowed( iv_authorization = iv_authorization
iv_param = iv_param ).
CATCH cx_sy_create_object_error.
rv_allowed = abap_true.
ENDTRY.

2
src/zabapgit_view_repo.prog.abap
View File

@ -321,7 +321,7 @@ CLASS lcl_gui_view_repo_content IMPLEMENTATION.
CLEAR lv_crossout.
IF mo_repo->is_write_protected( ) = abap_true
OR lcl_auth=>is_allowed( gc_activities-uninstall ) = abap_false.
OR lcl_auth=>is_allowed( gc_authorization-uninstall ) = abap_false.
lv_crossout = gc_html_opt-crossout.
ENDIF.
lo_tb_advanced->add( iv_txt = 'Uninstall'