SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN PUSHBUTTON 7(20) but1 USER-COMMAND button. " 定义搜索按钮
SELECTION-SCREEN PUSHBUTTON 7(20) but1 USER-COMMAND button. " 定义搜索按钮
SELECTION-SCREEN END OF LINE.
FORM frm_initialization .
CALL FUNCTION 'ICON_CREATE' " 给按钮添加图标和文本
EXPORTING
name = icon_change " 按钮的图片的名字
text = '维护数据' "按钮的文本
info = '维护数据'
IMPORTING
RESULT = but1
EXCEPTIONS
OTHERS = 0.
ENDFORM. "frm_initialization