《abap基本语法汇总.doc》由会员分享,可在线阅读,更多相关《abap基本语法汇总.doc(162页珍藏版)》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、一 数据类型和对象在ABAP中,可以使用与标准数据声明相似的语法处理数据类型,而与数据对象无关。在程序中必须声明要使用的全部数据对象。声明过程中,必须给数据对象分配属性,其中最重要的属性就是数据类型。1.1 基本数据类型数据类型默认大小有效大小初始值说明C11 - 65535SPACE文本、字符(字母数字字符)D8800000000日期(格式: YYYYMMDD)F880浮点数I440整型(整数)N11 - 6553500.0数字文本P81 - 160压缩号T66000000时间(格式: HHMMSS)X11 - 65535X00十六进制对算术运算的非整型结果(如分数)进行四舍五入,而不是截断
2、。类型 P 数据允许在小数点后有数字。有效大小可以是从 1 到 16 字节的任何值。将两个十进制数字压缩到一个字节,而最后一个字节包含一个数字和符号。在小数点后最多允许 14 个数字。1.2 系统定义的数据对象SPACE空白字符串SY-SUBRC系统执行传回值,0表示成功SY-UNAME用户SY-DATUM系统日期SY-UZEIT系统时间SY-TCODE当前执行程序的Transaction codeSY-INDEX当前LOOP循环过的次数SY-TABIX当前处理的是Internal Table(内部表)的第几行SY-TMAXLInternal Table(内部表)的总行数SY-SROWS屏幕总
3、行数SY-SCOLS屏幕总列数SY-VLINE画竖线SY-ULINE画横线SY-PAGNO当前页号SY-LINSZ当前报表宽度SY-LINCT当前报表长度SY-LISND列表索引页SY-LISTI上一个列表的索引SY-LILLI绝对列表中选定的行号SY-CUROW屏幕上的行光标列真实行号选择行的内容,长度为255当前行1.3 确定数据对象的属性如果要查明数据对象的数据类型,或者要在程序的运行期间使用其属性,可使用 DESCRIBE 语句。语法如下:DESCRIBE FIELD LENGTH TYPE COMPONENTS OUTPUT-LENGTH DECIMALS EDIT MASK .将由
4、语句的参数指定的数据对象的属性写入参数后的变量。DESCRIBE FIELDS 语句具有下列参数:参数用途LENGTH 确定字段长度TYPE确定数据类型OUTPUT-LENGTH确定输出长度DECIMALS确定小数位EDIT MASK确定转换例程1.3.1 确定字段长度要确定数据对象的长度,利用DESCRIBE FIELD 语句使用 LENGTH 参数,如下所示:DESCRIBE FIELD LENGTH .系统读取字段的长度,并将值写入字段。1.3.2确定数据类型要确定字段的数据类型,利用DESCRIBE FIELD 语句使用 TYPE 参数,如下所示:DESCRIBE FIELD TYPE
5、 COMPONENTS .系统读取字段的数据类型,然后将值写入字段。除返回预定义数据类型 C、D、F、I、N、P、T 和 X 外,该语句还返回1.3.3确定输出长度要确定字段的输出长度,利用 DESCRIBE FIELD 语句使用 OUTPUT-LENGTH 参数,如下所示:DESCRIBE FIELD OUTPUT-LENGTH .系统读取字段的输出长度,并将值写入字段。1.3.4确定小数位若要确定类型P字段的小数位的个数,利用 DESCRIBE FIELD语句使用 DECIMALS参数,如下所示:DESCRIBE FIELD DECIMALS .系统读取字段的小数个数,并将值写入字段。1.
6、3.5 确定转换例程要确定 ABAP/4 词典中某字段的转换例程是否存在,如果存在,名称是什么,利用 DESCRIBE FIELD 语句使用 EDIT MASK 参数,如下所示:DESCRIBE FIELD EDIT MASK .如果 ABAP/4 词典中字段的转换例程存在,则系统将其写入字段,然后将系统字段 SY-SUBRC 中的返回代码设为 0。可以像下面所显示的那样,在 WRITE 语句中将字段直接用作格式模板:WRITE USING EDIT MASK .如果字段没有转换例程,则系统将返回代码设为 4。二数据输出到屏幕2.1 在屏幕上定位Write输出通过制定字段名称前面的格式规范,可
7、以在屏幕上定位 WRITE 语句的输出:WRITE AT /() .此处如果格式规范只包含直接值(即,不是变量),可以忽略关键字 AT。2.2 格式化选项对 WRITE 语句,可以使用不同的格式化选项。WRITE .(1)所有数据类型的格式化选项:选项用途LEFT-JUSTIFIED输出左对齐 CENTERED输出居中RIGHT-JUSTIFIED输出右对齐 UNDER 输出直接开始于字段下NO-GAP忽略字段后的空格 USING EDIT MASK 指定格式模板USING NO EDIT MASK撤消对 ABAP/4 词典中指定的格式模板的激活。NO-ZERO如果字段仅包含零,则用空格代替它
8、们对类型 C 和 N 字段,将自动代替前导零(2)数字字段的格式化选项:选项用途NO-SIGN不输出前导符号DECIMALS 定义小数点后的数字位数。EXPONENT 在类型 F 字段中,在中定义幂数ROUND 用10*(-r) 乘类型P 字段,然后取整CURRENCY 按表格 TCURX 中的货币格式化。UNIT 按表格 T006 中为类型 P 字段所指定的单位固定小数位数(3)日期字段的格式化选项:选项用途DD/MM/YY用户主记录中定义的分隔符MM/DD/YY用户主记录中定义的分隔符DD/MM/YYYY用户主记录中定义的分隔符MM/DD/YYYY用户主记录中定义的分隔符DDMMYY无分隔
9、符MMDDYY无分隔符YYMMDD无分隔符2.3输出符号和图标使用下列语法,可以在屏幕上输出符号和 R/3 图标:WRITE AS SYMBOL.WRITE AS ICON.符号和图标的名称(和)是定义系统的常量,这些常量在包含程序和(尖括号是名称的一部分)中指定。这些包含程序也包含符号和图标的简短说明。输出符号和图标最简单的方法是使用语句结构。要使符号和图标对程序可用,必须在程序中输入恰当的包含程序或更易理解的包含程序。2.4 输出线和空行(1)水平线用下列语法,可以在输出屏幕上生成水平线:ULINE AT /().它等同于WRITE AT /() SY-ULINE.AT 后的格式规范,与在
10、屏幕上定位 WRITE 输出中为 WRITE 语句说明的格式规范完全一样。如果没有格式规范,系统则开始新的一行,并用水平线填充该行。否则,只按指定输出水平线。生成水平线的另一种方法,是在 WRITE 语句中键入恰当数量的连字符,如下所示:WRITE AT /() -.(2)垂直线用下列语法,可以在输出屏幕上生成垂直线:WRITE AT / SY-VLINE.或WRITE AT / |.(3)空行用下列语法,可以在输出屏幕上生成空行:SKIP .该语句从当前行开始,在输出屏幕上生成个空行。如果没有指定的值,就输出一个空行。(4)要将输出定位在屏幕的指定行上,使用:SKIP TO LINE .该语
11、句允许将输出位置向上或向下移动。2.5 将字段内容作为复选框输出使用下列语法,可以将字段的第一个字符,作为复选框输出到输出屏幕上:WRITE AS CHECKBOX.如果字段的第一个字符是一个“ X”,就显示复选框已填充。如果字段的第一个字符是 SPACE,就显示复选框为空。该语句创建的复选框,默认状态是可输入的。就是说,用户可以通过单击鼠标来填充它们或使其为空。三赋值在 ABAP/4 中,可以在声明语句和操作语句中给数据对象赋值。在声明语句中,将初始值赋给声明的数据对象。为此,可以在 DATA、常量或 STATICS 语句中使用 VALUE 参数。要在操作语句中给数据对象赋值,可以使用:3.
12、1用MOVE 赋值3.1.1 基本赋值操作要将值(文字)或源字段的内容赋给目标字段,可以使用 MOVE语句或赋值运算符()。MOVE 语句的语法如下所示:MOVE TO .MOVE 语句将源字段的内容传送给目标字段。可以是任何数据对象。必须是变量,不能是文字或常量。传送后,的内容保持不变。赋值运算符()的语法如下所示: = .MOVE 语句和赋值运算符功能相同。3.1.2 用指定偏移量赋值可以在每条 ABAP/4 语句中为基本数据类型指定偏移量和长度。在这种情况下,MOVE语句语法如下:MOVE +() TO +().将字段从+1 位置开始且长度为的段内容赋给字段,覆盖从+1 位置开始且长度为
13、的段。在 MOVE 语句中,所有偏移量和长度指定都可为变量。3.1.3 在字符串组件之间赋值描述的 MOVE 语句赋值方法适用于基本数据对象和结构化数据对象。另外,还有一种 MOVE 语句变体,允许将源字段串组件内容复制到目标字段串组件中。语法如下:MOVE-CORRESPONDING TO .该语句将字段串组件的内容赋给有相同名称的字段串组件。对于每对名称,系统都执行 MOVE 语句,如下所示:MOVE STRING1- TO STRING2-.系统分别执行所有必要类型转换。该处理不同于包括整个字段串的赋值。在这种情况下,应用不兼容的字段串和基本字段所述的转换规则。3.2 用WRITE TO
14、 赋值要将值(文字)或源字段内容写入目标字段,可以使用 WRITE TO 语句:WRITE TO .WRITE TO 语句将源字段内容写入目标字段。可以是任何数据对象,必须是变量,不能是文字或常量。写入后,内容保持不变。对于,可以使用 WRITE 语句的所有格式化选项(UNDER 和 NO-GAP 除外)。WRITE TO 语句总是检查用户主记录中的设置。例如,这些设置指定是将小数点显示为句号(.),还是逗号(,)。WRITE TO 语句并不遵循类型转换中所述的转换规则。目标字段解释为类型 C 字段。系统总是将源字段内容转换为类型 C,它不将结果字符串转换为目标字段的数据类型,而直接写入目标字
15、段。因此,不应使用数值数据类型的目标字段。3.2.1 运行时指定源字段可以使用 WRITE TO 语句在运行时指定源段。为此,需用括号将包含源字段名的数据对象名括起来,并将其放在源字段位置:WRITE () TO .系统将赋给的数据对象值放到中。然而,如果要在运行时指定目标字段,则必须按使用字段符号中所述,使用字段符号。3.2.2用指定偏移量写入值可以指定每条 ABAP/4 语句中基本数据对象的偏移量和长度。WRITE TO 语句语法如下:WRITE +() TO +().将字段中从+1 位置开始且长度为的内容赋给字段,覆盖从+1 位置开始且长度为的段。在 WRITE TO 语句中,目标字段的
16、偏移量和长度指定可为变量。四数值运算要处理数值数据对象并将结果值赋给数据对象,可以用 COMPUTE 语句或赋值运算符()。COMPUTE 语句语法如下所示:COMPUTE = .关键字 COMPUTE 可选。4.1 基本算术运算ABAP/4 支持四种基本算术运算,同时还支持乘方计算。可以用数学表达式指定以下算术运算符:+加法-减法*乘法/除法DIV整除MOD求余*求幂可以用关键字 ADD、SUBTRACT、 MULTIPLY和 DIVIDE进行基本算术运算,而不使用数学表达式中的运算符。4.2 字符串的算术运算类似于用 MOVE-CORRESPONDING 语句在字段串之间复制值,可以用以下
17、关键字,执行字段串的算术运算:对于所有同名字段串组件,ABAP/4 进行相应算术运算。然而,仅当所有相关组件都是数值型数据类型时,该运算才有意义。4.2.1 添加字段顺序除基本算术运算中所述的基本加法之外,ADD 语句有几个变体,用于添加字段顺序。例如,添加字段顺序并将结果赋给另一个字段:ADD THEN UNTIL GIVING .如果、 . 、是在内存中相同类型和长度的等距字段序列,则进行求和计算并将结果赋给添加字段顺序并将结果添加到另一个字段内容中:ADD THEN UNTIL TO .该语句除了将字段总和添加到的旧内容中之外,与上面语句的工作方式相同。4.3 数学函数以下内部函数使用所
18、有三种数值数据类型(F、 I 和 P)作为参数。函数结果ABS参数的绝对值SIGN参数符号:1 X 0SIGN( X) = 0 if X = 0-1 X 0CEIL不小于参数的最小整数值FLOOR不大于参数的最大整数值TRUNC参数的整数部分FRAC参数的分数部分4.4 浮点函数以下内部函数用浮点数据类型(F)作为参数。函数解释ACOS、 ASIN、 ATAN;COS、SIN、 TAN 三角函数 COSH、 SINH、 TANH 反三角函数EXP基数为 e 的求幂函数(e=2.7182818285)LOG基数为 e 的自然对数LOG10基数为 10 的对数SQRT平方根对于所有函数,正常数学约
19、束适用。否则,会产生运行错误。五字符串5.1 移动字符串5.1.1 按给定位置数移动字符串要按给定位置数移动字段内容,使用 SHIFT 语句,用法如下:SHIFT BY PLACES .该语句将字段移动个位置。如果省略 BY PLACES,则将解释为一个位置。如果是 0 或负值,则保持不变。如果超过长度,则用空格填充。可为变量。对不同()选项,可以按以下方式移动字段:LEFT: 向左移动位置,右边用个空格填充(默认设置)。RIGHT: 向右移动位置,左边用个空格填充。CIRCULAR:向左移动位置,以便左边个字符出现在右边。5.1.2移动字符串到给定串位置要移动字段内容以到给定串位置,则使用
20、SHIFT 语句,用法如下:SHIFT UP TO .ABAP/4 查找字段内容直到找到字符串并将字段移动到字段边缘。选项与按给定位置数移动字符串中所述相同。可为变量。如果中找不到,则将 SY-SUBRC 设置为 4 并且不移动。否则,将 SY-SUBRC 设置为0。5.1.3 根据第一个或最后一个字符移动字符串假设第一个或最后一个字符符合一定条件,则可用 SHIFT 语句将字段向左或向右移动。为此,请使用以下语法:SHIFT LEFT DELETING LEADING .SHIFT RIGHT DELETING TRAILING .假设左边的第一个字符或右边的最后一个字符出现在中,该语句将字
21、段向左或向右移动。字段右边或左边用空格填充,可为变量。5.2 替换字段内容要用其它字符串替换字段串的某些部分,使用 REPLACE 语句。REPLACE WITH INTO LENGTH .ABAP/4 搜索字段中模式前个位置第一次出现的地方。如果未指定长度,按全长度搜索模式。然后,语句将模式在字段中第一次出现的位置用字符串替换。如果指定长度,则只替换模式的相关部分。如果将系统字段 SY-SUBRC 的返回代码设置为0,则说明在中找到且已用替换。非 0 的返回代码值意味着未替换。、和可为变量。5.3 大小写转换并替换字符串可以将字母转换大/小写或使用替换规则。要转换大/小写,使用 TRANSL
22、ATE 语句,用法如下:TRANSLATE TO UPPER CASE.TRANSLATE TO LOWER CASE.这些语句将字段中的所有小写字母转换成大写或反之。使用替换规则时,使用以下语法:TRANSLATE USING .该语句根据字段中存储的替换规则替换字段的所有字符。包含成对字母,其中每对的第一个字母用第二个字母替换。可为变量。5.4 转换为可排序格式可以将字符字段转换为可按字母顺序排列的格式:CONVERT TEXT INTO SORTABLE CODE .该语句为字符字段填充可排序目标字段。字段必须是类型 C且字段必须是类型 X ,最小长度为长度的16倍。该语句目的是为字符字
23、段创建相关字段,作为的按字母顺序排列的排序关键字。在内表的内容和已解压缩的数据中进行排序。如果对未转换的字符字段进行排序,则系统创建与各字母的特定平台内部编码相对应的顺序。在对目标字段进行排序之后,转换 CONVERT TEXT 按这样的方式创建目标字段,相应的字符字段顺序按字母排序。例如,在德语中,顺序为 Miller、 Moller、 Mller、 Muller,而不是 Miller、 Moller、 Muller、 Mller。转换方法依赖于运行 ABAP/4 程序的文本环境。文本环境在用户主记录中定义。例外的是可以使用如下语句,在程序中设置文本环境:SET LOCALE LANGUAG
24、E COUNTRY MODIFIER .该语句根据语言设置文本环境。对于选项 COUNTRY,只要特定国家语言不同,就可以在语言以外指定国家。对于选项 MODIFIER,只要一个国家内语言不同,就可以指定另一个标识符,例如,排序顺序在电话簿和词典之间不同。字段、和必须是类型 C 且长度必须与表 TCP0C 的关键字段长度相等。表 TCP0C 是一个表格,从中进行平台相关的文本环境维护。在语句 SET LOCALE 期间,系统根据 TCP0C中的条目设置文本环境。除了内部传送的平台特性之外,用 SET 语句指定表关键字。如果等于 SPACE ,则系统根据用户主记录设置文本环境。如果对于指定的关键
25、字在表中无条目,则系统将产生运行错误。文本环境影响 ABAP/4 中依赖于字符集的所有操作。5.5 覆盖字符字段要用另一字符字段覆盖字符字段,使用 OVERLAY 语句,用法如下:OVERLAY WITH ONLY .该语句用的内容覆盖字段中包含中字母的所有位置。保持不变。如果省略 ONLY ,则覆盖字段中所有包含空格的位置。如果至少要替换中的一个字符,则将 SY-SUBRC 设置为 0。对于所有其它情况,将SY-SUBRC 设置为 4。如果比长,则只覆盖中的长度。5.6 搜索字符串要搜索特定模式的字符串,请使用 SEARCH 语句,用法如下:SEARCH FOR .该语句在字段中搜索中的字符
26、串。如果成功,则将 SY-SUBRC 的返回代码值设置为0并将 SY-FDPOS 设置为字段中该字符串的偏移量。否则将 SY-SUBRC 设置为4。搜索串可为下列格式之一:目的搜索(任何字符顺序)。忽略尾部空格.搜索,但是不忽略尾部空格*搜索以结尾的词*搜索以开始的词单词之间用空格、逗号、句号、分号、冒号、问号、叹号、括号、斜杠、加号和等号等分隔。搜索字符字段的各种选项()如下(1)ABBREVIATED在字段中搜索包含中指定字符串的单词,其中字符可能被其它字符隔开。单词和字符串的第一个字母必须相同。(2)STARTING AT 在字段中搜索从开始的。结果 SY-FDPOS 参照相对于的偏移量
27、而不是字段的开始。(3)ENDING AT 在字段搜索直到位置。(4)AND MARK如果找到搜索串,则将搜索串中的所有字符(和使用 ABBREVIATED 时的所有字符)转换为大写形式。5.7 获得字符串长度要决定字符串到最后一个字符而不是 SPACE 的长度,使用内部函数 STRLEN,用法如下: COMPUTE = STRLEN( ).STRLEN 将操作数作为字符数据类型处理,而不考虑其实际类型。不进行转换。关键字 COMPUTE 可选。5.8 压缩字符串去空格要删除字符字段中多余空格,使用 CONDENSE 语句,用法如下:CONDENSE NO-GAPS.该语句去除字段中的前导空格
28、并用一个空格替换其它空格序列。结果是左对齐单词,每个单词用空格隔开。如果指定附加的 NO-GAPS,则去除所有空格。5.9 连接字符串要将单个字符串连接成一体,使用 CONCATENATE 语句,用法如下:CONCATENATE . INTO SEPARATED BY .该语句连接字符串与并将结果赋给。该操作忽略尾部空格。附加 SEPARATED BY 允许指定字符字段,它放置在单个字段间已定义的长度中。如果结果符合,则将 SY-SUBRC 设置为0。然而,如果结果必须被截断,则将 SY-SUBRC设置为4。5.10 拆分字符串要将字符串拆分成两个或更多小串,使用 SPLIT 语句,用法如下:
29、SPLIT AT INTO . .该语句在字符字段搜索分界字符串,并将分界符之前和之后的部分放到目标字段 . 中。要将所有部分放到不同目标字段中,必须指定足够目标字段。否则,用字段的剩余部分填充最后目标字段并包含分界符。如果所有目标字段足够长且不必截断任何部分,则将 SY-SUBRC 设置为0。否则,将其设置为4。5.11 分配字符串部分MOVE 语句的以下变体只使用类型 C 字段:MOVE TO PERCENTAGE RIGHT.将左对齐的字符字段的百分比(或如果用 RIGHT选项指定,则为右对齐)复制到。值可为 0 和 100 之间的任何数。将要从复制的长度取整为下一个整数。如果语句中某一
30、参数不是类型 C,则忽略参数 PERCENTAGE。六逻辑流控制6.1 比较运算符要比较所有的字段类型,可以在逻辑表达式中使用下列运算符:含义EQ等于 =等于NE不等于不等于不等于LT小于小于LE小于等于大于GE大于等于=大于等于操作数可以是数据库字段、内部字段、文字或常数。除基本字段外,还可以将结构数据类型和上表中的运算符结合起来作为操作数。字段串逐个组件进行比较,嵌套的结构分为基本的字段。如果有意义,可以对不同数据类型的字段进行比较。如果字段可转换,就可以进行比较。在比较之前,系统将按照下列层次规则执行自动类型转换:(1)如果操作数之一是浮点数(类型 F),则系统将其它操作数转换为类型 F
31、。(2)如果操作数之一是压缩字段(类型 P),则系统将其它操作数转换为类型 P。(3)如果操作数之一是日期字段(类型 D)或时间字段(类型 T),则系统将其它操作数转换为类型 D 或 T。不支持日期和时间字段之间的比较,这会导致程序中断。(4)如果操作数之一是字符字段(类型 C)且其它操作数是十六进制字段(类型 X),则系统将类型 X 的操作数转换为类型 C。(5)如果操作数之一是字符字段(类型 C),其它操作数为数字字段(类型 N),则系统将这两种操作数都转换为类型 P。6.2 比较字符串和数字串要比较字符串(类型 C)和数字文本(类型 N),可以在逻辑表达式中使用下列运算符。含义CO仅包含
32、CN不仅包含CA包含任何NA不包含任何CS包含字符串NS不包含字符串 CP包含模式NP不包含模式因为除类型 N 和 C 外,系统不能执行任何其它类型转换,所以,在进行包含这些运算之一的比较时,操作数应该是类型 N 或 C。运算符的功能如下:(1)CO (仅包含)如果仅包含中的字符,则逻辑表达式 CO 为真。该比较区分大小写,并包括尾部空格。如果比较结果为真,则系统字段 SY-FDPOS 包括的长度。如果为假,则 SY-FDPOS 包含中第一个未在内出现的字符的偏移量。(2)CN (不仅包含 )如果还包含之外的其他字符,则逻辑表达式 CN 为真。该比较区分大小写,并包括尾部空格。如果比较结果为真
33、,则系统字段 SY-FDPOS 包含中第一个未同时在中出现的字符的偏移量。如果为假,SY-FDPOS 包含的长度。(3)CA (包含任何 )如果至少包含的一个字符,则逻辑表达式 CA 为真。该比较区分大小写。如果比较结果为真,则系统字段 SY-FDPOS 包含中第一个也在中出现的字符的偏移量。如果为假,SY-FDPOS 包含的长度。(4)NA (不包含任何)如果不包含的任何字符,则逻辑表达式 NA 为真。该比较区分大小写。如果比较结果为真,则系统字段 SY-FDPOS 包含的长度。如果为假,则 SY-FDPOS 包含中在内出现的第一个字符的偏移量。(5)CS (包含字符串)如果包含字符串,则逻
34、辑表达式 CS 为真。忽略尾部空格并且比较不区分大小写。如果比较结果为真,则系统字段 SY-FDPOS 包含在中的偏移量。如果为假,SY-FDPOS 包含的长度。(6)NS (不包含字符串)如果不包含字符串,则逻辑表达式 NS 为真。忽略尾部空格且比较不区分大小写。如果比较为真,系统字段 SY-FDPOS 包含的长度。如果为假,系统字段 SY-FDPOS 包含在中的偏移量。(7)CP (包含模式 )如果包含模式,则逻辑表达式 CP 为真。如果属于类型 C,则可以在中使用下列通配符:忽略尾部空格且比较不区分大小写。如果比较结果为真,系统字段 SY-FDPOS 包含在中的偏移量。如果为假,SY-F
35、DPOS 包含的长度。如果要对中的特殊字符进行比较,请将换码符 # 放到其前面。可以使用换码字符 # 指定:(8)NP (不包含模式)如果不包含模式,则逻辑表达式 NP 为真。在中,可以使用与 CP 相同的通配符和换码字符。忽略尾部空格且比较不区分大小写。如果比较结果为真,则系统字段 SY-FDPOS 包含的长度,如果为假,SY-FDPOS 包含在中的偏移量。6.3 比较二进制位结构要将逻辑表达式初始操作数第一字节的二进制位结构与第二操作数的进行比较,请使用下列操作符。含义O二进制位是 1Z二进制位是 0M混合二进制位第二操作数的长度应为一个字节。没有必要对第二操作数使用长度为 1 的十六进制
36、字段(类型 X),但却较方便,因为其长度为一个字节且数字值直接与二进制位结构相关。操作符功能如下:O (二进制位是 1)如果中二进制位是 1 的位置,在中是 1,则逻辑表达式 O 为真。Z (二进制位是0)如果中二进制位是 1 的位置,在中是 0,则逻辑表达式 Z 为真。M (混合二进制位)如果从中二进制位是 1 的位置起,中至少一个是 1,一个是 0,则逻辑表达式 M 为真。6.4 编程分支和循环6.4.1 IF条件分支IF 语句允许依据条件将程序流转到特定的语句块中。该语句块包括 IF 语句及其后面的 ELSEIF、 ELSE 或 ENDIF 之间的所有命令。IF .ELSEIF .ELS
37、EIF .ELSE.ENDIF.如果第一个条件是真,系统将执行所有语句直到第一个语句块结束,然后继续处理 ENDIF 语句之后的程序。要采用选择性条件,可以使用 ELSEIF语句。如果第一个条件是假,系统使用与 IF 语句一样的方式处理后面的 ELSEIF 语句。如果 IF 或 ELSEIF 条件都为假,则执行 ELSE 开始的语句块。最后的语句块必须用 ENDIF 结束。要用公式表达 IF 和 ELSEIF 语句中的条件,可以使用任何编程逻辑表达式描述的逻辑表达式。6.4.2CASE条件分支要根据特殊数据字段的内容执行不同的语句块,可以如下使用 CASE 语句:CASE . WHEN . W
38、HEN . WHEN . WHEN . . WHEN OTHERS.ENDCASE.系统执行 WHEN 语句之后的语句块,如果内容等于的内容,且继续处理 ENDCASE 语句后面的语句。如果的内容不等于的内容,则执行选项 WHEN OTHERS 后面的语句块。最后的语句块必须用 ENDCASE 结束。6.4.3DO无条件循环如果想要多次执行语句块,则可以如下使用 DO 语句编程循环:DO TIMES VARYING FROM NEXT .ENDDO.在发现 EXIT、 STOP 或 REJECT语句之前,系统继续执行由 DO 引导、ENDDO 结束的语句块。可以使用 TIMES 选项限制循环次数。可以是文字或变量。如果是 0 或负数,系统不执行该循环。系统字段 SY-INDEX 中包含已处理过的循环次数。6.4.4WHILE条件循环如果只要条件为真,就不止一次执行语句,可以如下使用 WHILE 语句编程:WHILE VARY FROM NEXT .ENDWHILE.只要是真,或系统发现 EXIT、 STOP 或 REJECT 语句,系统将继续执行由 WHILE 语句引导、 ENDWHILE 结束的语句块。对于,可以使用编程逻辑表达式中描述的任何逻辑