MOVE ALL后面跟的只能是COBOL定义的常量(如SPACE,ZERO等等)和字面常量(就是单双引号中的字符,如'A','*')。MOVE ALL后面不能跟数据项,比如MOVE ALL WS-B TO WS-A,是不允许的。但有一种替代的方法,就是使用INSPECT,如INSPECT WS-A REPLACINGCHARACTERSBY WS-B。WS-A将从左到右不断用WS-B填充(WS-B必须...
01 STRING-A PIC X(100). 100个字符长的变量,程序可以局部操作一个变量( STRING-A(start: length)如: MOVE ALL “X” TO STRING-A(2:10) (将变量STRING-A第2位开始10长度的内容全赋为”X”字符) b数值型 种类 类型 说明 备注 DISPLAY 9(m) 无符号整数,每位占用一个字节,显示或输出到文件时,为零...
· 主程序STOP RUN.· 子程序GO BACK.5 、变量类型COBOL 程序的基本变量类型分为两大类字符串型(X)、数值型(9) 。a 字符串型01 STRING-APIC X(100).100 个字符长的变量,程序可以局部操作一个变量( STRING-A(start: length) 如:MOVE ALL “ X” TO STRING-A(2:10)(将变量STRING-A 第 2 位开始...
01 STRING-A PIC X(100). 100个字符长的变量,程序可以局部操作一个变量( STRING-A(start: length)如: MOVE ALL“X”TO STRING-A(2:10) (将变量STRING-A第2位开始10长度的内容全赋为”X”字符) b数值型 种类 类型 说明 备注 DISPLAY 9(m) 无符号整数,每位占用一个字节,显示或输出到文件时,为零的...
基本語法 一、COBOL基本語法 一、cobol的书写格式（每行）1、前6列为序号区(一般不编辑)2、第7列为标示列，仅可以写如下几个标示符。a. “＊” 注释符(注释当前行的代码)b “－“ 字符串连接符 3、第8列---11列为A区，包括以下内容。 a 部、节名。 b 层号01 4、第12...
MOVE VALSTR to RETSTR2. GOBACK. Version 4.1 Compile prog.cbl cobc -m -fthread-safe prog.cbl Take care to use the -fthread-safe compiler flag with all of your COBOL programs, even those not directly called by Java. Note that we use USAGE UNSIGNED-INT for the numeric input value in...
COBOL中一般是这样的,1. X型的赋值用单引号.例如：MOVE ‘XYZ‘ TO B MOVE X‘OA’ TO B 2.N型的赋值用双引号.例如：MOVE NC"我是傻蛋" TO B
UNIX is a registered trademark in the United States and other countries, licensed exclusively through X/Open Company Ltd. All other products, brand, or trade names used in this publication are the trademarks or registered trademarks of their respective trademark holders, and are used only for ...
6.ALL常量表示ALL后面的常量出现若干次,出现的次数由和它连用的数据项长度 来决定,其中常量只能为单个字符或常量,例如:数据项A为10个字符长的字符型, 把”-”传给A,用如下语句:MOVE ALL “-” TO A.则A每个字符都为”-”. 毕僻妮蝎串芦炼算普织乏昆漆粹吁瓤因屎襟帧库钉虐购众诫腻狞承念弄沟011...
MOVE ALL * TO X. DISPLAY X. EXIT PROGRAM. 可以看到程序 A 和程序 B 分别是两个程序,各有自己的程序名,都有四大部分; 二调用程序与被调用程序间的数据联系 格式:调用语句 CALL 子程序名 USING 数据名 1 ,数据名 2 第 14 页,共 19 页被调用程序中过程部部头的一般格式为 PROCEDURE DIVISION USING ...