平时在 ‘ 工地搬砖 ’,很少关注基础技能,闲来无事,拿起来复习一下 !
实际在项目中用到的非常之少,所以说学编程,先学框架,在学细节 !,因为细节太多,学不完 !
INCLUDE zmm028_top.
INCLUDE zmm028_sel.
INCLUDE zmm028_frm.
INCLUDE zmm028_pbo.
INCLUDE zmm028_pai.
TABLES:rbkp,rseg,acdoca,mara,marc,mbew.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE TEXT-001.
SELECT-OPTIONS: so_matnr FOR mara-matnr .
SELECT-OPTIONS: so_werks FOR marc-werks .
PARAMETERS: p_vprsv LIKE mbew-vprsv .
PARAMETERS: p_mlast LIKE mbew-mlast .
SELECTION-SCREEN END OF BLOCK b1.
1 PARAMATERS为变量定义输入字段
PARAMETERS <p>[(<length>)] <type> [<decimals>].
给参数分配缺省值 : PARAMETERS <p> ...... DEFAULT <f> ......
禁止参数显示 : PARAMETERS <p> ...... NO-DISPLAY ......
允许参数接收大小写 : PARAMETERS <p> ...... LOWER CASE ......
必须输入的参数字段 : PARAMETERS <p> ......OBLIGATORY ......
创建复选框 : PARAMETERS <p> ...... AS CHECKBOX ......
创建单选按钮组 : PARAMETERS <p> ...... RADIOBUTTON GROUP <radi>......
使用内存缺省值 : PARAMETERS <p> ...... MEMORY ID <pid>......
分配匹配的代码对象 : PARAMETERS <p> ...... MATCHCODE OBJECT <obj> ......
分配修改组:PARAMETERS <p> ...... MODIF ID <key> ......
2 SELECT-OPTIONS定义选择标准
SELECT-OPTIONS <seltab> FOR <f>.
选择表是一个带表头行的内表。
它的行结构是字段字符串,由四个组件构成,即 SIGN、 OPTION、 LOW 和 HIGH。
SIGN表示保存在 OPTION 中的运算符是否需要翻转,
允许值 是 I 和 E;OPTION 包含选择运算符;
LOW 和 HIGH 中的内容为间隔选择指定上界和下界。
给选择标准分配缺省值:
SELECT-OPTIONS <seltab> FOR <f>
DEFAULT <g> [TO <h>]
[OPTION <op>]
SIGN <s>.
<g>和<h>的缺省值可以是实际值 (在单引号中)或是字段名,该字段的值将用做缺省值。
<g>用于设定LOW字段,<h>用于设定HIGH字段。
对于单值选择,<op>可以是 EQ、NE、GE、GT、LE、LT、CP 或 NP,缺省值是 EQ。
对于期间选择,<op>可以是 BT 或 NB,缺省值是 BT 。
SIGN <s>可以是 I(包括)和 E(排除),缺省值是 I。
限制为单行:
SELECT-OPTIONS <seltab> FOR <f> ..... NO-EXTENSION .....
如果指定该选项,则选择屏幕上不出现右箭头,
并且用户不能访问“ 复杂选择” 窗口。
限制为单值:
SELECT-OPTIONS <seltab> FOR <f> ..... NO INTERVALS .....
如果指定该选项,则“ 到”字段不出现在选择屏幕上,
选择屏幕上的输入将限制为单值选择。
但是,用 户可以在“ 复杂选择” 屏幕中输入间隔选择。
3 空行、下划线和注释
空行 SELECTION-SCREEN SKIP [<n>].
下划线 SELECTION-SCREEN ULINE [[/]<pos(len)>] [MODIF ID <key>].
注释 SELECTION-SCREEN COMMENT [/]<pos(len)><name> [FOR FIELD <f>]
[MODIF ID <key>].
4 将几个元素放在同一行
SELECTION-SCREEN BEGIN OF LINE.
...
SELECTION-SCREEN END OF LINE.
5 创建元素块
SELECTION-SCREEN BEGIN OF BLOCK <block> [WITH FRAME [TITLE <title>]][NO INTERVALS].
...
SELECTION-SCREEN END OF BLOCK <block>.
6 在应用工具条上创建按钮
SELECTION-SCREEN FUNCTION KEY <i>.
7 在选择屏幕上创建按钮
SELECTION SCREEN PUSHBUTTON [/]<pos(len)><name>
USER-COMMAND <ucom> [MODIF ID <key>].