COBOL的数据关系
过程部初步
一．输入输出语句
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+BaB
ADD 15 TO C 15+CaC
ADD A，B TO C A+B+CaC
ADD 15，25 TO C 15+25+CaC
ADD A，B GIVING C A+B–C
ADD 15，25 GIVING T 15+25aT
ADD A，B TO C，D A+B+CaC,A+B+DaD
2．SUBTRACT（减法语句）
举例：SUBTRACT B FROM A A-BaA
SUBTRACT B，C FROM A A-B-CaA
SUBTRACT B，C FROM A，T A-B-CaA,T-B-CaT
SUBTRACT B，C FROM A GIVING X A-B-CaX
3．MULTIPLY（乘法语句）
举例：MULTIPLY A BY B A*BaB
MULTIPLY 0.5 BY B 0.5*BaB
MULTIPLY A BY B GIVING C A*BaC
MULTIPLY 1.5 BY 3 GIVING C,A 1.5*3aC,1.5*3aA
MULTIPLY A BY B,C A*BaB,A*CaC
4．DIVIDE（除法语句）
举例：DIVIDE A INTO B B/AaB
DIVIDE A INTO B GIVING C B/AaC
DIVIDE A BY B GIVING C A/BaC
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子句中用该系统指定的逻辑名作为外部文件名，然后用作业控制语句将该逻辑名与实际的设备和文件相联系。