《第一章 cobol语言概述》由会员分享，可在线阅读，更多相关《第一章 cobol语言概述（63页珍藏版）》请在金锄头文库上搜索。
1、Cobol for Z900 语言程序设计汤峰EMAIL:FENGTANGSCUT.EDU.CN2008-5-4Cobol for Z900 语言程序设计第一章 COBOL语言概述一、COBOL语言的发展概况二、COBOL程序的结构三、COBOL程序的元素四、程序的运行2008-5-4Cobol for Z900 语言程序设计一、 COBOL语言的发展概况(一)COBOL介绍 商业计算首选语言COBOL是Common Business Oriented Language (通用商业语言）的缩写。广泛应用于数据管理领域，例如财会工作，统计报表，计划编制，人事管理等。被称为 “用于管理的语言 ”。
2、数据处理的特点：算术计算量少而逻辑处理多；输入输出量大；数据间存在着一定的逻辑关系；大量的分类排序。主要功能是描述数据结构和分析处理大批量的数据。绝大多数银行（如工中建交等），它们完成所有的交易功能，都是用COBOL来实现。2008-5-4Cobol for Z900 语言程序设计Gartner group 的关于 COBOL优势的调查报告：在 1997年他们估计全世界有 3千亿行的计算机代码正在使用。其中 80的是 COBOL程序，而其他程序总计只占 20。在 1999年，他们报告说，超过 50的关键事务应用程序仍然会用 COBOL语言编写，他们最近估计表明在 2004 2005年度所有新程
3、序（ 50亿行）的 15将用 COBOL开发，同时， 80的部署在计算机里面的程序将包括以前遗留的 COBOL程序。该集团估计，在 2002年全世界有大约 200万 COBOL程序员，而 JAVA和 C+程序员各自只有 100万2008-5-4Cobol for Z900 语言程序设计(二)COBOL历史1.1959年,由美国的一些计算机用户组织设计了专用于商务处理的计算机语言COBOL，它是第一个COBOL语言文本。2. Cobol正式发布于1960年4月，称为Cobol60。3. 1968年美国国家标准委员会ANSI又通过了新的标准ANSI COBOL X.3.23-1968。1972年国
4、际标准化组织ISO将其作为国际标准文本ISO COBOL-72。2008-5-4Cobol for Z900 语言程序设计(二)COBOL历史4. 1974年ANSI对COBOL-68作出了修订扩充，形成了ANSI COBOL X3.23-1974。1978年ISO采用其形成ISO COBOL-78。5. 美国又提出了COBOL-85，增加了很多结构化程序设计的内容。6. 最新的标准COBOL 2002主体已经于2002年12月出版。2008-5-4Cobol for Z900 语言程序设计2008-5-4Cobol for Z900 语言程序设计我校大型机的 COBOL 版本 :IBM En
5、terprise COBOL for z/OS 2008-5-4Cobol for Z900 语言程序设计(三)COBOL特性1.最适于数据处理领域。2. 比较接近于自然语言（指的是英语）。ADD A TO B A + B = B3. 通用性强，由于COBOL语言的标准化程度较高。4. COBOL的结构严谨，层次分明。每个程序分四大部分，每个部分又分为若干节，节下面又分为若干段。5. COBOL的缺点是比较繁琐。2008-5-4Cobol for Z900 语言程序设计二、 COBOL程序的结构一. COBOL的组成部分：1. 标识部（IDENTIFICATION DIVISION）：用于标识
6、程序名(一般不超过8位）。2. 环境部（ENVIRONMENT DIVISION）：用于说明程序运行的环境。3. 数据部（DATA DIVISION）：用于说明程序中涉及的所有数据。4. 过程部（PROCEDURE DIVISION）：是程序的核心部分，它决定计算机应进行什么操作。2008-5-4Cobol for Z900 语言程序设计二、 COBOL程序的结构节（ SECTION）和段（ PARAGRAPH） 除标识部以外，在每一个部的 “部头 ”的下面，可以有若干个节 (SECTION)，每一个节以 “节头 ”作标识。 每一节下面又可包括若干段 (PARAGRAPH)。每一个段都有自己的
7、名字 (即段名 )。 在标识部下面不设节直接设段（1）部-节-段,（2）标识部下面不设节，直接设段（3）数据部下设节，节下面是描述体（4）过程部可以设节，下面再设段，也可以直接设段2008-5-4Cobol for Z900 语言程序设计句子语句子句DISPLAY HELLO. STOP RUN.句子、语句和子句 在过程部中，每一段由若干个句子 (Sentence)组成。一个句子是以句号加一个以上的空格束结束的。 句子又由语句 (Statement)组成。 一个句子可以只由一个语句组成，一个语句加一个句点后跟一个 (多个 )空格就成为一个句子。 在一个语句中又可以包含若干个子句 (clause
8、)每一于句也有一个动词，它指定某一方面特定的功能。DISPLAY HELLOSTOP RUN.2008-5-4Cobol for Z900 语言程序设计二.COBOL 源程序的书写格式：第1 至 6 列为 “标号区 ”。第7列为 “续行标志区 ”。第8至此11列，称为 “A区 ”。程序中有些内容如部头，节头，段头，层号 01，层号 77 及文件描述符FD等应从A区开始写。第12至此72列，称为 “B区 ”。写程序中的正文部分。如过程部中的句子只能从B区开始写。第73至80列，称为 “注释区 ”。2008-5-4Cobol for Z900 语言程序设计例题1-6 7 8 12-72 73-80
9、001001 IDENTIFICATION DIVISION.001002 PROGRAM-ID. PSAMPLE1.001005 ENVIRONMENT DIVISION.DATA DIVISION.PROCEDURE DIVISION.S. DIS- PLAY hello world!STOP RUN.2008-5-4Cobol for Z900 语言程序设计写程序的注意事项：9 每个字符占一格。9 较早的 COBOL版本规定所有字母都应大写，但现在使用的COBOL编译系统允许使用大写或小写字母，二者等价。不过习惯都用大写字母，主机系统一般都用大写字母。9 相邻的两个字 (如 COBOL的
10、保留字或用户自己定义的名字 )之间必须留一个以上的空格。9 运算符 (如加、减、乘、除、乘方 )和等号左右两边必须各留一个空格。在过程部中左括号的左侧和右括号的右侧要留一空格，而内侧不必留空格。9 逗号、句号、分号的左边不能留空格，而右边应有空格。9 一个空格和多个空格作用相同2008-5-4Cobol for Z900 语言程序设计三、 COBOL语言的元素(一)COBOL字符COBOL字符集包括：数字0 - 9 ，字母 A- Z ，a -z , 专用字符：+ - * / = , . ; ( ) $ 及空格。“ ” “!” “?” “%”只能在COBOL程序中的字符串中出现。2008-5-4
11、Cobol for Z900 语言程序设计(二)COBOL字COBOL字是为了表示一定的意思，由字符组合而成的最小单位。如MOVE, ADD 都是COBOL字。每一个COBOL字不能超过30个字符。1.保留字 MOVE, ADD2.用户字2008-5-4Cobol for Z900 语言程序设计(三)数据名1.相当于其他语言的变量X (内存单元名）MOVE 2 TO X 22008-5-4Cobol for Z900 语言程序设计(三)数据名2.数据名的定名规则（1）每个数据名的长度为1-30个字符之间。（2）只能由字母 数字和连接符 “ ”组成，而且其中至少应有一个字母。连接符只能出现在数据
12、名的中间。（3） 数据名中不能出现空格。（4） 不应选择COBOL的保留字作为数据名。（5） 并不要求数据名是有意义的英文字。2008-5-4Cobol for Z900 语言程序设计(三)数据名A,XCV,AMOUNT-TOTAL,12ABC,12-ABC,AMOUTN.TOTAL, MOVE, ADD, 123, A12,-A-B-C, AMOUTN TOTAL, 2008-5-4Cobol for Z900 语言程序设计(四 )常量数值常量100，29 30， 29. , +123-非数值常量ABC, 123DISPLAY 123. 123DISPLAY QUOTE 123 QUOTE.
13、 123表意常量2008-5-4Cobol for Z900 语言程序设计(四 )常量表示由一个或多个该常量组成的字符串ALL 常量表示一个或多个引号字符QUOTE/QUOTES表示一个或多个具有 “最小值 ”的字符（每个字符的二进制表示为00000000）LOW-VALUE/LOW-VALUES表示一个或多个具有 “最高值 ”的字符（每个字符的二进制表示为11111111）HIGH-VALUE/HIGH-VALUES表示一个或多个空格字符SPACE/SPACES表示一个或多个零字符ZERO/ZEROS/ZEROES所表示的值表意常量2008-5-4Cobol for Z900 语言程序设计四
14、、 COBOL程序的运行(一)程序编辑（ 创建PS数据集或PDS数据集）2008-5-4Cobol for Z900 语言程序设计2008-5-4Cobol for Z900 语言程序设计2008-5-4Cobol for Z900 语言程序设计2008-5-4Cobol for Z900 语言程序设计2008-5-4Cobol for Z900 语言程序设计(二)程序的编译, 链接 和执行（1）编译：把源程序语句（源模块）转换成目标模块；（2）链接编辑：把目标模块同子程序库中的其他程序链接起来得到可执行模块；（3）执行：运行可执行模块得到结果。2008-5-4Cobol for Z900 语
15、言程序设计2008-5-4Cobol for Z900 语言程序设计(三)作业的提交作业是用户在完成某项任务时要求计算机所做工作的集合。在一个作业中，每一次程序的执行称为一个作业步，一个作业可包含几个作业步。作业控制语言JCL（Job Control Language）是用户与操作系统的接口。用户通过JCL的相应语句来与操作系统通讯，获得作业所需的资源等，按自己的意图来控制作业的执行。2008-5-4Cobol for Z900 语言程序设计(三)作业的提交一个作业中的各步是顺序执行的，因此一个作业步的输出可以作为下一个作业步的输入。必须包含三个JCL基本语句（JCL Statement）。它们分别是：（1）作业语句（JOB）：标识一个作业的开始。（2）执行语句（EXEC）：标识一个作业步的开始。（3）数据定义语句（DD）：用于描述应用程序所需要的数据文件。2008-5-4Cobol for Z900 语言程序设计(三 )作业的提交/JOB1 JOB 作业名为 JOB1 /COMSTEP1 EXEC 编译作业
