文档介绍：COBOL程序设计
许毅
第二章过程部初步
——最基本的过程部语句
引言
过程部的几个特点:
一、过程部是程序中的第四部分,它以部头PROCEDURE DIVISION开头。部头从A区(第8—11列)开始书写。过程部下面分若干节,节下面分段,段由若干句子组成,句子以句号“.”和空格结束。句子由若干语句组成,语句间可用分号和空格或用空格分隔。
PROCEDURE DIVISION. (过程部头)
A SECTION. (A节)
A1. MOVE 1 TO I (A1段)
MOVE 2 TO J.
A2. ADD I TO J. (A2段)
B SECTION. (B节)
…
二、过程部的语句都以一个动词(verb)开始,如MOVE,OPEN,READ,WRITE,IF(IF在COBOL中也作为动词对待)。它表示计算机应执行的操作。如:
MOVE 100 TO X.
ADD Y TO Z.
IF X > 100
DISPLAY X.
IF X > 100
DISPLAY X
END-IF.
三、语句中的动词后面一般要跟一个操作的对象。操作对象可以是数据名或文件名。如:
MOVE X TO Y.
表示将X的值送到Y去。操作的对象是数据项,它们是内存中某一段单元中的内容。
READ,OPEN,CLOSE等语句的操作对象是外部文件,在这些动词后跟的是文件名,表示对与文件名相联系的外部文件进行某种操作。如OPEN ABC,CLOSE ABC,READ ABC等。ABC是文件名。
四、。一个语句可以任意写在一行或几行上。续行也应从B区开始。
输入输出语句
1、EPT
ACCEPT 标识符[FROME 助记名]
(1)标识符(identifier)必须唯一标识一个数据项的数据名,不能唯一标识一个数据项的不是标识符
ADD C OF B1 TO D OF B1.
ADD C OF B2 TO D OF B2.
ACCEPT语句后面只能跟一个标识符
ACCEPT将中断程序的运行等待输入,会影响程序的速度
2、显示语句DISPLAY
DISPLAY T.
DISPLAY T1,T2.
DISPLAY ‘TODAY IS SUNDAY’.