ABAP 屏幕参数

 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.  " 产生按钮