NEXT SENTENCE NEXT SENTENCE COBOL关系运算符: IS GREATER THAN (>) IS LESS THAN (<) IS EQUAL TO (=) NOT GREATER THAN (NOT >) (<=) NOT LESS THAN (NOT <) (>=) NOT EQUAL TO (NOT =) 注意:句点在IF 语句中的特殊作用。 如:IF A > 0 DISP
IF A IS [NOT] NUMERIC 数字和可选符号 IF A IS [NOT] ALPHABETIC A~Z,a~z字符和空格 IF A IS [NOT] ALPHABETIC-LOWER a~z字符和空格 IF A IS [NOT] ALPHABETIC-UPPER A~Z字符和空格 IF A IS [NOT] CLASS-NAME SPECIAL-NAMES定义的字符集 例如:SPECIAL-NAMES. CLASS MYDEFINE IS "12345+ABCDE-...
A1IS NUMERICA1IS NOT NUMERIC11 、PERFORM 语句 PERFORM XXX-RTN.调用子节,直到遇到第一个只包含EXIT语句的段中止,回到该调用语句的下一条语句EXIT 只与它搭配有效。所以节的定义规定如下 :XXX-RTNSECTION.语句块 XXX-EXT. EXIT.PERFORM XXX-RTN N TIMES. 循环调用子节 N 次PERFORM XXX-RTN UNTIL N 30. ...
WS-NUM1 IS NEGATIVE WS-NUM2 IS POSITIVE 复制 类条件 类条件用于检查操作数是否仅包含字母或数字数据。在 ALPHABETIC、ALPHABETIC-LOWER 和 ALPHABETIC-UPPER 中考虑空格。 句法 以下是类条件语句的语法 - [Data Name/Arithmetic Operation>] [IS] [NOT] [NUMERIC, ALPHABETIC, ALPHABETIC-LOWER, ALPHABETIC...
数据名 IS [NOT] POSITIVE(正:还可表示为”IF … > ZERO”) 算术表达式 NEGATIVE(负:还可表示为”IF … < ZERO”) ZERO(还可表示为”IF … = ZERO”) 类型条件 检查数据项的类型是否符合指定的要求。 类型条件的一般形式: 标识符 IS [NOT] NUMERIC ...
NOT < >= 大于等于 ISNOT EQUAL TO NOT = 不等于 注: 判断字符串能否转换为数字。 NUMERIC NOT NUMERIC IS NOT NUMERIC 3、PERFORM语句 PERFORM节名称. ·调用 子节,直到遇到第一个只包含EXIT语句的段中止,回到该调用语句的下一条语句。 EXIT只与它搭配有效。 所以节的定义规定如下: XXX SECTION. 语句块·...
数据名 IS [NOT] POSITIVE 算术表达式 NEGATIVE ZERO 2。类型条件: 标识符 IS [NOT] NUMERIC ALPHABETIC 3。条件名条件:用来表示条件变量当前值的名字叫条件名。条件名本身是一个条件,它有一个值(’真’或’假’),用它来检查条件变量的值是否落在条件名所代表的值的范围中,当条件变量的值落在条件名所代表的...
格式:标识符IS [NOT] NUMERIC/ALPHABETIC 其中,NUMERIC表示数值类型,ALPHABETIC表示字母类型。 5.条件名条件 作用:用来代替一系列繁杂的IF-ELSE语句。 格式:88条件名VALUE IS/ARE常量1[THROUGH/THRU常量2] [常量3[[THROUGH/THRU常量4]]…… 举例:首先在数据部说明 77 X (条件变量) PIC 9(6). 88 X1 VALUE...
4、NMENT DIVISION。DATA DIVISION。PROCEURE DIVISION。DISPLAY THIS IS A COBOL PROGRAM.STOP RUN。四。COBOL 源程序的书写格式:第1 至 6 列为 ”标号区”。 第7列为”续行标志区”第8至此11列,称为”A区”。程序中有些内容如部头,节头,段头,层号 01,层号 ...
IF A IS [NOT] NUMERIC 数字和可选符号 IF A IS [NOT] ALPHABETIC A~Z,a~z字符和空格 IF A IS [NOT] ALPHABETIC-LOWER a~z字符和空格 IF A IS [NOT] ALPHABETIC-UPPER A~Z字符和空格 IF A IS [NOT] CLASS-NAME SPECIAL-NAMES定义的字符集 ...