2020-08-30 16:46发布
点击此处---> 群内免费提供SAP练习系统(在群公告中)加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)嗨,这是塞卡尔, 我已经使用了... 显示全部
加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)
嗨,这是塞卡尔,
我已经使用了带有"无间隔"选项的Select-options:语句。 现在,我需要限制用户不要在多重选择屏幕的"范围"列中输入值。 我该怎么办......
嗨,谢卡,
欢迎来到SDN。
chkl此示例代码。
报告Z_CONECT_A。 p>
包括类型池SSCR
TYPE-POOLS sscr。
表:marc。
定义选择屏幕
选择选项:
s_matnr用于marc-matnr,
s_werks for marc-werks。
定义要传递给RESTRICTION参数的对象
数据限制类型 sscr_restrict。
用于填充RESTRICT的辅助对象
DATA:op tlist类型sscr_opt_list,
屁股类型sscr_ass。
初始化。
将MATNR选择限制为仅EQ和'BT'。/p>
optlist-name ='OBJECTKEY1'。
optlist-options-eq ='X'。
optlist-options- bt ='X'。
追加optlist来限制-opt_list_tab。
ass-kind ='S'。
ass-name ='S_MATNR'。
ass-sg_main ='I'。
ass-sg_addy =空间。
ass-op_main ='OBJECTKEY1'。
将WERKS选择限制为CP,GE,LT,NE。
optlist- 名称='OBJECTKEY2'。
optlist-options-cp ='X'。
optlist-options-ge ='X'。
optlist-options -lt ='X'。
optlist-options-ne ='X'。
ass-kind =' S'。
ass-name ='S_WERKS'。
ass-op_main ='OBJECTKEY2'。
附加ass到strict-ass_tab中。
调用乐趣 CTION'SELECT_OPTIONS_RESTRICT'
导出
限制=限制
例外情况
TOO_LATE = 1
REPEATED = 2
SELOPT_WITHOUT_OPTIONS = 3
SELOPT_WITHOUT_SIGNS = 4
INVALID_SIGN = 5
EMPTY_OPTION_LIST = 6
INVALID_KIND = 7
REPEATED_KIND_A = 8
其他= 9
。
如果sy-subrc <> 0。
消息ID SY-MSGID类型SY-MSGTY编号SY-MSGNO
与SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4。
ENDIF。
rgds
anver
消息的编辑者:Anversha s
最多设置5个标签!
嗨,谢卡,
欢迎来到SDN。
chkl此示例代码。
报告Z_CONECT_A。 p>
包括类型池SSCR
TYPE-POOLS sscr。
表:marc。
定义选择屏幕
选择选项:
s_matnr用于marc-matnr,
s_werks for marc-werks。
定义要传递给RESTRICTION参数的对象
数据限制类型 sscr_restrict。
用于填充RESTRICT的辅助对象
DATA:op tlist类型sscr_opt_list,
屁股类型sscr_ass。
初始化。
将MATNR选择限制为仅EQ和'BT'。/p>
optlist-name ='OBJECTKEY1'。
optlist-options-eq ='X'。
optlist-options- bt ='X'。
追加optlist来限制-opt_list_tab。
ass-kind ='S'。
ass-name ='S_MATNR'。
ass-sg_main ='I'。
ass-sg_addy =空间。
ass-op_main ='OBJECTKEY1'。
将WERKS选择限制为CP,GE,LT,NE。
optlist- 名称='OBJECTKEY2'。
optlist-options-cp ='X'。
optlist-options-ge ='X'。
optlist-options -lt ='X'。
optlist-options-ne ='X'。
追加optlist来限制-opt_list_tab。
ass-kind =' S'。
ass-name ='S_WERKS'。
ass-sg_main ='I'。
ass-sg_addy =空间。
ass-op_main ='OBJECTKEY2'。
附加ass到strict-ass_tab中。
调用乐趣 CTION'SELECT_OPTIONS_RESTRICT'
导出
限制=限制
例外情况
TOO_LATE = 1
REPEATED = 2
SELOPT_WITHOUT_OPTIONS = 3
SELOPT_WITHOUT_SIGNS = 4
INVALID_SIGN = 5
EMPTY_OPTION_LIST = 6
INVALID_KIND = 7
REPEATED_KIND_A = 8
其他= 9
。
如果sy-subrc <> 0。
消息ID SY-MSGID类型SY-MSGTY编号SY-MSGNO
与SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4。
ENDIF。
rgds
anver
消息的编辑者:Anversha s
消息的编辑者:Anversha s
一周热门 更多>