POPUP_GET_VALUES_DB_CHECKED’

通过 Function Module 弹出窗口，选择确认则检查数据是否在数据库表中存在。
所属 Function Group : SPO4
所属 Package : SZP

DATA:rcode TYPE c LENGTH 1.

DATA:mytable TYPE STANDARD TABLE OF sval WITH HEADER LINE.

mytable-tabname = ‘USR02′.
mytable-fieldname = ‘BNAME’.
APPEND mytable.
CLEAR mytable.

mytable-tabname = ‘USR02′.
*mytable-FIELDNAME = ‘BCODE’."Internal type X is not supported
mytable-fieldname = ‘CLASS’.
mytable-value = ”.
APPEND mytable.
CLEAR mytable.

mytable-tabname = ‘MARA’.
mytable-fieldname = ‘MATNR’.
mytable-value = ”.
mytable-FIELD_ATTR = ’03′.
mytable-FIELDTEXT = ‘MAT’.
APPEND mytable.
CLEAR mytable.

CALL FUNCTION ‘POPUP_GET_VALUES_DB_CHECKED’
  EXPORTING
*   CHECK_EXISTENCE       = ‘X’
    popup_title           = ‘popup title’
   START_COLUMN          = ’5′
   START_ROW             = ’5′
 IMPORTING
   RETURNCODE            = rcode
  tables
    fields                = mytable
* 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.

CASE rcode.
  WHEN ”.
    WRITE:’YES’.
  WHEN ‘A’.
    WRITE:’NO’.
ENDCASE.

结果：
1、基本界面

2、不存在界面

3、通过验证

————
注意：
1、该函数会检查用户输入或程序预设定的值是否在对应数据库表中存在，不检查其关联性。
2、输入框中的值不区分大小写。