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

Fine-tune popups to confirm uninstall (#6504)

Browse Source 
Co-authored-by: Lars Hvam <larshp@hotmail.com>
This commit is contained in:
Marc Bernard 2023-09-21 11:32:22 -04:00 committed by GitHub
parent 1ca062d229
commit 2645e2208b
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
3 changed files with 15 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
src/ui/routing/zcl_abapgit_services_repo.clas.abap
View File

@ -616,7 +616,8 @@ CLASS zcl_abapgit_services_repo IMPLEMENTATION.
lv_answer TYPE c LENGTH 1,
lo_repo TYPE REF TO zcl_abapgit_repo,
lv_package TYPE devclass,
lv_question TYPE c LENGTH 100,
lv_title TYPE c LENGTH 20,
lv_question TYPE c LENGTH 150,
ls_checks TYPE zif_abapgit_definitions=>ty_delete_checks,
lv_repo_name TYPE string,
lv_message TYPE string.
@ -633,14 +634,23 @@ CLASS zcl_abapgit_services_repo IMPLEMENTATION.
lv_question = |This will DELETE all objects in package { lv_package
} including subpackages ({ lines( lt_tadir ) } objects) from the system|.
IF iv_keep_repo = abap_true.
lv_title = 'Remove Objects'.
lv_question = lv_question && ', but keep the reference to the repository'.
ELSE.
lv_title = 'Uninstall'.
lv_question = lv_question && ' and remove the reference to the repository'.
ENDIF.
lv_answer = zcl_abapgit_ui_factory=>get_popups( )->popup_to_confirm(
iv_titlebar = 'Uninstall'
iv_titlebar = lv_title
iv_text_question = lv_question
iv_text_button_1 = 'Delete'
iv_icon_button_1 = 'ICON_DELETE'
iv_text_button_2 = 'Cancel'
iv_icon_button_2 = 'ICON_CANCEL'
iv_default_button = '2'
iv_popup_type = 'ICON_MESSAGE_WARNING'
iv_display_cancel_button = abap_false ).
IF lv_answer = '2'.
@ -755,7 +765,7 @@ CLASS zcl_abapgit_services_repo IMPLEMENTATION.
}. All objects will safely remain in the system.|.
lv_answer = zcl_abapgit_ui_factory=>get_popups( )->popup_to_confirm(
iv_titlebar = 'Remove'
iv_titlebar = 'Remove Repository'
iv_text_question = lv_question
iv_text_button_1 = 'Remove'
iv_icon_button_1 = 'ICON_WF_UNLINK'

1
src/ui/zcl_abapgit_popups.clas.abap
View File

@ -591,6 +591,7 @@ CLASS zcl_abapgit_popups IMPLEMENTATION.
icon_button_2 = iv_icon_button_2
default_button = iv_default_button
display_cancel_button = iv_display_cancel_button
popup_type = iv_popup_type
start_column = ms_position-start_column
start_row = ms_position-start_row
IMPORTING

1
src/ui/zif_abapgit_popups.intf.abap
View File

@ -84,6 +84,7 @@ INTERFACE zif_abapgit_popups
!iv_icon_button_2 TYPE ty_icon DEFAULT space
!iv_default_button TYPE ty_char1 DEFAULT '1'
!iv_display_cancel_button TYPE ty_char1 DEFAULT abap_true
!iv_popup_type TYPE clike DEFAULT 'ICON_MESSAGE_QUESTION'
RETURNING
VALUE(rv_answer) TYPE ty_char1
RAISING