This is a sample to ask if you want to continue with a procedure, this example will delete N rows.
data lv_lines type i.
data lv_lines_string type string.
data lv_question type string.
data lv_answer type c.
describe table lt_user_sysid lines lv_lines.
lv_lines_string = lv_lines.
lv_question = text-ask. "; text-ask = "Would you like to delete the & objects?"
replace '&' into lv_question with lv_lines_string.
CALL FUNCTION 'POPUP_TO_CONFIRM'
EXPORTING
TITLEBAR = text-ast "; text-ast = "Deleting objects"
* DIAGNOSE_OBJECT = ' '
TEXT_QUESTION = lv_question
TEXT_BUTTON_1 = 'Yes'
* ICON_BUTTON_1 = ' '
TEXT_BUTTON_2 = 'No'
* ICON_BUTTON_2 = ' '
* DEFAULT_BUTTON = '1'
DISPLAY_CANCEL_BUTTON = space
* USERDEFINED_F1_HELP = ' '
* START_COLUMN = 25
* START_ROW = 6
* POPUP_TYPE =
* IV_QUICKINFO_BUTTON_1 = ' '
* IV_QUICKINFO_BUTTON_2 = ' '
IMPORTING
ANSWER = lv_answer
* TABLES
* PARAMETER =
EXCEPTIONS
TEXT_NOT_FOUND = 1
OTHERS = 2
.
IF SY-SUBRC <> 0.
* Implement suitable error handling here
ENDIF.
* DELETE IN FOREGROUND EXECUTION
* VALIDATE THE USER ANSWERED YES AND THERE ARE SELECTED USERS
IF lv_answer = '1' and NOT lt_user_sysid[] IS INITIAL.
PERFORM F_DELETE OBJECTS.
ENDIF.
