COBOL谭浩强版学习笔记

COBOL资料整理

COBOL语言概述

一．COBOL程序的结构

1．部

IDENTIFICATION DIVISION 标识部

ENVIRONMENT DIVISION 环境部

DA TA 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个字符。

初等项

初等项

初等项

过程部初步

一．输入输出语句

1．ACCEPT（接收语句）：直接从中断键盘或系统指定的输入设备上输入少量的数据。

语法：ACCEPT 标识符[FROM 助忆名]

2．READ（读语句）：从外部文件上读入数据输到程序中的数据项中。

语法：READ 文件名RECORD [INTO 标识符][；AT END 执行语句] 3．WRITE（写语句）：将内存区中的数据输出到外部设备

语法：

WRITE 记录名[FROM 标识符1][BEFORE ADV ANCING 标识符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．MULTIPL Y（乘法语句）

举例：MULTIPL Y A BY B A*B→B

MULTIPLY 0.5 BY B 0.5*B→B

标识部和环境部

一．标识部

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子句中用该系统指定的逻辑名作为外部文件名，然后用作业控制语句将该逻辑名与实际的设备和文件相联系。