(ABAP 코드) POP_UP

FORM POPUP_TO_CONFIRM USING P_TEXT
                     CHANGING LV_ANSWER.

*-- ####

  CALL FUNCTION 'POPUP_TO_CONFIRM'
    EXPORTING
      TITLEBAR              = TEXT-Q01 "[####]
      TEXT_QUESTION         = P_TEXT
      TEXT_BUTTON_1         = TEXT-Q02 " #
      TEXT_BUTTON_2         = TEXT-Q03 " ###
      DEFAULT_BUTTON        = '1'
      DISPLAY_CANCEL_BUTTON = 'X'
    IMPORTING
      ANSWER                = LV_ANSWER
    EXCEPTIONS
      TEXT_NOT_FOUND        = 1
      OTHERS                = 2.

  IF ( LV_ANSWER <> '1' ).
    MESSAGE S555(BC400) WITH '### #######.'(E06).
    EXIT.
  ENDIF.

ENDFORM.