第1章_cobol语言概述.ppt

1、COBOL 语言程序设计 第1章 COBOL语言概述,COBOL语言概述,COBOL语言的发展概况 COBOL程序的结构 COBOL程序的元素 程序的运行,1.1 COBOL语言的历史,COmmon Business Oriented Language 用于商业数据处理与管理，如：银行，会计业，人事管理，财会，统计报表，情报检索，证券，金融等等 1959年5月 美国国防部召开数据系统语言会议 1959年12月 第一个COBOL语言文本 1960年4月 正式发表COBOL 60, 经过扩充完善COBOL 61 - ANSI COBOL 61 - 最早的版本 1965年COBOL 65- ANSI

2、 COBOL 68 - ISO COBOL 72 1972年COBOL 72- ANSI COBOL 74 - ISO COBOL 78 ANSI COBOL 85- 应用最广泛的版本 ANSI COBOL 2002- 最新版本,1.2 COBOL语言的特点,1、最适于数据处理领域。 所谓数据处理是指对大量数据的收集，统计，分类和加工。例如企业管理，库存管理，报表统计，账目管理，信息情报检索等方面都属于数据处理。 数据处理的特点是：算术计算量小而逻辑处理多；输入输出多；数据间存在着一定的逻辑关系；大量的分类排序；对打印报表要求比较高，多样化等等。,1.2 COBOL语言的特点,2、COBOL

3、比较接近于自然语言（英语）。 COBOL 程序看起来很像一篇用英语写出来的文章。 比如 ADD A TO B 表示 A + B = B 。 COBOL 采用大量英文词汇和句型，学过英语的人看COBOL 程序感到通俗易懂。,1.2 COBOL语言的特点,3、通用性强，由于COBOL 语言的标准化程度较高。 一个计算机上的COBOL 程序向另一计算机系统上移植是比较容易实现的。,1.2 COBOL语言的特点,4、COBOL 的结构严谨，层次分明。 每个程序分四大部分（称为部 DIVISION），每个部下面分为若干节，每个节下面分为若干段。每一部分都有固定的程式。,1.2 COBOL语言的特点,5、

4、COBOL 的缺点是比较繁琐。 无论程序大小简繁，四大部分都要写齐，对每个部进行必要的定义和说明。因此源程序显得比较冗长。 绝大多数银行（如工中建交等），它们完成所有的交易功能，都是用COBOL来实现。,1.3 COBOL程序的编译,1.4 两个简单的COBOL源程序,例1.4.1 了解COBOL程序的基本结构 000100 IDENTIFICATION DIVISION. 000200 PROGRAM-ID. EXAM1. 000300 ENVIRONMENT DIVISION. 000400 DATA DIVISION. 000500 PROCEDURE DIVISION. 000600

5、S. DISPLAY THIS IS A COBOL PROGRAM 000700 STOP RUN.,例1.4.2 简单的变量定义，输入输出及运算 IDENTIFICATION DIVISION. PROGRAM-ID. EXAM2. ENVIRONMENT DIVISION. DATA DIVISION. WORKING-STORAGE SECTION. 77 A PIC 9(3). 77 B PIC 9(3). PROCEDURE DIVISION. CMP. MOVE 10 TO A. MOVE 20 TO B. ADD A TO B. DSP. DISPLAY A = , A. DI

6、SPLAY B = , B. END-P. STOP RUN.,1.5 COBOL程序的结构,1.5.1 部 1.5.2 节，段和描述体 1.5.3 句子，语句和子句 1.5.4 结构一览表,1.5.1 部,1. 标识部（IDENTIFICATION DIVISION）：用于标识程序名 (一般不超过8位）。 2. 环境部（ENVIRONMENT DIVISION）：用于说明程序运行 的环境。 3. 数据部（DATA DIVISION）：用于说明程序中涉及的所 有数据。 4. 过程部（PROCEDURE DIVISION）：是程序的核心部分， 它决定计算机应进行什么操作。,1.5.2 节，段，描

7、述体,部下设置节(SECTION),节下设段(PARAGRAPH)或描述体(DESCRIPTION ENTRY) 标识部下直接定义段 环境部下定义节，节下定义段 数据部下定义节，节下定义描述体 过程部下定义节，节下定义段(复杂程序) 也可以直接定义段(一般程序),1.5.3 句子，语句和子句, 在过程部中，每一段由若干个句子(Sentence)组成。一个 句子是以句号加一个以上的空格束结束的。 句子又由语句(Statement)组成。 一个句子可以只由一个语句组成，一个语句加一个句点后 跟一个(多个)空格就成为一个句子。 在一个语句中又可以包含若干个子句(clause)每一子句 也有一个动词，

8、它指定某一方面特定的功能。 句子语句子句 DISPLAY HELLO. DISPLAY HELLO STOP RUN. STOP RUN.,1.5.4 结构一览表,1.6 COBOL程序的书写格式（一）,标准COBOL程序每行80列，被分为五个区域 第16列为 “标号区” 标号是6位数字，应从小到大，但不一定连续 标号只是方便查阅程序，可以不写 第7列为 “续行区” 使用 “-” 表示本行是紧接在上一行后面 续行要从第12列开始写 使用 “*” 表示本行是注释,1.6 COBOL程序的书写格式（二）,第811列为 “A区” 程序中有些内容必须从该区开始书写，如： 部头，节头，段头，层号01和7

9、7，文件描述符（FD) 第1272列为 “B区” 程序正文部分，过程部语句必须从该区开始书写。 Indent（4space）并对齐 第7380列为 “注释区” 写入此区的内容为注释内容，编译时被舍去,1.6 COBOL程序的书写格式（三）,1.6 COBOL程序的书写格式（三）,1.6 COBOL程序的书写格式（四）,早期COBOL要求所有字母应大写，现在COBOL大小写等价，用引号括起来的字符串除外，如： ADD A TO B = add A To b DISPLAY HELLO DISPLAY hello 相邻的两个COBOL字之间有一个以上的空格 运算符和等号左右必须各有一个空格 圆括号

10、外侧必须有一个空格，内侧不必，如： COMPUTE R = A (B + C) / D 逗号，句号，分号左边不能有空格，而右边应有,1.7 COBOL字符和COBOL字,COBOL字符是指在程序中允许出现的字符 包括数字，大小写字母及下面15个专用符号 +,-,*,/,=,逗号,句号,分号,引号, $,(,),空格 COBOL字是由上述字符组成的最小单位 保留字: 在COBOL已经规定专门用途的字 ( 300多个) 用户字: 用户自定义的名字 如:程序名，文件名，节名，段名，数据项名等,1.8 数据名,数据名相当于其它语言中的变量名，它代表一个具体的数据项。 数据名长度不能超过30个字符 只能

11、由字母(至少一个)，数字和连字符“-”组成，连字符不能出现在两端，不能包含空格 不应用保留字作为数据名 123, DECO.HENRY, OWEN-, 3R, DIVISION，MOVE, ADD 尽量使用有意义的英文字或拼音，如： NAME，XINGMING，XMING，XM 建议：多使用连字符，如:DEPTART-NUMBER,1.9 常量 （一）,数值常量 由正负号，小数点，数字09组成的序列 如：12300, 45.67, -89 数值（digit）长度不超过18位 最多有一个正负号,且只能出现在最左边 小数点不能出现在常数右边 如：MOVE 20. TO AGE(错误) 文字长最多1

12、60个字符,1.9 常量 （二）,非数值常量 用引号括起来的字符串 如：ABC, $123, HELLO,WORLD! 由纯数字组成的非数值常量不能用于数学运算 123和123不同 可以使用保留字,如: DIVISION 可以写入引号,如: MOVE QUOTE HENRY QUOTE TO NAME，结果为HENRY,1.9 常量 （三）,1.10 COBOL所处理数据的特点,层次,1.10 COBOL所处理数据的特点,01 GZTJ 02 ZGM 02 SR 04 JBGZ 04 FJGZ 04 YBBZ 02 KC 04 BSJ 04 FZF 04 SDF 04 TEF 02 SFGZ,

13、为了反映某数据在一个层次结构中的层次，我们引进层次的概念，层号用二位整数来表示。用不同的层号表示它们之间的从属关系。 初等项 组合项,1.10 COBOL所处理数据的特点,1.10 COBOL所处理数据的特点,层次: 数据间不是孤立的,而是存在从属关系 记录: 具有一定层次关系的一组数据项的最大集合 初等项: 数据的基本单位 组合项: 由若干初等项和低一层组合项组成 文件: 存储在外部介质上的记录的集合 数据库: 由若干个文件组成 层号: 为了反映某数据项在一个层次结构中的从属 关系,由两位整数组成,层号越小则层次越高,COBOL程序的编译,创建分区数据集ST.COBOL.SOURCE(labXX) 存放源程序 创建分区数据