四个平台建设网站不显示图片,用群晖nas做网站,工作汇报范文,网站打不开怎么办1#xff0e;表声明
Tables: 表名[,表名]. 声明多个表时可用逗号分隔当你声明了一个数据表的同时#xff0c;系统也同时自动生成了一个和数据表同名的结构#xff0c;结构的变量集等于数据表里面的字段。
2#xff0e;定义变量
Data: v1[(l)] [type t] [decimals d] [v…1表声明
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 ~ 9A ~ F
数据类型描述缺省长度最大长度最大小数位缺省值I整型4固定-00P十进制数816140F浮点型88150.1
3常用算术操作符
算术符描述加法-减法*乘法/除法**取幂DIV整除MOD取模
4常用比较操作
比较操作描述v1 v2等于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 200]. write: / t000-mandt,t000-mtext. endselect.11取出单行记录
select single * from 数据表 [where 条件]. 注仅取出符合条件的第一行记录select single 字段 from 数据表 into 变量 [where 条件].12WRITE语句
write: [/][定位][数据1][,[定位] [数据2]]……注意[/] 为插入一行空行注意单独write一个[/]和在其它数据之前加 [/] 的效果是不一样的单独的write[/]在插入空行后光标定位在空行的下面在其它数据前加[/]在插入空行后光标定位于所插的空行
13ULINE语句
uline. 在当前行下一行显示一直线。uline n. 在当前行第n列显示一直线。uline /n. 在当前行下一行第n列显示一直线。uline 和 write ‘|’ 一起使用可实现画表格的功能。14SKIP语句
SKIP. 光标跳到下一行。SKIP n. 光标跑到下n行。SKIP to line n. 光标跳到第n行。15定义常量
作用定义一些不会改变的数据如一年的月数、圆围率等。
语法constants c1[( l )] [type t] [decimals d] value xxx. 或者constants c1 like cv value xxx. 例如constants pi type p value ‘3.14’.16定义结构
1基本结构
data: begin of 结构名, f1[(l)] [type t] [decimals d] [value xxx], f2[(l)] [type t] [decimals d] [value xxx], ……end of 结构名. 2结构中包含另一结构
data: begin of 结构名, f1[(l)] [type t] [decimals d] [value xxx], f2[(l)] [type t] [decimals d] [value xxx], f3 like 另一结构名,……end of 结构名. 3定义结构的另一种写法
data begin of 结构名. data f1[(l)] [type t] [decimals d] [value xxx]. data f2[(l)] [type t] [decimals d] [value xxx]. [include structure 另一个结构.] data end of 结构名. 注此种写法data后可以加冒号也可以不加
例如
data:begin of person,educ(10) type c,train(10) type c,end of person.data:begin of employee,code(10) type c,name(10) type c,department(20) type c,address like person, person为另一个结构名……end of employee.employee-code 1001.employee-name 张三. employee-department IT部.employee-person-educ 本科employee-person-train 工程师write: / employee-code,employee-name,employee-department,employee-person-educ.write: / employee.17TYPES语句 将结构定义成数据类型这样在程序中可以象定义一个变量那样简单地定义一个结构。语法同定义结构只是把data换成types即可。如 types: begin of employee,code(10) type c, name(10) type c,end of employee.types: address(50) type c.data: emp type employee. 使用TYPES定义的结构类型data: myadd type address. 使用TYPES定义的变量类型emp-code 1001.emp-name 张三. myadd this is a address.write: / emp.write: / myadd.18LIKE语句
tables: t000.data: p(20) type c.data: p1 like t000. p1拥有了和t000相同的结构data: p2 like t000-mandt. p2的定义等同于t000中mandt这个字段的定义data: p3 like p. p3的定义和p相同为20长度的字符串data: t111 like t000 occurs 0 with header line. 定义一个和t000一样的内表19输入参数 要让一个变量成为可输入的参数只需在定义变量时把data改为parameters 即可。 parameters p1 like v1 ... ... [default xxx] [obligatory] [lower case] [as checkbox] [radiobutton group g].使用DEFAULT后缀为参数指定缺省值。 使用obligatory后缀来标识参数为必输项。 输入参数默认会把输入的字符转为大写如果要去掉该转换使用lower case 后缀。 使用as checkbox后缀使参数以复选框的形式出现。使用复选框的参数一定为长度为1的字符串其内容只能为’X’或’ 如
parameters:p1 as checkbox.parameters:p2 as checkbox default X.使用radiobutton group g后缀使输入参数以单选框的形式出现。使用单选框的参数一定为长度为1的字符串其内容只能为’X’或’ 如
parameters:p1 radiobutton group 1.parameters:p2 radiobutton group 1.parameters:p3 radiobutton group 2.parameters:p4 radiobutton group 2 default X.20分块语句
selection-screen begin of block 块名 with frame title [text-(titlename)].parameters: v1(10) type c.parameters: aa like t000-mandt. 将出现圆钮选择项也可以自定义圆钮选择项parameters: v2(10) type c matchcode object zhlp.这是自定义的圆钮选择项在SE38中创建搜索帮助zhlp为创建的搜索帮助名称selection-screen end of block 块名.selection-screen uline. 在输入屏幕上画线21定义内表 内表的定义和结构很相似所差别只是内表需要指定记录的条数。 data: begin of 内表名 occurs n, f1[(l)] [type t] [decimals d] [value xxx], f2[(l)] [type t] [decimals d] [value xxx], ... end of 内表名. n为该内表的记录条数不过当内表的记录数超过了该数值后内表会自动的填大这个数目定义该数值只是为了系统的效率考虑如果n为0则系统会在一开始就分配8KB的空间。 内表同时也可以以已存在的数据表或结构进行定义格式为
data: 内表名 like [结构名或数据表名] occurs n.例如使用like语句通常需要加上with header line否则没有表头data: it1 like st1 occurs 10. st1 为一结构data: it2 like t000 occurs 0. t000 为一数据表22. 往内表中添加记录
append 内表名. 把表头的数据插入内表。append 结构名 to 内表名. 把结构的数据插入内表两者的结构必须一样。23用LOOP读取内表数据
loop at it [into wa] [from m] [to n] [where exp]. Write: / it-字段1, it-字段2, ……endloop. it 为内表名 wa 为结构名如果不填则读到表头。 m,n为开始和结束行如果不填则为从第一条到最后条。 exp 为取记录的条件。
24用READ读取内表数据 READ功能为读取内表的某条记录。 read table it [into wa] [index i | with key keyexp]it为内表。 wa为将把数据读入的结构如果没指定则缺省为表头。 i 是要读取的记录编号即第几条记录。 keyexp 是取记录的条件。如果合条件的记录有不止一行则取第一行的记录。 以系统参数 sy-subrc 是否为 0 判断读取是否成功sy-subrc 为 0 则读取操作成功。
25把数据库的记录读入内表
1逐条记录的读入内表
select * from t000.append t000 to it.endselect.2把整批数据读入内表
select * from 数据表 into table 内表 [where *exp*]. 结构需要相同select mandt mtext from t000 into table it 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常用事件
1initialization事件 程序最开始发生的事件可以进行初始数据的处理 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进行付值该事件在输入参数之前就已经发生。
2start-of-selection事件 在输入参数完成之后运行该事件在该事件中主要进行数据的处理 3end-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之前处理。
4top-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.5end-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创建一个可排序的字符串。 overlay用一个字符串覆盖另一个字符串。 strlen字符串长度。 abs取绝对值。 cos、sin、tan取三角函数值。 acos、asin、atan反三角函数。 cosh、sinh、tanh双曲函数。 expe的幂函数。 Log底数为e的对数。 log10底数为10的对数。 sqrt平方根。 sign返回参数符号。 trunc返回参数的整数部分。 frac输入参数的小数部分。 ceil返回不小于参数的最小整数。 floor返回不大于参数的最小整数。
