SAP ABAP 基础编程教学内容课件.ppt

《SAP ABAP 基础编程教学内容课件.ppt》由会员分享，可在线阅读，更多相关《SAP ABAP 基础编程教学内容课件.ppt（94页珍藏版）》请在三一办公上搜索。

1、SAP-ABAP-基础编程,SAP ABAP 基本语法,ABAP/4 数据元素,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,SAP ABAP 基本语法,变量声明 变量声明包含 name,type,length 和 structure四个部分,使用 DATA 指令,如:DATA:S1 TYPE I,SUM TYPE I.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,SAP ABAP 基本语法,常数声明 常数声明使用 CONSTANTS 指令,如声明宣告 PI 是一个小数点5位的值 3.1415

2、9,CONSTANTS PI TYPE P DECIMALS 5 VALUE 3.14159.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,SAP ABAP 基本语法,TYPE语句用来指定数据型态或声明自定数据型态TYPES.TYPE|LIKE TYPES:BEGIN OF MYLIST,NAME(10)TYPE C,NUMBER1 TYPE I,NUMBER2 TYPE p DECIMALS 2,END OF MYLIST.DATA LIST TYPE MYLIST.,Camelot Information Systems Co.,Ltd.

3、柯莱特信息系统有限公司,SAP ABAP 基本语法,LIKE语句 跟TYPE语句使用格式相同,如 DATA TRANSCODE LIKE SY-TCODE.不同的是 LIKE 用在已有值的数据项,如系统变量,而TYPE叙述则是用在指定数据型态。TYPE对应一个已定义的type LIKE对应一个已定义的object,不能是结构，要定义好的对象,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,SAP ABAP 基本语法,DATA语句 语法:DATA:变量名称,最长30个字符,不可含有+.,:()等字符:数据型态及长度,如 LINE(20)TYPE C

4、.MYNAME LIKE SY-UNAME.:初值:小数位数例:DATA:COUNTER TYPE P VALUE 1,FLAG TYPE C VALUE IS INITIAL,WEIGHT TYPE P DECIMALS 2 VALUE 1.25.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,SAP ABAP 基本语法,TABLES语句 用来声明Table Work Area的数据,对映至 ABAP/4 资料文件(Dictionary Object),由SQL 指令加载所需数据 语法:TABLES,Camelot Information S

5、ystems Co.,Ltd.柯莱特信息系统有限公司,输出数据到屏幕,ULINE AT/().如果没有格式规范，系统则开始新的一行，并用水平线填充该行。否则，只按指定输出水平线,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,Write语句,语法：Write 资料项 数据项可以是常数或变量,如:WRITE This is sample.WRITE:COMPANY:,STFL-CARRID.指定屏幕位置显示 语法：Write AT/()资料项/:先往下一行，pos:屏幕X轴坐标，(len):显示资料的长度 例：WRITE First Line.WR

6、ITE/6 Second Line.输出结果:First Line Second Line,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,Write语句,显示格式参数:LEFT-JUSTIFIED 资料靠左显示 CENTERED 资料靠中间显示 RIGHT-JUSTIFIED 资料靠右显示 UNDER 在资料项的X轴开始坐标显示 NO-GAP 紧接着显示,不留空格 USING EDIT MASK 使用内嵌字符显示,如 11:20:30 USING NO EDIT MASK 不使用内嵌字符 NO-ZERO 数字前面0 的部分不显示 NO-SIGN

7、 不显示正负号 DECIMALS 显示 d 位小数字数 EXPONENT F(浮点数)exponent 的值 ROUND 四舍五入至小数位数下 r 位 CURRENCY 币别显示,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,Write语句,产生空白列产生 n 个空白列语法：SKIP NO STANDARD PAGE HEADINGLINE-SIZE 175,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,Write语句,Camelot Information Systems Co.,Ltd.柯莱

8、特信息系统有限公司,WRITE 练习,用WRITE语句画成下列样子,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,赋值,语法：MOVE TO 将F1的值存至变量 F2 中,也可写成 F2=F1清除变量内容 语法：CLEAR 清除变量现在内容,恢复成初值。例：DATA N TYPE I VALUE 100.CLEAR N.“变量 N 的内容变成 0,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,字符串数据处理,字符串移位 语法：SHIFT BY PLACES：(1)空白,字符串往左移一位(2)LE

9、FT,字符串往左移 n 位(3)RIGHT,字符串往右移n位(4)CIRCULAR,字符串往左以环状方式移位 例：DATA STRING(10)TYPE C VALUE ABCDEFGHIJ.SHIFT STRING.“得到 BCDEFGHIJ SHIFT STRING BY 2 PLACES RIGHT.“得到 ABCDEFGH,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,字符串数据处理,在字符串中寻找部分字符串 语法：SEARCH FOR 会存至两个变量：SY-SUBRC和SY-FDPOS,若找到则SY-SUBRC 为 0,SY-FDPO

10、S 存开始位迭；若找不到则 SY-SUBRC为 4,SY-FDPOS为 0。,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,字符串数据处理,取代字符串内容 语法：REPLACE WITH INTO 将字符串 中的 以 来取代例：DATA:STRING(10)TYPE C VALUE ABCDEFGHI,STR1(3)TYPE C VALUE DEF,STR2(3)TYPE C VALUE 123.REPLACE STR1 WITH STR2 INTO STRING.WRITE/STRING.“得到 ABC123GHI,Camelot Infor

11、mation Systems Co.,Ltd.柯莱特信息系统有限公司,字符串数据处理,大小写的转换 语法：TRANSLATE TO UPPER CASE.“转成大写 TRANSLATE TO LOWER CASE.“转成小写,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,字符串数据处理,字符串长度 语法：STRLEN()例：INT=STRLEN(XYZABC).“得到 6 INT=STRLEN(ABC).“得到 3 字符串长度 语法：STRLEN()例：INT=STRLEN(XYZABC).“得到 6 INT=STRLEN(ABC).“得到 3

12、,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,字符串数据处理,取部分字符串 语法：+例：DATA T(10)TYPE C VALUE ABCDEFGHIJ.WRITE/T+2(4).“得到 CDEF,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,字符串数据处理,合并字符串 语法：CONCATENATE.INTO SEPARATED BY.例：DATA:C1(10)VALUE Sum,C2(3)VALUE mer,C3(5)VALUE holi,C4(10)VALUE day,C5(30),SE

13、P(3)VALUE-.CONCATENATE C1 C2 C3 C4 INTO C5.WRITE C5.“SummerholidayCONCATENATE C1 C2 C3 C4 INTO C5 SEPARATED BY SEP.WRITE/C5.“Sum-mer-holi-day,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,字符串数据处理,分割字符串 语法：SPLIT AT INTO.例：DATA:STRING(60),P1(20),P2(20),P3(20),P4(20),DEL(3)VALUE*.STRING=Part 1*Part 2

14、*Part 3*Part 4*Part 5.WRITE STRING.“Part 1*Part 2*Part 3*Part 4*Part 5SPLIT STRING AT DEL INTO P1 P2 P3 P4.WRITE/P1.“Part 1WRITE/P2.“Part 2WRITE/P3.“Part 3WRITE/P4.“Part 4*Part5,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,字符串数据处理,去前置空格 语法：CONDENSE(F)NO-GAPS.其中：NO-GAPS 去所有空格,Camelot Information S

15、ystems Co.,Ltd.柯莱特信息系统有限公司,字符串练习,字符串:a*b*c*d*f*g1.用分裂语句将其他内容分裂.2.将分裂后的值转换成大写.3.将这些值合并.输出4.只输出第三个.第五个字段.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,流控制,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,比较符号,条件语句,IF语句 语法：IF.ELSEIF.ELSEIF.ELSE.ENDIF.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,条

16、件语句,CASE 语句 语法：CASE.WHEN.WHEN.WHEN OTHERS.ENDCASE.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,循环语句,计数循环语句 语法：DO n TIMES VARYING FROM TO.ENDDO.例1：DO 2 TIMES.执行结果:WRITE/X.X ENDDO.X,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,循环语句,条件循环语法：WHILE.ENDWHILE例：I=1.S=0.WHILE I=10.S=S+I.I=I+1.ENDWHILE.

17、WRITE:/1+2+3+10=,S.执行结果为:1+2+3+10=55,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,循环控制语句,CONTINUE：跳至循环的下一次 例：DO 3 TIMES.IF SY-INDEX=2.CONTINUE.WRITE/SY-INDEX.ENDDO.执行结果:1 3,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,循环控制语句,CHECK CHECK 之后条件成立才继续往下执行循环。例：DO 5 TIMES.CHECK SY-INDEX BETWEEN 2 AND

18、 4.WRITE/SY-INDEX.ENDDO.执行结果：2 3 4,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,循环控制语句,跳离循环语句语法:EXIT 例：DO 10 TIMES.执行结果:IF SY-INDEX=4.1 EXIT.2 ENDIF 3 WRITE/SY-INDEX.ENDDO.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,注释结构,可以在程序的任意处插入注释行。在程序中有两种方法表明注释：如果要将整行变为注释，则在行开始处输入星号（*）。如果要将某行的一部分变为注释，则在

19、注释之前输入双引号（）。例：PROGRAM SAPMTEST.*The following line contains a WRITE statementWRITE First Program.Output on List,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,循环练习,1.字符串:a*b*c*d*f*g将*换成+输出,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表,内表的声明使

20、用 TYPE 语句 语法：TYPES:BEGIN OF T_TAB,COL1 TYPE CHAR10,COL2 TYPE CHAR10,END OF T_TAB.DATA:IT_TAB TYPE STANDARD TABLE OF T_TAB,WITH HEADER LINE WA_TAB TYPE T_TAB.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内表的声明,常见的几种方式TYPES:BEGIN OF LINE,COL1 TYPE I,COL2 TYPE I,COL3 TYPE I,END OF LINE.data ITAB TYP

21、E LINE OCCURS 10.声明一个内部表 ITAB,总共有10个元素,其WORK AREA 名称为 LINE直接声明,不使用作业領域语法：DATA:BEGIN OF OCCURS,END OF.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表,根据定义方式区分语法1：DATA TYPE|LIKE OCCURS 0 WITH HEADER LINE.语法2：DATA TYPE|LIKE OF WITH INITIAL SIZE WITH HEADER LINE(表的三种类型Standard表，Sorted表，Hashed表。其中St

22、andard表，Sorted 表是Index表)例：DATAITAB TYPE HASHED TABLE OF SPFLI WITH UNIQUE KEY CARRID CONNID.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表,加入另一内部表的元素 语法：APPEND LINES OF FROM TO TO 例:APPEND WA_TAB TO IT_TAB.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表,插入行插入元素在指定的内部表位置之前 语法1|：INSERT INTO

23、 INITIAL LINE INTO Table INDEX Initial Line To 为增加一预设初值的元素，不带headline。语法2|：INSERT“带headline。,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表,汇总行在加入新元素时将有相同standard key(非数值字段)的数值字段汇总 语法：COLLECT INTO 例：DATA:BEGIN OF ITAB OCCURS 3,COL1(3)TYPE C,COL2 TYPE I,END OF ITAB.ITAB-COL1=ABC.ITAB COL2=10.COL

24、LECT ITAB.ITAB-COL1=XYZ.ITAB-COL2=20.COLLECT ITAB.ITAB-COL1=ABC.ITAB-COL2=30.COLLECT ITAB.“汇总COL2 至 COL1=ABC 的元素上 LOOP AT ITAB.WRITE:/ITAB-COL1,ITAB-COL2.ENDLOOP.执行结果:ABC 40 XYZ 20,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表,例：DATA:BEGIN OF LINE,COL1 TYPE I,COL2 TYPE I,END OF LINE.DATA ITAB

25、LIKE LINE OCCURS 10.DO 3 TIMES.LINE-COL1=SY-INDEX*10.LINE-COL2=SY-INDEX*20.APPEND LINE TO ITAB.ENDDO.LINE-COL1=100.LINE-COL2=200.INSERT LINE INTO ITAB INDEX 2.“插入在位置2”,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表,LOOP AT ITAB INTO LINE.WRITE:/SY-TABIX,LINE-COL1,LINE-COL2.“SY-TABIX为表位置 ENDLOOP

26、.执行结果:1 10 20 2 100 200“插入的元素 3 20 40 4 30 60,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表,读取内部表指定位置的元素语法：READ Table INTO INDEX 自指定位置 读取元素数据 例1：READ Table IT_ITAB INTO WA_LINE INDEX 5 读取 IT_ITAB的第5个元素数据,放入 WA_LINE的字段中 IT_ITAB为不带HEADLINE的内部表语法：READ Table INTO WITH KEY=值例:READ TABLE IT_TAB INTO

27、 WA_TAB WITH KEY COL1=1 COL2=2.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表,内部表的循环语法：LOOP AT INTO FROM TO WHERE ENDLOOP.例:LOOP AT IT_TAB INTO WA_TAB.COL1=1.COL2=2.ENDLOOP.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表,修改元素内容 语法：MODIFY FROM INDEX TRANSPORTING WHERE MODIFY IT_TAB FROM WA

28、_TAB INDEX SY-TABIX TRANSPORTING COL1 COL2 WHERE KEY1=AND KEY2=.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表,删除内部表的元素 语法1：DELETE INDEX 语法2：DELETE FROM TO WHERE 例2：DELETE ITAB FROM 3 TO 10.删除第3至第10个元素，ITAB带HEADLINE 例3：DELETE IT_TC WHERE CHECKED=C_CHECKED.“IT_TC带HEADLINE 例4：DELETE ITAB FROM WA

29、_TC.“ITAB不带HEADLINE,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表,内部表排序 语法：SORT ASCENDING|DESCENDING BY.DESCENDING为降序，ASCENDING为升序，省略时为升序。:为指定的字段 SORT ITAB BY ZXHINMEI WERKS.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表,计算数值字段总和 语法：SUM 计算得总和存在work area 中,但只能存在 LOOP 语句中。例：LOOP AT ITAB IN

30、TO LINE.SUM.ENDLOOP.WRITE:/LINE-COL1,LINE-COL2.“LINE-COL1 和 LINE-COL2 存放数值总和,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表,初始化表 语法：REFRESH 使用在没有HEADER LINE 的内部表中,清除所有元素 例：REFRESH ITAB清除表 语法：CLEAR 使用在有HEADER LINE 的内部表中,清除所有元素 例：CLEAR ITAB.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表,释放内

31、存空间 语法：FREE 释放(Release)内部 表所占的内存空间,用在REFRESH和CLEAR指令之后例：FREE ITAB.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表,取得表行数语法1：DESCRIBE 表 LINES OCCURS KIND.例:DESCRIBE TABLE IT_TAB LINES L_COUNT.取得字段长度例:DESCRIBE FIELD COL1 LINES L_COUNT.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内表练习,Camelot I

32、nformation Systems Co.,Ltd.柯莱特信息系统有限公司,内部表事件,AT FIRST.AT BEGIN OF.AT END OF.AT LAST.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表事件,AT FIRST语法:第一条记录 LOOP AT IT_TAB INTO WA_TAB.AT FIRST ENDAT.ENDLOOP.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表事件,AT BEGIN OF语法:只在该字段值第一次出现 LOOP AT IT_TA

33、B INTO WA_TAB.AT BEGIN OF COL1.ENDAT.ENDLOOP.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表事件,AT END OF语法:只在该字段值最后一次出现 LOOP AT IT_TAB INTO WA_TAB.AT END OF COL1.ENDAT.ENDLOOP.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表事件,AT LAST语法:最后一条记录 LOOP AT IT_TAB INTO WA_TAB.AT LAST.ENDAT.ENDLOO

34、P.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表事件,例 TYPES:BEGIN OF T_C,T1(4)TYPE C,T2 TYPE I,END OF T_C.DATA IT TYPE TABLE OF T_C WITH HEADER LINE.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,内部表练习,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,SQL 指令,SELECT指令语法：SELECT FROM INTO WHERE GR

35、OUP BY ORDER BY,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,SQL 指令,以循环方式读取所有记录 语法：SELECT DISTINCT*.ENDSELECT.加上DISTINCT会自动去除重复的记录例：TableS SPFLI.SELECT*FROM SPFLI WHERE COMPANY=DELTA.WRITE:/PLANT,TEL.ENDSELECT.以循环的方式打印出符合条件的记录。,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,SQL 指令,读取单笔记录 语法1：SEL

36、ECT SINGLE*INTO FROM WHERE 语法2:SELECT*UP TO 1 ROWS INTO FROM WHERE,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,SQL 指令,将读取的数据写入 Internal Table 中 语法1：SELECT.INTO Table 例1：TableS SPFLI.DATA ITAB LIKE SPFLI OCCURS 10 WITH HEADER LINE.SELECT*FROM SPFLI INTO ITAB.一次读10笔(Initial Table的长度)记录存入 ITAB 中,Ca

37、melot Information Systems Co.,Ltd.柯莱特信息系统有限公司,SQL 指令,将读取的记录存放至 Work Area 语法：SELECT.INTO 例：TableS SPFLI.DATA WA LIKE TableS.SELECT*FROM SPFLI INTO WA.WRITE:/WA-COMPANY,WA-PLANT.ENDSELECT.逐笔写入WA 工作区中,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,SQL 指令,条件语句 语法:：WHERE BETWEEN AND LIKE 表示条件包含的字符串 _:表示

38、一个字符%:表示一个字符串IN(.)包含在 的条件例：.WHERE PLANT IN(TAOYUAN,CHUNGLI,LIUTU).条件为 PLANT 是 TAOYUAN,CHUNGLI或LIUTU的记录,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,SQL 指令,ORDER BY 语句 指定排序的字段或顺序ORDER BY PRIMARY KEY.根据 PRIMARY KEY 递增排序 ORDER BY DESCENDING DESCENDING,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,

39、SQL 指令,INSERT指令 语法：INSERT INTO VALUES 自 Work Area 工作区 例:INSERT SPFLI VALUES WA语法：INSERT FROM Table ACCEPTING DUPLICATE KEY 自内部表 例:INSERT SPFLI FROM Table ITAB ACCEPTING DUPLICATE KEY.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,SQL 指令,UPDATE指令 语法1：UPDATE FROM 例:UPDATE SPFLI FROM WA语法2：UPDATE SET

40、=WHERE,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,SQL 指令,MODIFY指令要在数据库 表中插入一 行，而不考虑该行的主码是否已经存在，请使用 MODIFY 语句。根据 Primary Key 寻找数据文件中符合的记录,若找到则更新修改（与UPDATE 的操作相同）,若找不到则新增记录（与INSERT 的操作相同）。语法：MODIFY FROM,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,SQL 指令,DELETE指令语法1：DELETE FROM 语法2：DELETE FROM

41、 WHERE,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,SQL 指令,COMMIT AND ROLLBACK(提交和回滚)当你在修改数据库的时候,语句执行完之后,并没有真正地提交到了数据库进行修改.而是放到了缓存里,此时我们要用COMMIT WORK.去提交.当我们因为种种原因修改没有成功的时候,我们要用ROLLBACK去回滚,也就是,撤消那些对数据库的操作.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,SQL 指令,锁表,Camelot Information Systems Co.,L

42、td.柯莱特信息系统有限公司,SQL 指令,SELECT INNER JOINFOR ALL ENTRIES IN,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,事件,INITIALIZATION-在显示选择屏幕之前的点 AT SELECTION-SCREEN-选择屏幕仍然活动时，处理用户在选择屏幕上输入之后的点 START-OF-SELECTION-处理选择屏幕之后的点 END-OF-SELECTION-处理完逻辑数据库提供的所有行之后的点 TOP-OF-PAGE-启动新页时，列表处理中的点 END-OF-PAGE-结束页时，列表处理中的点,

43、Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,屏幕输入命令,PARAMETER SELECTION-OPTIONS,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,屏幕输入命令,PARAMETER语法：PARAMETERS DEFAULT LOWER CASE OBLIGATORY NO-DISPLAY AS CHECKBOX RADIOBUTTON GROUP,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,屏幕输入命令,CHECKBOX语法：PA

44、RAMETERS.AS CHECKBOX.参数 按长度为1的类型C创建 例：PARAMETERS:TAX AS CHECKBOX DEFAULT X,NTD AS CHECKBOX.执行结果：,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,屏幕输入命令,RADIOBUTTON 语法：PARAMETERS.RADIOBUTTON GROUP.参数 按类型C，长度1创建，并分配到组。字符串 的最大长度是4。必须为每个 组分配至少两个参数。每个组中只有一个参数可以用 DEFAULT选项分配的缺省值。该值必须是 X。例：PARAMETERS:BOY R

45、ADIOBUTTON GROUP SEX DEFAULT X,GIRL RADIOBUTTON GROUP SEX.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,屏幕输入命令,SELECT-OPTIONS 条件筛选检查条件输入画面指令,输入条件后可配合SELECT指令自TABLE读取符合条件的数据,直接执行或放入 Internal Table中,条件有四个参数：SIGN：I:表筛选条件符合的资料 E:表筛选条件不符合的资料 OPTION：比较的条件符号 EQ(等于),NE(不等于),GT(大于),LE(小于),CP(包含),NP(不包含)LO

46、W：最小值 HIGH：最大值,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,屏幕输入命令,SELECT-OPTIONS语法：SELECT-OPTIONS FOR.例：TABLES YUSR05.SELECT-OPTIONS AIRLINE FOR YUSR05-PARID.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,屏幕输入命令,SELECT-OPTIONS 参数NO-EXTENSIONNO INTERVALSOBLIGATORY,Camelot Information Systems Co

47、.,Ltd.柯莱特信息系统有限公司,屏幕输入命令,BLOCKSELECTION-SCREEN BEGIN OF BLOCK BLOCK_DEL_TYPE WITH FRAME TITLE TEXT-P01.SELECTION-SCREEN END OF BLOCK BLOCK_DEL_TYPE.SELECTION-SCREEN SKIP 1.SELECTION-SCREEN BEGIN OF LINE.SELECTION-SCREEN END OF LINE.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,屏幕输入命令,例:SELECTION-

48、SCREEN BEGIN OF BLOCK BLOCK_DEL_TYPE WITH FRAME TITLE TEXT-P01.PARAMETERS PA_BUKRS LIKE T001-BUKRS.SELECTION-SCREEN SKIP 1.SELECTION-SCREEN BEGIN OF LINE.SELECTION-SCREEN COMMENT(22)TEXT-T01.SELECTION-SCREEN POSITION 33.PARAMETERS:PC_CHECK AS CHECKBOX.SELECTION-SCREEN COMMENT 36(16)TEXT-T02 FOR FIEL

49、D PC_CHECK.SELECTION-SCREEN END OF LINE.SELECTION-SCREEN END OF BLOCK BLOCK_DEL_TYPE.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,屏幕输入命令,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,屏幕输入命令练习,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,MESSAGE&TCODE,MESSAGE TCODE:SE91语法:MESSAGE E000(XXX)WI

50、TH MESSAGE.错误类型:E:错误,程序结束S:正确,程序不结束,继续进行W:警告,程序不结束,继续进行I:信息,会弹出一个信息框A:严重错误,程序中止.,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,MESSAGE&TCODE,TCODETcode:SE93,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,ABAP 基础培训,END谢谢,Camelot Information Systems Co.,Ltd.柯莱特信息系统有限公司,Camelot Information Systems C