CLEAR LV_ANSWER.
PERFORM POPUP_TO_CONFIRM USING 'Delete'
TEXT-Q02
'Yes' 'No'
CHANGING LV_ANSWER.
CHECK LV_ANSWER EQ '1'.
FORM POPUP_TO_CONFIRM USING PV_TITLE
PV_QUESTION
PV_BUTTON1
PV_BUTTON2
CHANGING PV_ANSWER.
*
CLEAR : PV_ANSWER.
CALL FUNCTION 'POPUP_TO_CONFIRM'
EXPORTING
TITLEBAR = PV_TITLE
TEXT_QUESTION = PV_QUESTION
TEXT_BUTTON_1 = PV_BUTTON1
TEXT_BUTTON_2 = PV_BUTTON2
IMPORTING
ANSWER = PV_ANSWER
EXCEPTIONS
TEXT_NOT_FOUND = 1
OTHERS = 2.
IF SY-SUBRC <> 0.
* Implement suitable error handling here
ENDIF.
ENDFORM.
사용자가 선택한 값이 PV_ANSWER에 들어간다.