选择屏幕的PUSHBUTTON增加图标

PUSHBUTTON占用的行数比一般的要大,所以在它之前或者之后如果要有其它屏幕元素要写,记得用SELECTION-SCREEN SKIP,否则会出错.

 

***第一个是导入的图标,第二个是批量更改的图标

SELECTION-SCREEN PUSHBUTTON 3(25) BUT1 USER-COMMAND CMD1 MODIF ID BL1.
SELECTION-SCREEN PUSHBUTTON 33(25) BUT2 USER-COMMAND CMD2 MODIF ID BL2.

 

1.直接进入TYPE-POOLS:ICON,寻找那个图标的相应ID

INITIALIZATION.

BUT1 = 导入EXCEL'.

BUT2 = 建立需求计划'.

 

2.利用FUNCTION

INITIALIZATION.

  CALL FUNCTION 'ICON_CREATE'
    EXPORTING
      NAME   = ICON_IMPORT
      TEXT   = '导入EXCEL'
      INFO   = '导入EXCEL'
    IMPORTING
      RESULT = BUT1
    EXCEPTIONS
      OTHERS = 0.

  CALL FUNCTION 'ICON_CREATE'
    EXPORTING
      NAME   = ICON_MASS_CHANGE
      TEXT   = '建立需求计划'
      INFO   = '建立需求计划'
    IMPORTING
      RESULT = BUT2
    EXCEPTIONS
      OTHERS = 0.