*&----------------------------------------------------------------*
*& Report  YRTEST0035
*&
*&----------------------------------------------------------------*
*&
*&
*&----------------------------------------------------------------*

report  yrtest0035.

  type-pools: wfcsr.

  data : lv_text type wfcsr_ui_popup_text.

  lv_text-titlebar = 'title'.
  lv_text-question = 'question'.

  data: gv_answer.

*-----------------------------------------------------------------*
end-of-selection.
*-----------------------------------------------------------------*
  call function 'WFCS_POPUP_YES_NO'
    exporting
      pi_ui_popup_text  = lv_text
    changing
      pe_answer         = gv_answer  "YES: 1 /  NO: 2
    exceptions
      error_using_popup = 1
      others            2.

   write: gv_answer.




'SAP > ABAP 개발' 카테고리의 다른 글

cx_root - Division by zero  (1) 2010.07.21
Message Class 조회  (1) 2010.07.21
SAPGUI_PROGRESS_INDICATOR - %  (2) 2010.07.19
PP - BOM Item List Function ( MAST STPO STKO )  (2) 2010.07.16
External Operating System Commands - SM49  (2) 2010.07.09