选择屏幕添加按钮克分为两种,一种是添加Pushbutton ,一种是工具栏添加按钮。下面将分别介绍这两种方法.
一.工具栏添加按钮
1.Top中声明
Table : sscrfields.
2.选择屏幕定义
SELECTION-SCEREEN : FUNCTION KEY 1.
3.在INITIALAZATION对按钮进行初始化
concatenate icon_create 'Button' into sscrfields-functxt_01
4.在Selection-screen 事件完成按钮的响应事件
CASE sscrfields-ucomm.
when 'FC01'.
.......
ENDCASE
二.定义pushbutton
SELECTION-SCREEN PUSHBUTTON 1(22) BUT1 USER-COMMAND DOWNLOAD. " 定义搜索按钮 在选择屏幕定义按钮
INITIALIZATION .
GV_REPID = SY-REPID.
CALL FUNCTION ‘ICON_CREATE’ " 给按钮添加图标和文本
EXPORTING
NAME = ‘ICON_EXPORT’ " 按钮的图片的名字 ICON_EXPORT
TEXT = ‘模版下载’ "按钮的文本
INFO = ‘功能’
IMPORTING
RESULT = BUT1
EXCEPTIONS
OTHERS = 0.
AT SELECTION-SCREEN.
CASE SY-UCOMM.
WHEN ‘DOWNLOAD’.
PERFORM FRM_DOWN_DATA.
WHEN OTHERS.
ENDCASE.