POPUP_GET_VALUES、POPUP_GET_VALUES_USER_HELP
可自定义输入的字段
FIELD_ATTR:外观属性-
FIELD_OBL:设置是否必输
FIELDTEXT:展示字段文本描述
注意事项:
1、SVAL-TABNAME和SVAL-FIELDNAME必输,且不能重复(可用来区分输入的内容在哪一行),否则不会弹窗;
2、SVAL-TABNAME输入的表必须在数据字典中激活,否则不会弹窗;
3、如果设置的字段是金额字段的话,需要将该金额字段的参考货币表和参考货币字段也增加一行进去,并设置为隐藏;
代码示例:
--------------------*
*& Report ZTEST1
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT ZTEST1.
DATA : LT_SVAL TYPE TABLE OF SVAL,
LS_SVAL LIKE LINE OF LT_SVAL.
DATA:L_RETURNCODE TYPE STRING .
"物料
CLEAR LS_SVAL .
LS_SVAL-TABNAME = 'MARA' . "表名
LS_SVAL-FIELDNAME = 'MATNR' . "字段名
LS_SVAL-FIELD_OBL = 'X' . "是否为必填
APPEND LS_SVAL TO LT_SVAL.
"工厂
CLEAR LS_SVAL .
LS_SVAL-TABNAME = 'MARC' . "表名
LS_SVAL-FIELDNAME = 'WERKS' . "字段名
LS_SVAL-FIELD_OBL = 'X' . "是否为必填
APPEND LS_SVAL TO LT_SVAL.
"如果是金额的话要把参考表和参考字段也写进来,然后隐藏,不然金额的输入框无法编辑输入
CLEAR LS_SVAL .
LS_SVAL-TABNAME = 'BSIS'.
LS_SVAL-FIELDNAME = 'WRBTR'.
APPEND LS_SVAL TO LT_SVAL.
"货币
CLEAR LS_SVAL .
LS_SVAL-TABNAME = 'BSIS'.
LS_SVAL-FIELDNAME = 'WAERS'.
LS_SVAL-FIELD_ATTR = '04'. "隐藏货币字段
APPEND LS_SVAL TO LT_SVAL.
CALL FUNCTION 'POPUP_GET_VALUES'
EXPORTING
* NO_VALUE_CHECK = ' '
POPUP_TITLE = '请填写'
* START_COLUMN = '5'
* START_ROW = '5'
IMPORTING
RETURNCODE = L_RETURNCODE
TABLES
FIELDS = LT_SVAL
EXCEPTIONS
ERROR_IN_FIELDS = 1
OTHERS = 2.
CL_DEMO_OUTPUT=>DISPLAY( LT_SVAL )."用户在弹窗上输入的内容存储在内表LT_SVAL中的value字段中