mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-01 04:08:27 +08:00
Exclude Execute button has been added
This commit is contained in:
parent
1a58b1d614
commit
c9f100f6d3
|
@ -22105,6 +22105,21 @@ CLASS ltcl_git_porcelain IMPLEMENTATION.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
|
AT SELECTION-SCREEN OUTPUT.
|
||||||
|
"Hide Execute button from screen
|
||||||
|
DATA: lt_ucomm TYPE TABLE OF sy-ucomm.
|
||||||
|
PERFORM set_pf_status IN PROGRAM rsdbrunt IF FOUND.
|
||||||
|
|
||||||
|
APPEND: 'CRET' TO lt_ucomm. "Button Execute
|
||||||
|
|
||||||
|
CALL FUNCTION 'RS_SET_SELSCREEN_STATUS'
|
||||||
|
EXPORTING
|
||||||
|
p_status = sy-pfkey
|
||||||
|
TABLES
|
||||||
|
p_exclude = lt_ucomm.
|
||||||
|
|
||||||
|
* SAP back command re-direction
|
||||||
AT SELECTION-SCREEN ON EXIT-COMMAND.
|
AT SELECTION-SCREEN ON EXIT-COMMAND.
|
||||||
CASE sy-ucomm.
|
CASE sy-ucomm.
|
||||||
WHEN 'CBAC'. "Back
|
WHEN 'CBAC'. "Back
|
||||||
|
|
Loading…
Reference in New Issue
Block a user