SELECTION-SCREEN:BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECT-OPTIONS:p_plant FOR ekpo-werks,
p_matnr FOR ekpo-matnr,
p_cdate FOR ekko-bedat,
p_idnlf FOR ekpo-idnlf.
PARAMETERS: p_info LIKE sy-datum DEFAULT sy-datum.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: chk_expr AS CHECKBOX.
SELECTION-SCREEN COMMENT 3(20) text-007 FOR FIELD chk_expr.
SELECTION-SCREEN END OF LINE.
*-- 上面 的 checkbox 文本 在双击 text-007 ,在弹出的窗口里输入描述
PARAMETERS: l_confir AS CHECKBOX.
SELECTION-SCREEN:END OF BLOCK b1.
SELECTION-SCREEN:BEGIN OF BLOCK b2 WITH FRAME TITLE text-002.
SELECTION-SCREEN:BEGIN OF LINE.
PARAMETERS: r_nrele RADIOBUTTON GROUP g1.
SELECTION-SCREEN COMMENT 15(20) text-003 FOR FIELD r_nrele.
SELECTION-SCREEN:END OF LINE.
SELECTION-SCREEN:BEGIN OF LINE.
PARAMETERS: r_yrele RADIOBUTTON GROUP g1 DEFAULT 'X'.
SELECTION-SCREEN COMMENT 15(20) text-004 FOR FIELD r_yrele.
SELECTION-SCREEN:END OF LINE.
SELECTION-SCREEN:BEGIN OF LINE.
PARAMETERS: r_close RADIOBUTTON GROUP g1 .
SELECTION-SCREEN COMMENT 15(20) text-005 FOR FIELD r_close.
SELECTION-SCREEN:END OF LINE.
SELECTION-SCREEN:END OF BLOCK b2.
同一screen 可以设计多个 block ,像上面的 b1 和 b2 可以放在同一程序里。
SELECTION-SCREEN SKIP 1. " 产生空行
SELECTION-SCREEN ULINE. " 画一直线
SELECTION-SCREEN PUSHBUTTON 50(10) TEXT-003 USER-COMMAND BUT1. " 产生按钮