-------------------------------------------------------------
语法Q?FONT face="Times New Roman">PARAMETERS <p> [DEFAULT <f>] [LOWER CASE]
[OBLIGATORY] [AS CHECKBOX]
2?SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-bidi-font-size: 10.5pt; mso-fareast-font-family: 宋体; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA">SELECTION-OPTIONS: 使用条g{选画面来输入数据
-------------------------------------------------------------
语法Q?SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-bidi-font-size: 10.5pt; mso-fareast-font-family: 宋体; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA">SELECTION-OPTIONS <check-option> FOR <table-field>
[DEFAULT <begin> TO <end>]
[NO-EXTENSION]
[LOWER CASE]
[OBLIGATORY]
[Select 指o(h)]
3?/FONT>SELECTION-SCREEN : 输出I白列、底Uѝ备注说明、多个数据据、黑U等
-------------------------------------------------------------------
语法Q?SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-bidi-font-size: 10.5pt; mso-fareast-font-family: 宋体; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA">SELECTION-SCREEN SKIP [<n>]
[ULINE / <pos>(length)]
[BEGIN OF LINE.
…?/SPAN>
SELECTION-SCREEN END OF LINE.]
[BEGIN OF BLOCK <block> [WITH FRAME [TITLE <title>].
…?
SELECTION-SCREEN END OF BLOCK <block>.]
]]>
----------------------------------------------------------------------------------------
(1) 宏定义：(x)
DEFINE <macro>.
<宏叙q?gt;.
END-OF-DEFINITION.
(2) 宏用：(x)
<macro> [<p1> <p2>?]
* <p1> Z入宏的参数?/SPAN>, 在参数间臛_要给予一个空?BR>
2、包含子E序
------------------------------------------------------------------
语法Q?SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-bidi-font-size: 10.5pt; mso-fareast-font-family: 宋体; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA">INCLUDE <include program file>
作用Q?SPAN style="FONT-SIZE: 12pt; FONT-FAMILY: 宋体; mso-bidi-font-size: 10.5pt; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'; mso-bidi-font-family: 'Times New Roman'">用于׃n数据，比如全局变量
3、子E序
------------------------------------------------------------------
1、声明：(x)
FORM <subr> [<pass>].
<subroutine statement block>
ENDFORM.
2、调用：(x)
(1) 内部调用Q?SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-bidi-font-size: 10.5pt; mso-fareast-font-family: 宋体; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA">PERFORM <subr> [<pass>]
(2) 外部调用Q?BR> ?调用另一E序
PERFORM <subr>(<prog>) [<pass>] [IF FOUND]
?调用另一专存攑֭E序的程序文?BR> PERFORM (<fsubr>) [IN PROGRAM (<fprog>) [<pass>] [IF FOUND]
* 参数传?BR> ------------------------------------------------------------------
(1) 地址传递：(x)
FORM <subr> [USING <f1> <f2>…] [CHANGING <f1>…]
(2) g递：(x)
FORM <subr> USING VALUE(<f1>?
?BR> PERFORM <subr> USING <f1>
(3) 传入时g递，传出时改变返回参数?nbsp;
?BR> PERFORM ? CHANGING ? <f1>
* Check控制Q?SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-bidi-font-size: 10.5pt; mso-fareast-font-family: 宋体; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA">CHECK <Condition>Q只?SPAN style="FONT-SIZE: 12pt; FONT-FAMILY: 宋体; mso-bidi-font-size: 10.5pt; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA; mso-ascii-font-family: 'Times New Roman'; mso-hansi-font-family: 'Times New Roman'; mso-bidi-font-family: 'Times New Roman'">条g成立才l往下子E序叙述
4、函?BR> ------------------------------------------------------------------
(1) 查看pȝ函数
IMPORTING F1=a1?
EXPORTING F1=a1?
CHANGING F1=a1?BR> TABLES F1=a1?BR> EXCEPTIONS F1=a1?nbsp;
]]>
1、按操作分类QDDL和DML
2、按是否有缓存分c：(x)
(1) OPEN SQL Q数据库与命令编译器存在~存Q如Select * From <Itab>....
(2) Native SQLQ直接处?BR>
二、创建字典表
--------------------------------------------------------------------------------------
语法Q?SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-bidi-font-size: 10.5pt; mso-fareast-font-family: 宋体; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA">TABLES table
三、处理字典表
--------------------------------------------------------------------------------------
1、查?nbsp;
------------------------------
语法QSELECT <result> FROM <source> [INTO <target>] [WHERE <condition>]
[GROUP BY <fields>] [ORDER BY <sort_order>].
2、插?BR> ------------------------------
(1) Work Area插入Q?BR> 语法Q?SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-bidi-font-size: 10.5pt; mso-fareast-font-family: 宋体; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA">INSERT INTO <database> VALUES <wa>
(2) 表间插入
语法Q?SPAN lang=EN-US style="mso-bidi-font-size: 10.5pt; mso-fareast-font-family: 宋体; mso-fareast-language: ZH-CN">INSERT <database> FROM TABLE <itab> [ACCEPTING DUPLICATE KEY]
3、更?BR> ------------------------------
(1) 更改单行
语法QUPDATE <dbtab> [CLIENT SPECIFIED] FROM <wa>.
?BR> UPDATE <dbtab> [CLIENT SPECIFIED].
(2) 更改多行
语法Q?SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-bidi-font-size: 10.5pt; mso-fareast-font-family: 宋体; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA">UPDATE <database> SET < f1>=<values>?SPAN style="mso-spacerun: yes"> WHERE <condition>.
(3) 表间更改
语法Q?SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-bidi-font-size: 10.5pt; mso-fareast-font-family: 宋体; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA">UPDATE <dbtab> [CLIENT SPECIFIED] FROM TABLE <itab>.
(4) Modify更改Q有则更改，无则插入Q?BR> 语法Q?SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-bidi-font-size: 10.5pt; mso-fareast-font-family: 宋体; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA">MODIFY <database> FROM <wa>.
4、删?BR> ------------------------------
(1) 使用关键字删?BR> 语法Q?SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-bidi-font-size: 10.5pt; mso-fareast-font-family: 宋体; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA">DELETE <database> FROM <wa>
(2) 使用条g删除
语法Q?SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-bidi-font-size: 10.5pt; mso-fareast-font-family: 宋体; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA">DELETE FROM <database> WHERE <condition>
5、用游?BR> ------------------------------
(1) 打开Q?BR> 语法Q?SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-bidi-font-size: 10.5pt; mso-fareast-font-family: 宋体; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA">OPEN CURSOR <c> FOR SELECT ?SPAN style="mso-spacerun: yes"> WHERE <condition>
(2) 使用Q?BR> 语法Q?SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-bidi-font-size: 10.5pt; mso-fareast-font-family: 宋体; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA">FETCH NEXT CURSOR <c> INTO <wa>
(3) 关闭Q?BR> 语法Q?SPAN lang=EN-US style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-bidi-font-size: 10.5pt; mso-fareast-font-family: 宋体; mso-ansi-language: EN-US; mso-fareast-language: ZH-CN; mso-bidi-language: AR-SA">CLOSE CURSOR <c>
四、提交与回退
--------------------------------------------------------------------------------------
(1) 提交QCOMMIT WORK
(2) 回退QROLLBACK WORK
]]>
2、选择QIF和CASE
--------------------
(1) IF语法:
IF <condition1>.
<statement block>
ELSEIF <condition2>.
<statement block>
ELSEIF <condition3>.
<statement block>
.....
ELSE.
<statement block>
ENDIF.
(2) CASE语法Q?BR> CASE <f>.
WHEN <F1>.
<statement block>
WHEN <F2>.
<statement block>
WHEN <F3>.
<statement block>
WHEN ...
......
WHEN OTHERS.
<statement block>
ENDCASE.
3?nbsp;循环QDO和W(xu)HILE
------------------------------------
(1) 计次循环Q?BR> DO [<n>TIMES] [VARYING <f> FROM <F1> NEXT <F2>].
<statement block>
ENDDO.
(2) 无限循环Q?BR> DO .
<Statement Block>
ENDDO.
(3) 条g循环Q?BR> WHILE <condition> [VARY <f> FROM <F1> NEXT <F2>].
<statement block>
ENDWHILE.
* l止循环Q?BR> ------------------------------------
?无条件终止@环：(x)CONTINUE
?有条件终止@环：(x)CHECK
?完全l止循环Q?nbsp; EXIT
]]>
-------------------------------------
(1) 不指定位|输出：(x)Write 资料?
(2) 指定位置输出Q?nbsp; Write AT [/] [<pos>] [(<len>)] 资料?
(3) 指定昄格式Q?nbsp; WRITE 数据?nbsp; <昄格式参数>.
(4) 输出图标Q?nbsp; WRITE <symbol-name> AS SYMBOL.
WRITE <icon-name> AS ICON.
(5) 输出、垂直线、空行：(x)
?水^U：(x)write [at [/][<pos>][(<len>)]] sy-uline.
?垂直U：(x)write [at [/][<pos>]] sy-vline.
?IQ?nbsp; WRITE SKIP [<n>].
(6) 输出复选框Q?nbsp; Write 标签Q变?As CheckBox.
2. 跌指定列坐标：(x)Skip to line [<n>].
* 资料Ҏ(gu)变量或常?BR>
* 预定义数据类型的输出格式
----------------------------------------------
数据cd 输出长度 定位
C 字段长度 左对?nbsp;
D 8 左对?nbsp;
F 22 叛_?nbsp;
I 11 叛_?nbsp;
N 字段长度 左对?nbsp;
P 2*字段长度Q＋1Q?nbsp; 叛_?nbsp;
T 6 左对?nbsp;
X 2*字段长度 左对?nbsp;
----------------------------------------------
在屏q上Q输出通常是左寚w? 但数据类型F、I和P是右寚w的，左边用空格填充?BR>
]]>
Type Length Range Initial Value Description
C 1 1-65535Byte Space 字符串数?/SPAN>, ?/SPAN>’Program?
D 8 8Byte ?0000000?SPAN style="mso-spacerun: yes"> 日期数据, 格式?/SPAN>YYYYMMDD
F 8 8Byte 0 点?/SPAN>
I 4 -2^31?/SPAN>2^31-1 0 整数
N 1 1-65535Byte ?0??SPAN style="mso-spacerun: yes"> 数值所l成的字W串
P 8 1-16Byte 0 Packed ?/SPAN>, 用在数Ҏ(gu)
T 6 6Byte ?00000?SPAN style="mso-spacerun: yes"> 旉数据, 格式?/SPAN>HHMMSS
X 1 1-65535Byte X?0?SPAN style="mso-spacerun: yes"> 16q位?BR>
1、定义数据结?BR> ----------------------------------------------------------------
(1) 变量: Data 变量?Type 变量cdQ如QData S1 Type I.
(2) 帔RQConstants 帔R?Type 变量cdQ如QConstants PI Type P 3.1415926.
(3) ?rn)态变量：(x)STATICS <c> [<length>] <type> [<value>] [<decimals>]
(4) 自定义变量类型：(x)
Types: Begin of 自定义变量类?
变量? Type 变量cd1,
变量? Type 变量cd2,
End of 自定义变量类?
Data 自定义变?Type 自定义变量类?
(5) 字段变量Q?BR> Data: Begin of Address,
Name(10) Type C,
Number Type P,
End of Address.
(6) 内表Q?BR> Table: 表名.
例：(x)
TABLES: SPFL.
SELECT * FROM SPFL.
WRITE: SPFL-MANDT, SPFL-CARRID,SPFL-CONNECTION.
ENDSELECT.
2、系l定义数?BR> -----------------------------------------------------------------
SPACE I白字符?BR> SY-SUBRC pȝ执行传回? 0 表示成功
SY-UNAME logon帐号
SY-DATUM pȝ日期
SY-UZEIT pȝ旉
SY-TCODE ?BR>
]]>