示例:
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE TEXT-002. SELECTION-SCREEN:BEGIN OF LINE,PUSHBUTTON 1(15) sel USER-COMMAND sel,PUSHBUTTON 17(15) unsel USER-COMMAND unsel,END OF LINE.SELECTION-SCREEN BEGIN OF LINE. PARAMETERS: c01 TYPE char1 AS CHECKBOX DEFAULT 'X'."科目 SELECTION-SCREEN COMMENT 3(15) TEXT-c01 FOR FIELD c01. PARAMETERS: c02 TYPE char1 AS CHECKBOX DEFAULT 'X'."供应商 SELECTION-SCREEN COMMENT 21(15) TEXT-c02 FOR FIELD c02. SELECTION-SCREEN END OF LINE.
INITIALIZATION
"设置文件选择按钮图标及文字说明CALL FUNCTION 'ICON_CREATE'EXPORTINGname = icon_select_alltext = '全选选择'IMPORTINGresult = selEXCEPTIONSOTHERS = 0.CALL FUNCTION 'ICON_CREATE'EXPORTINGname = icon_deselect_alltext = '全选取消'IMPORTINGresult = unselEXCEPTIONSOTHERS = 0.