小数点位置可用于数字数据。假定位置是小数点的位置和不包括在数据中。 长度限定所使用的数据项的字节数。 在PIC子句中使用的符号 符号 描述 9 数字 A 字母 X 字母数字 V 隐式小数点 S 符号 P 假定小数 例子 下面的例子显示使用PIC子句: IDENTIFICATION DIVISION. PROGRAM-ID. HELLO. DATA DIVISION. WORKING-S...
以下示例显示了有效和无效的数据名称 - Valid: WS-NAME TOTAL-STUDENTS A100 100B Invalid: MOVE (Reserved Words) COMPUTE (Reserved Words) 100 (No Alphabet) 100+B (+ is not allowed) 复制 层数 级别编号用于指定记录中数据的级别。它们用于区分基本项和组项。可以将基本项目组合在一起以创建组项目。
COMPUTE 语句:COMPUTE 标识符1 ,标识符2 。= 算术表达式运算的优先级由高到低顺序为:(),正负号 ,* ,* 或 / ,+ 或 -如:C = 3 35、,D = 5 ,E = 2 , F = 1 则:COMPUT A,B = -(C + D)* 2 / E * 3 - F = -3三。传送语句 (MOVE)MOVE 语句用来实现内存中数据的传送(而不是内存...
举例:COMPUTE T = (A + B) * C / D 注意:(1)所以运算符两侧应留一空格 (2)括号外侧应留空格,内侧可不要留空格 三.MOVE(传送语句) 语法:MOVE 标识符1/常量1 TO 标识符2[,标识符3]…… 四.GOTO(转移语句) 语法:(1)GO TO 过程名 (2)GO TO 过程名1[,过程名2]……过程名n,DEPENDING ON 标...
5。COMPUTE 语句: COMPUTE 标识符1 [,标识符2 ]。。。= 算术表达式 运算的优先级由高到低顺序为:(),正负号 ,** ,* 或 / ,+ 或 - 如:C = 3 ,D = 5 ,E = 2 , F = 1 则: COMPUT A,B = -(C + D)* 2 / E ** 3 - F = -3 ...
7、BC5. COMPUTE(计算语句)语法:COMPUTE标识符1,标识符2=算术表达式举仞COMPUTET=(A+B)*C/D注意:(1)所以运算符两侧应留一空格(2)括号外侧应留空格,内侧可不要留空格3 .MOVE(传送语句)语法:MOVE标识符1/常量1TO标识符2,标识符34 .GOTO(转移语句)语法:(1)GOTO过程名(2)GOTO过程名1,过程名2过程名n,...
5。COMPUTE 语句: COMPUTE 标识符1 [,标识符2 ]。。。= 算术表达式 运算的优先级由高到低顺序为:(),正负号 ,** ,* 或 / ,+ 或 - 如:C = 3 ,D = 5 ,E = 2 , F = 1 则: COMPUT A,B = -(C + D)* 2 / E ** 3 - F = -3 ...
(三)格式:COMPUTE标识符1[,标识符2]…=算术表达式 2.4 2.4.1 MOVE语句用来实现数据的传送,将一个数据从一个内存域送到另一个内存域中,是数据在内存中的传送,而不是内存和外部设备之间的传送。 2.4.2 (1)类型和长度相同,按字节一一对应地传送。 (2)长度不同,且是数值数据项,按小数点对齐原则处理。 (3)...
COMPUTELEN =FUNCTION LENGTH(STRING) 二、PRO*COBOL基本語法 COMPLA使用的PRO*COBOL是ORACLE公司提供的在COBOL程序中嵌入SQL语句的一种方法,使得程序方便地访问操作ORACLE数据库;PRO*COBOL程序经过ORACLE提供的预编译器预编译生成中间COBOL程序后,程序中所有的SQL语句直接调用ORACLE库函数,再经过COBOL编译器同一般COBOL程序...
.指定源计算机(SOURCE-COMPUTE). .目标计算机(OBJECT-COMPUTE). 输入输出节(INPUT-OUTPUTSECTION). 文件的物理路径的定义。 方法二:(过程部中动态指定文件) SELECTFILE-LOGASSIGNTO SELECT-FILE ORGANIZATIONISLINESEQUENTIAL. 在数据部定义字符串变量SELECT-FILE,在文件FILE-LOG打开前动态指定文件路径。