ABAP 选择屏幕多步骤计算模版
点击上方 蓝字 关注我们
If you don't make things happen, then things will happen to you.
你不造就未来，就不能控制发生在你身上的事。
说 明
本文分享一个ABAP选择屏幕多步骤计算模版：
1、添加全选、取消按钮，方便用户操作；
2、添加注意事项块，方便用户查看；
效 果
代 码
TABLES sscrfields .
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE t1 .PARAMETERS p_erdat TYPE sy \- datum DEFAULT sy \- datum . " 计算日期
SELECTION-SCREEN END OF BLOCK b1 .SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE t2 .PARAMETERS
p_cb1 AS CHECKBOX DEFAULT 'X' , " 步骤 1
p_cb2 AS CHECKBOX DEFAULT 'X' , " 步骤 2
p_cb3 AS CHECKBOX DEFAULT 'X' , " 步骤 3
p_cb4 AS CHECKBOX DEFAULT 'X' . " 步骤 4
SELECTION-SCREEN SKIP .SELECTION-SCREEN BEGIN OF LINE .
SELECTION-SCREEN PUSHBUTTON 01 ( 12 ) btn1 USER-COMMAND fbtn1 . "全选
SELECTION-SCREEN PUSHBUTTON 15 ( 12 ) btn2 USER-COMMAND fbtn2 . "取消
SELECTION-SCREEN END OF LINE .
SELECTION-SCREEN END OF BLOCK b2 .SELECTION-SCREEN BEGIN OF BLOCK b3 WITH FRAME TITLE t3 .
SELECTION-SCREEN BEGIN OF LINE .
SELECTION-SCREEN COMMENT 1 ( 79 ) warning1 .
SELECTION-SCREEN END OF LINE .
SELECTION-SCREEN BEGIN OF LINE .
SELECTION-SCREEN COMMENT 1 ( 79 ) warning2 .
SELECTION-SCREEN END OF LINE .
SELECTION-SCREEN BEGIN OF LINE .
SELECTION-SCREEN COMMENT 1 ( 79 ) warning3 .
SELECTION-SCREEN END OF LINE .
SELECTION-SCREEN END OF BLOCK b3 .INITIALIZATION .
t1 = ' 一般数据 ' .
t2 = ' 计算步骤 ' .
t3 = ' 注意事项 ' .
btn1 = ' 全选 ' .
btn2 = ' 取消 ' .
warning1 = '1. 注意事项 1' .
warning2 = '2. 注意事项 2' .
warning3 = '3. 注意事项 3' .
%_p_erdat_%_app_% \- text = ' 计算日期 ' .
%_p_cb1_%_app_% \- text = ' 步骤 1' .
%_p_cb2_%_app_% \- text = ' 步骤 2' .
%_p_cb3_%_app_% \- text = ' 步骤 3' .
%_p_cb4_%_app_% \- text = ' 步骤 4' .
CONCATENATE icon_select_all ' 全选 ' INTO btn1 .
CONCATENATE icon_deselect_all ' 取消 ' INTO btn2 .
AT SELECTION-SCREEN .
CASE sscrfields \- ucomm .
WHEN 'FBTN1' .
p_cb1 = p_cb2 = p_cb3 = p_cb4 = 'X' .
WHEN 'FBTN2' .
CLEAR : p_cb1 , p_cb2 , p_cb3 , p_cb4 .
ENDCASE .以上是今日分享，希望对你有所帮助~~~
欢迎点赞、留言、分享
往期推荐
[ ABAP 选择屏幕-显示/隐藏屏幕元素
](https://mp.weixin.qq.com/s?__biz=Mzg3OTE2Njg0OQ==&mid=2247492363&idx=1&sn=1fdcacd4933568758e3feaa76af05cce&chksm=cf0a37e5f87dbef35cfb9345e4f6211ed42118ca728f8b42f395853bb89b967d166274fa852b&scene=21#wechat_redirect)
[ ABAP 选择屏幕-展开/折叠屏幕元素
](https://mp.weixin.qq.com/s?__biz=Mzg3OTE2Njg0OQ==&mid=2247492011&idx=1&sn=dfbffbc946959c6339193a2323407f9f&chksm=cf0a3545f87dbc53268496f126c19668ae6ea23516c0bd2ae7200e682f8a79cc8333f90a953c&scene=21#wechat_redirect)
[ ABAP 选择屏幕-页签展示
](https://mp.weixin.qq.com/s?__biz=Mzg3OTE2Njg0OQ==&mid=2247492081&idx=1&sn=f5d1a392a99b079b7fbc28a409c0e615&chksm=cf0a351ff87dbc099263f9003abaa1946c31c846808c3674faef4dea18d64334a8675a4647b9&scene=21#wechat_redirect)
点个 在看 你最好看
