COBOL语言基础教程Word下载.docx
- 文档编号:14995695
- 上传时间:2022-10-26
- 格式:DOCX
- 页数:23
- 大小:32.57KB
COBOL语言基础教程Word下载.docx
《COBOL语言基础教程Word下载.docx》由会员分享,可在线阅读,更多相关《COBOL语言基础教程Word下载.docx(23页珍藏版)》请在冰豆网上搜索。
用于标识程序名。
2。
环境部(ENVIRONMENT
用于说明程序运行得环境。
3。
数据部(DATA
用于说明程序中涉及得所有数据。
4。
过程部(PROCEDURE
就是程序得核心部分,它决定计算机应进行什么操作。
三。
最简单得COBOL
程序举例:
COL
—6
7
8
12—72
73—80
IDENTIFICATION
DIVISION。
PROGRAM-ID。
PSAMPLE1。
ENVIRONMENT
DATA
PROCEURE
DISPLAY
’THIS
IS
A
PROGRAM、’
STOP
RUN。
四。
源程序得书写格式:
第1
至
6
列为
”标号区”。
第7列为”续行标志区”
第8至此11列,称为”A区”。
程序中有些内容如部头,节头,段头,层号
01,层号
77
及文件
描述符FD等应从A区开始写。
第12至此72列,称为”B区”。
写程序中得正文部分。
如过程部中得句子只能从B区开始写。
第73至80列,称为”注释区”。
五。
COBOL字符集包括:
数字0
—
9
字母
A—
Z
a
z
专用字符:
+
-
*
/
=
、
;
’
(
)
<
>
$
及空格。
属于系统字符集而不属于COBOL字符集得字符只能出现
在COBOL
程序中得字符串里。
六。
常量:
常量分为数值常量(如
100,-29),非数值常量(如
’ABC’
)与表意常量(如
ZERO,SPACE,HIGH-VALUE,LOW-VALUE
QUOTE
ALL
常量)。
七。
所处理得数据得特点
层次得概念:
数据间存在得从属关系。
文件得概念:
多个记录可以组成一个文件。
记录得概念:
具有一定层次关系得一组数据项得最大集合,它就是内存中具有独立逻辑含义得最大存取项,具有最高层次。
2
过程部初步
输入输出语句。
ACCEPT语句:
直接从终端键盘或系统指定得输入设备上输入数据。
ACCEPT
标识符
[FROM
助忆名]
注:
A。
标识符(identifier)指得就是能唯一地标识一个数据项得数据名,不能唯一地标识一个
数据项得数据名不就是标识符。
标识符可以就是组合项。
B。
在ACCEPT语句中如不写FROM部分,如ACCEPT
则表示从系统隐含指定得
设备上读入一个数据给A。
如果不想从指定得设
备上输入,则要用FROM
选项,
这时”助忆名”需要在环境部中事先说明与那种外部设备相联系。
如:
(环境部)
CONFIGRATION
SECTION。
(配置节)
SPECIAL-NAMES。
(专用名段)
CONSOLE
ABC
如在过程部中有
T
FROM
ABC。
则表示要从控制台接收数据
DISPLAY语句:
从计算机内存中输出到某一指定得输出设备上。
{
标识符1,常量1}[标识符2,常量2]。
。
[UPON
标识符与助忆名得说明同上)
ACCEPT语句与DISPLAY语句不必定义文件适用于少量得数据输入输出。
READ语句:
COBOL语言中数据得输入输出主要就是通过对外部文件得读写进行得。
READ
语句就就是从外部文件上读入数据输
出到程序中得数据项中。
在程序中用到得所有文件都需要在环境部中指定程序中用到得文件名与实际外部文件得联系。
数据部也要对文件加以描述。
指定数据结构各数据项所占得内存单元长度以及数据形式。
得存取就是以文件为对象以记录为单位得。
READ语句得最简单得格式为:
文件名
INPUT-OUTPUT
SELECT
IN-FILLE
ASSIGN
TO
外部文件名。
为了存储读入得记录,必须在内存开辟一个与文件记录长度相等得存储区,即’输入文件纪录区’。
每一个输入文件都有相应得’输入文件纪录区’,与之一一对应。
亦即在数据部中描述文件得数据结构。
假设
IN-FILE
文件每一记录中包含得内容为:
产品代码,产品数量,产品单价,生产日期。
设某一记录得具体数据
如下:
0
3
2
prodcode
quantity
price
year
mon
day
如果我们希望读入该记录并对各数据项进行处理,则需要在
’输入纪录区’中划分出各数据项,以便存放相应得数据。
定义输入纪录区以及划分记录区中各数据项得工作就是由数据部来完成得。
下面我们简单介绍数据部定义记录区方法,针对上面输入数据得特点,我们可以在数据部中对记录区作如下描述:
FD
LABLE
RECORD
STANDARD。
01
IN-RECORD。
(定义记录区名为IN-RECORD)
02
PROD-CODE
PIC
9(4)。
PROD-QUANTITY
9(5)。
PROD-PRICE
9(6)。
MANU-DATE。
(生产日期为一组合项)
05
DATE-CCYY
DATE-MM
9
(2)。
DATE-DD
其中,FD
即
表示从该行起就是’文件描述体’。
STANDARD
:
所有得磁盘文件与磁带文件都必须写明此句。
层定义’输入纪录区’
得名字为IN-RECORD,由于
01层属于FD描述体,因此也就指定了
IN-RECORD
与
得关系。
亦即从IN-FILE
读入得数据存放在
IN-RECORD记录区中。
这样,在执行一次READ语句后,文件中一个记录得数据便输入到内存记录区,按排列顺序分别送到记录区中各数据项中。
注意文件得各记录中得数据就是不分数据项得,只就是按一定得顺序把数据存放在各字节中。
所以数据部对记录区中各数据项得描述应该与文件得记录中各数据排列次序与长度相一致。
语句得一般形式:
文件名
[INTO
标识符]
[AT
END
执行语句]
例如:
INTO
TEMP-RECORD
AT
RUN
该语句除了将读到得数据传送到IN-RECORD之外,还传送到TEMP-RECORD中。
在遇到文件尾时,程序结束运行。
WRITE语句:
将内存中得数据输出到外部设备,主要就是由WRITE
语句来完成得。
WRITE语句得最简单得格式为:
WRITE
记录名
(注意WRITE语句得操作对象就是记录,所以就是’记录名’而不就是’文件名’)
与输入文件相似输出文件也要在环境部中指定所对应得实际存在得外部文件:
OUT-FILLE
打印机名。
也要在数据部中定义输出记录区:
OUT-FILE
OMITTED。
OUT-RECORD。
MANU-DATE
OMITTED
凡输出设备就是打印机得都必须写明此句。
如输出设备就是磁盘,则仍用LABLE
层定义’输出纪录区’
得名字为OUT-RECORD,由于
01层属于FD描述体,因此也就指定了
OUT-RECORD
与OUT-FILE
在用WRITE
语句输出一个记录之前,应向输出记录区传送数据。
如已将数据传送到上述各数据项中,则在执行
W
RITE
语句后,则记录区中得数据通过打印机打印出来。
LINE
BEFORE
整数
LINES
]
AFTER
ADVANCING
助忆名
PAGE
5。
OPEN语句:
程序中如果需要读写文件,则该文件必须先用OPEN语句打开,系统在执行READ,WRITE以前先检查该文件就是否已在规定得外部设备上准备就绪。
OPEN语句得一般格式为:
INPUT
文件名1
[,文件名2]。
OPEN
OUTPUT
文件名3
[,文件名4]。
6。
CLOSE语句:
当对一个文件得读或写得操作已完成,就应关闭该文件。
CLOSE语句得一般格式为:
CLOSE
COBOL通过2位长度得文件状态字()来表示文件得操作结果就是否成功,常见得文件状态值及意义:
算数运算语句
ADD语句:
格式1:
ADD
标识符1
标识符2。
标识符m
[,标识符n]。
常量1
常量2
格式2:
标识符2
标识符3
常量2
常量3
GIVING
SUBTRACT语句:
SUBTRACT
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- COBOL 语言 基础教程