ABAP基本语法.doc

ABAP基本语法目 录1表声明12定义变量13常用算术操作符：14常用比较操作：15赋值语句26IF语句27CASE语句28DO语句29WHILE语句210从数据库中取数据集211取出单行记录212WRITE语句313ULINE语句314SKIP语句315定义常量316定义结构317TYPES语句418LIKE语句419输入参数520分块语句521定义内表522往内表中添加记录623用LOOP读取内表数据624用READ读取内表数据625把数据库的记录读入内表626CLEAR清空表头和表记录627DELETE删除内表记录628REFRESH删除内表记录629FREE删除内表记录730在内表中插入记录731修改内表记录732对内表进行排序733内表的控制语句734循环跳转语句735常用系统变量836子程序的定义837子程序的调用838子程序的参数传递839常用事件840跳出事件的方法9ABAP/4：Advanced Business Application Programming1表声明Tables: 表名,表名. 声明多个表时可用逗号分隔当你声明了一个数据表的同时，系统也同时自动生成了一个和数据表同名的结构，结构的变量集等于数据表里面的字段。2定义变量Data: v1(l) type t decimals d value xxx. v1 是变量名。 (l) 是变量的长度。 t 是数据类型。 d是小数位。 xxx 是缺省值。如：data num(10) type p decimals 3 value 1.12.数据类型描述缺省长度最大长度可用字符缺省值C字符型165536任意字符空N数字文本1655360 90D日期8（固定）-0 900000000T时间8（固定）-0 9000000X十六进制数1655360 9，A F数据类型描述缺省长度最大长度最大小数位缺省值I整型4（固定）-00P十进制数816140F浮点型88150.13常用算术操作符：算术符描述+加法-减法*乘法/除法*取幂DIV整除MOD取模4常用比较操作：比较操作描述v1 = v2等于v1 v2不等于v1 v2大于v1 = v2大于等于v1 = v2小于等于v1 between v2 and v3在之间not v1 between v2 and v3不在之间5赋值语句total = 10. mess = this is a test! .如果字符串中包括 号，用 进行付值，如：mess = this is a test! .6IF语句if i = 2. write i 等于 2.else. write i 不等于 2. endif.7CASE语句case i. 类似于VFP中的DO CASE语句 when 1. write i = 1. when 2. write i = 2. when others. write i 1 and i 2.endcase.8DO语句do n times. 类似于VFP中的FOR语句 执行代码 enddo.9WHILE语句 while 条件. 类似于VFP中的DO WHILE语句 执行语句endwhile.10从数据库中取数据集select * from 数据表 where 条件. 操作语句endselect.如：select * from t000 where mandt 100. 结构不同的情况select mandt mtext from t000 appending table it. 在内表中追加记录26CLEAR清空表头和表记录clear 内表. 如果内表没有表头的话，该语句将会把内表的记录清空clear 内表 . 必须紧跟内表，且 间不能有空格27DELETE删除内表记录delete it (a) index n “删除指定行记录 (b) from i to j “删除指定范围记录 (c) where exp “删除符合条件记录it为内表名n,i,j 为记录编号exp 为搜索条件28REFRESH删除内表记录refresh 内表.该语句删除所有记录但保留表头，内表所占用的内存仍保留。29FREE删除内表记录free 内表.该语句删除所有记录但保留表头，内表所占用的内存也被释放。30在内表中插入记录insert wa into it index n.wa 为结构。it为内表。n 为记录编号。记录会插入到编号的位置，原来的记录则向下移一位。31修改内表记录modify it from wa index n transporting c1 c2 . where exp it 为内表wa 为结构，缺省为使用表头。n 为记录编号c1 c2 为内表中的字段,指明要更新哪些字段，缺省为全部更新。exp 为条件32对内表进行排序sort it by f1 ascending|descending.it 为内表f1 为要排序的字段ascending 升序排列（默认）descending 降序排列33内表的控制语句sum. 对内表中可计算字段进行合计，只能作用于LOOP中。at first. 当从内表中读取第一条记录的时候，会触发at first事件，At first 常用于画表头的作用，或者做表头的合计。at last. 和at first相反，at last是在读取最后一条记录的时候触发at new of p1. 当一条记录指定字段的值和上一条记录的相应字段的值有改变时，触发该事件at end of p1. 当一条记录指定字段的值和下一条记录的相应字段的值有改变时，触发该事件on change of it-p1 or it-p2 . 当指定字段与上一条字段有所改变时，触发该事件,on change无分组合计的功能34循环跳转语句exit. 用于跳出当前循环，当运行到exit时，将直接运行循环后面的代码，当exit在循环之外时，将直接结束程序的运行。continue. 跳过循环下面的语句然后继续执行下一个循环。check exp. 作用与continue相类似，但check有一个判断条件，仅判断条件不为真时，才执行跳过循环下面的语句然后继续执行下一个循环。35常用系统变量sy-datum 当前日期sy-uzeit 当前时间sy-uname 当前用户sy-subrc 当前操作返回值（为成功）sy-mandt 当前的客户机sy-tabix 内表当前行的记录号36子程序的定义form s tables t1 t2 . using u1 value(u2) . changing c1 value(c2) . - endform. s 为子程序名。t1、t2、u1、u2、c1、c2为子程序的传递参数。37子程序的调用perform s tables t1 t2 . using u1 u2 . changing c1 c2 . s 为子程序名。t1、t2、u1、u2、c1、c2为子程序的传递参数。可用一个perform同时调用几个子程序，子程序间用逗号分隔，如 perform s1,s2.38子程序的参数传递（1）传递一个参数指针变量存储于内存中的一块空间，变量指针为程序指出了内存的位置，传递变量指针将使子程序中的变量和作为参数的变量使用同一个存储区域，也就是说，子程序中的参数的内容变了，其相应的传递参数的内容也跟着一起改变。使用using v1 及 changing v1 均为传递变量指针。（2）传递一个变量值和传递变量指针不同，传递变量值仅仅把变量的内容传给子程序，子程序中相应的变量存储于另外的内存空间，也就是说，子程序中变量的值改变了，其相应的传递参数的内容还是和原来一样。使用using value(v1) 为传递变量值。（3）传递一个变量值并返回传递一个变量值并返回把一个变量值传给子程序，在子程序运行结束时，把子程序中变量值的内容传给调用它的变量。与传递变量指针不同，原变量内容是在子程序运行完成之后才改变，在子程序运行过程序中保持不变。使用changing value(v1)传递一个变量值并返回。（4）传递一个内表内表同样可以作为一个变量进行传递，内表使用指针的模式进行传递。使用tables it structure x 或tables it like x 传递内表，x为结构或表。39常用事件（1）initialization事件程序最开始发生的事件，可以进行初始数据的处理。REPORT z_temp.tables:t001.parameters:ch(50) type c.initialization. 该语句不能包含在selection-screen语句中ch = this is a test for the initialization!.start-of-selection.write:ch.以上代码在程序运行开始就为变量ch进行付值，该事件在输入参数之前就已经发生。（2）start-of-selection事件在输入参数完成之后，运行该事件，在该事件中主要进行数据的处理。（3）end-of-selection事件发生在start-of-selection之后的事件，在该事件中主要进行数据的输出显示。REPORT z_temp.tables:t001.data:ch(50) type c.end-of-selection.write:/ end-of-selection.start-of-selection.write:/ start-of-selection.不管按什么顺序书写代码，start-of-selection里的代码一定会在end-of-selection之前处理。（4）top-of-page事件该事件主要处理表头的数据，在top-of-page中显示的内容一定会出现在每一页的开始。REPORT z_temp no standard page heading line-count 6(2).start-of-selection.do 100 times. write:/ this is a test!.enddo.top-of-page. write:/ top-of-page. uline.（5）end-of-page事件该事件主要处理表尾的数据，在end-of-page中显示的内容一定会出现在每一页的表尾，注意必须有定义页尾留空行数的时候才可显示该事件中显示的内容。REPORT z_temp no standard page heading line-count 6(2).start-of-selection.do 100 times. write:/ this is a test!.enddo.end-of-page. uline. write:/ end-of-page. write:/ end-of-page2.40跳出事件的方法可以使用exit,check,stop事件跳过事件，在不同的事件中，以上的语句会有不同的表现。在所有事件中：check离开当前事件并继续进行下一个事件的处理。stop离开当前事件并直接跳到end-of-selection事件。在start-of-selection之前的事件：Exit和check都离开当前事件继续处理下一个事件。在start-of-selection之中及之后的事件： Exit立即进行输出的显示。Check离开当前事件并继续处理下一个事件。41补充查询内表有多少条记录：describe table tmp_gongsi lines iReccount. 查询一个表的字段条件属于另一个内表字段值的记录：select aa from 表2 into i_tab1.select aa from 表1 into 临时表 for all entries ini_tab1 where aa = i_tab1-aa.concatenate aaa bbb into aaabbb. 字符串相加REUSE_ALV_GRID_DISPLAY 输出表格函数EQ LE GE CP BT NE LT GT NP NB42常用函数sy-uzeit：获取系统时间。 sy-datum：获取系统日期。 shift string：左移字符串。长度减1。 concatenate：连接字符串。 split：拆分字符串。 search：查询字符串。 replace：替换字符串。 condense：删除多余的空格。 translate：转换字符格式，如将ABC转换为abc convert text：创建一个可