COBOL谭浩强版学习笔记

COBOL资料整理

COBOL语言概述

一．COBOL程序的结构 1．部

IDENTIFICATION DIVISION 标识部 ENVIRONMENT DIVISION 环境部 DATA DIVISION 数据部 PROCEDURE DIVISION 过程部 2．节（SECTION）和段（PARAGRAPH） （1）部-节-段

（2）标识部下面不设节，直接设段

（3）过程部可以设节，下面再设段，也可以直接设段 3．句子、语句和子句

每一段由若干句子（Sentence）组成，一个句子以句号加上一个以上的空格来结束。 句子由语句（Statement）组成。

语句中又可以包含若干子句（clause），每一个子句也有一个动词（但这个动词往往是可以省略的），它指定某一方面的特定功能。

二．COBOL源程序的书写格式 1．1-6列：标号区

2．第7列：续行标志区（“-”为续行，“*”为注解）

3．8-11列：A区（部头，节头，段头，层号01、77，文件描述符FD等） 4．12-72列：B区（正文） 5．73-80列：注释区

三．COBOL字符

数字0-9，大写字母A-Z，小写字母a-z， 专用字符15个{ + - * / = , . ; ‘ ( ) < > $ 空格 }

四．常量

1．数值常量

（1）小数点不能多于一个，而且不能出现在常数最右边。 （2）数值常量的长度不能超过18位数字。

（3）至少要有一个数字，不能有多于一个符号。 （4）数字间不能有空格，空格是分界符。 2．非数值常量 （1）用’’把字符串包起来 （2）假如要把’’放到非数值常量中，用QUOTE保留字， 如 MOVE QUOTE ‘CHINA’QUOTE TO A （3）长度不应超过120个字符。 3．表意常量

表意常量

所表示的值

ZERO/ZEROS/ZEROES SPACE/SPACES 表示一个或多个零字符 表示一个或多个空格字符 HIGH-VALUE/HIGH-VALUES 表示一个或多个具有“最高值”的字符（每个字符的二进制表示为11111111） LOW-VALUE/LOW-VALUES QUOTE/QUOTES ALL 常量 五．COBOL的数据关系 表示一个或多个具有“最小值”的字符（每个字符的二进制表示为00000000） 表示一个或多个引号字符 表示由一个或多个该常量组成的字符串 文件 记录1 记录i 记录n 组合项1 组合项i 组合项n 初等项 组合项p 组合项q 初等项 初等项

初等项

初等项

过程部初步

一．输入输出语句

1．ACCEPT（接收语句）：直接从中断键盘或系统指定的输入设备上输入少量的数据。 语法：ACCEPT 标识符 [FROM 助忆名] 2．READ（读语句）：从外部文件上读入数据输到程序中的数据项中。 语法：READ 文件名 RECORD [INTO 标识符][；AT END 执行语句] 3．WRITE（写语句）：将内存区中的数据输出到外部设备 语法：

WRITE 记录名 [FROM 标识符1][BEFORE ADVANCING 标识符2/整数 LINE/LINES] AFTER 助忆名/PAEG 4．OPEN（打开语句）：程序若要读和写文件，先要把文件打开 语法：OPEN INPUT/OUPUT 文件名1[，文件名2??] 5．CLOSE（关闭语句）：关闭文件。

语法：CLOSE 文件名1[，文件名2??]

二．算术运算语句

1．ADD（加法语句）

举例：ADD A TO B A+B?B

ADD 15 TO C 15+C?C ADD A，B TO C A+B+C?C ADD 15，25 TO C 15+25+C?C ADD A，B GIVING C A+B--C ADD 15，25 GIVING T 15+25?T

ADD A，B TO C，D A+B+C?C,A+B+D?D 2．SUBTRACT（减法语句）

举例：SUBTRACT B FROM A A-B?A

SUBTRACT B，C FROM A A-B-C?A

SUBTRACT B，C FROM A，T A-B-C?A,T-B-C?T SUBTRACT B，C FROM A GIVING X A-B-C?X 3．MULTIPLY（乘法语句）

举例：MULTIPLY A BY B A*B?B

MULTIPLY 0.5 BY B 0.5*B?B MULTIPLY A BY B GIVING C A*B?C

MULTIPLY 1.5 BY 3 GIVING C,A 1.5*3?C,1.5*3?A

MULTIPLY A BY B,C A*B?B,A*C?C 4．DIVIDE（除法语句） 举例：DIVIDE A INTO B B/A?B DIVIDE A INTO B GIVING C B/A?C DIVIDE A BY B GIVING C A/B?C 5．COMPUTE（计算语句） 语法：COMPUTE 标识符1[，标识符2]??=算术表达式 举例：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 标识符 五．IF（条件语句） 1．关系运算符 COBOL关系运算符 IS GREATER THAN IS > THAN IS LESS THAN IS < THAN IS EQUAL TO IS = TO NOT GREATER THAN NOT > NOT LESS THAN NOT < NOT EQUAL TO NOT = 意义 大于 小于 等于 不大于 不小于 不等于 2．IF语句的两种形式 （1）IF 条件 语句组 （2）IF 条件 语句组1 ELSE 语句组2 3．IF语句的一般格式 IF 语句组1/NEXT SENTENCE [ELSE 语句组2/NEXT SENTENCE] 六．STOP（停止语句） 语法：STOP RUN/常量 标识部和环境部 一．标识部 1．必写部分

IDENTIFICATION DIVISION PROGRAM-ID. 程序名. 2．任选部分

[AUTHOR 作者姓名.]

[INSTALLATION. 计算机设置的场所.] [DATE-WRITTEN. 源程序编写的日期.] [DATE-COMPILED. 源程序编译的日期.] [SECURITY. 保密程度.]

二．环境部

1．环境部的一般形式

ENVIRONMENT DIVISION. （环境部） CONFIGURATION SECTION. （配置节） SOURCE-COMPUTER. 源计算机名 OBJECT-COMPUTER. 目标计算机名 [SPECIAL-NAMES. 专用名描述项]

[INPUT-OUTPUT SECTION. （输入输出节） FILE-CONTROL. {文件描述体}?? [I-O-CONTROL. 输入输出控制描述体]] 2．配置节（CONFIGURATION SECTION） （1）源计算机段和目标计算机段的一般格式 SOURCE-COMPUTER. OBJECT-COMPUTER.

[MEMORY SIZE IS 整数{WORDS/CHARACTERS/MODULES}] （2）专用名段

格式：SPECIAL-NAMES.

[DECIMAL-POINT IS COMMA.] [CURRENCY SIGN IS 非数值常量.] [专用名 IS 助记名.]

3．输入输出节（分为输入输出控制段与文件控制段） 文件控制段

格式：INPUT-OUTPUT SECTION. （输入输出节）

FILE-CONTROL. （文件控制段） SELECT 文件名 ASSIGN TO 外部文件名. 说明：SELECT的三种用法

（1） 在SELECT子句的“ASSIGN TO”的后面写上磁盘上实际的文件名。 （2） 在SELECT子句中只指出外部设备名。

（3） 在一些中、大型计算机系统，在SELECT子句中用该系统指定的逻辑名作为外部文件名，然后用作业控制语句将该逻辑名与实际的设备和文件相联系。

数据部（一）

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库COBOL谭浩强版学习笔记在线全文阅读。