반응형
DATA: LV_CHECK TYPE C,
LV_ANSWER TYPE C.
PERFORM POPUP_TO_CONFIRM USING TEXT-P01 TEXT-P02 CHANGING LV_ANSWER.
IF LV_ANSWER = 1.
ELSE.
MESSAGE S009 DISPLAY LIKE 'E'. "취소하였습니다.
EXIT.
ENDIF.
*&---------------------------------------------------------------------*
*& Form POPUP_TO_CONFIRM
*&---------------------------------------------------------------------*
FORM POPUP_TO_CONFIRM USING PV_TITLE
PV_TEXT
CHANGING PV_ANSWER.
CALL FUNCTION 'POPUP_TO_CONFIRM'
EXPORTING
TITLEBAR = PV_TITLE
TEXT_QUESTION = PV_TEXT
TEXT_BUTTON_1 = 'YES'
ICON_BUTTON_1 = 'ICON_OKAY'
TEXT_BUTTON_2 = 'NO'
ICON_BUTTON_2 = 'ICON_CANCEL'
DEFAULT_BUTTON = '1'
DISPLAY_CANCEL_BUTTON = SPACE
IMPORTING
ANSWER = PV_ANSWER.
ENDFORM.
반응형
'ABAP' 카테고리의 다른 글
월의 마지막 날 받기(RP_LAST_DAY_OF_MONTHS) (0) | 2025.02.24 |
---|---|
엑셀 업로드(GUI_UPLOAD) (0) | 2025.02.24 |
ALV GRID 새로고침(REFRESH_TABLE_DISPLAY) (0) | 2025.02.19 |
BAPI_COSTACTPLN_POSTPRIMCOST 비용계획(KP06) (0) | 2025.02.19 |
Template 다운로드 기능 추가 (0) | 2025.02.17 |