顯示彈出窗口並獲取用戶輸入值

顯示彈出窗口並獲取用戶輸入值

在某些情況下，我們需要根據某些動態條件在應用程序運行時從用戶那裏獲取一些輸入。

功能模塊POPUP_GET_VALUES可用於顯示彈出窗口以從用戶獲取輸入。 該功能模塊的特色是我們可以根據需要添加任意數量的字段。 這些字段可以是任何數據類型。

REPORT ztestpopup.
DATA: t_fields LIKE sval OCCURS 0 WITH HEADER LINE.
START-OF-SELECTION.
*— Prepare Parameters for FM ————-*
  t_fields-tabname = 'BKPF'.
  t_fields-fieldname = 'BUDAT'.
APPEND t_fields.
  t_fields-tabname = 'BKPF'.
  t_fields-fieldname = 'BLART'.
APPEND t_fields.
*—- Function Module Call —————–*
CALL FUNCTION 'POPUP_GET_VALUES'
EXPORTING
*     NO_VALUE_CHECK  = ' '
      popup_title     = 'Test Popup'
*     START_COLUMN    = '5'
*     START_ROW       = '5'
*  IMPORTING
*     RETURNCODE      =
TABLES
fields          = t_fields
EXCEPTIONS
      error_in_fields = 1
OTHERS          = 2.
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
*— Display Report —————-*
LOOP AT t_fields.
WRITE:/ t_fields-value.
ENDLOOP.

運行結果：