图标表：ICON

1. 用sscrfields

TABLES: sscrfields.
DATA: lv_function_key TYPE smp_dyntxt.   "功能按钮SELECTION-SCREEN FUNCTION KEY 1.
SELECTION-SCREEN FUNCTION KEY 2.
SELECTION-SCREEN BEGIN OF BLOCK bk1 WITH FRAME TITLE TEXT-001.
PARAMETERS:p_file TYPE rlgrap-filename .
SELECTION-SCREEN END OF BLOCK bk1.INITIALIZATION.CLEAR lv_function_key.lv_function_key-icon_id   = icon_export.lv_function_key-icon_text = '下载模板'.lv_function_key-quickinfo = '下载模板'.sscrfields-functxt_01     = lv_function_key.CLEAR lv_function_key.lv_function_key-icon_id   = icon_import.lv_function_key-icon_text = '上传模板'.lv_function_key-quickinfo = '上传模板'.sscrfields-functxt_02     = lv_function_key.AT SELECTION-SCREEN.CASE sscrfields-ucomm.WHEN 'FC01'.   "下载模板WHEN 'FC02'.   "上传模板WHEN OTHERS.ENDCASE.

2. 用 'ICON_CREATE'

PUSHBUTTON 1(18) 位置（长度）

SELECTION-SCREEN PUSHBUTTON 1(18)  but1 USER-COMMAND export. "定义按钮-下载模板
SELECTION-SCREEN PUSHBUTTON 25(18) but2 USER-COMMAND import. "定义按钮-上传模板INITIALIZATION .CALL FUNCTION 'ICON_CREATE'EXPORTINGname   = 'ICON_EXPORT'  "按钮的图标text   = '下载模板'     "按钮的文本info   = '功能'IMPORTINGresult = but1EXCEPTIONSOTHERS = 0.CALL FUNCTION 'ICON_CREATE'EXPORTINGname   = 'ICON_IMPORT'  "按钮的图标text   = '上传模板'     "按钮的文本info   = '功能'IMPORTINGresult = but2EXCEPTIONSOTHERS = 0.AT SELECTION-SCREEN.CASE sy-ucomm.WHEN 'EXPORT'.    "下载模板WHEN 'IMPORT'.    "上传模板WHEN OTHERS.ENDCASE.

SELECTION-SCREEN PUSHBUTTON 1(18)  but1 USER-COMMAND export. "定义按钮-下载模板
SELECTION-SCREEN PUSHBUTTON 25(18) but2 USER-COMMAND import. "定义按钮-上传模板INITIALIZATION .but1 = '下载模板'.but2 = '上传模板'.AT SELECTION-SCREEN.CASE sy-ucomm.WHEN 'EXPORT'.    "下载模板WHEN 'IMPORT'.    "上传模板WHEN OTHERS.ENDCASE.