弹出对话框

 

 data:answer(20) type c.

CALL FUNCTION 'POPUP_TO_CONFIRM'

  EXPORTING

*   TITLEBAR                    = ' '

*   DIAGNOSE_OBJECT             = ' '

    text_question               = 'Anything else?'

   TEXT_BUTTON_1               = 'Yes?'

   ICON_BUTTON_1               = '@15@'

   TEXT_BUTTON_2               = 'No'(002)

   ICON_BUTTON_2               = '@16@'

   DEFAULT_BUTTON              = '2'

   DISPLAY_CANCEL_BUTTON       = 'X'

*   USERDEFINED_F1_HELP         = ' '

*   START_COLUMN                = 25

*   START_ROW                   = 6

*   POPUP_TYPE                  =

*   IV_QUICKINFO_BUTTON_1       = ' '

*   IV_QUICKINFO_BUTTON_2       = ' '

 IMPORTING

   ANSWER                      = answer

* TABLES

*   PARAMETER                   =

* EXCEPTIONS

*   TEXT_NOT_FOUND              = 1

*   OTHERS                      = 2

          .

选择Yes ，返回 1.

选择No ，返回 2.

选择取消 ，返回 A.