COBOL语言程序设计课件.ppt
COBOL 语言程序设计,大连理工大学IBM技术中心 姜厚云,第一章 COBOL概述（一）,1.1 COBOL语言的历史1.2 COBOL语言的特点1.3 COBOL程序的编译方法1.4 两个简单的COBOL源程序1.5 COBOL程序的结构1.6 COBOL程序的书写格式1.7 COBOL字符和COBOL字,第一章 COBOL概述（二）,1.8 数据名1.9 常量1.10 COBOL所处理数据的特点,1.1 COBOL语言的历史,COmmon Business Oriented Language用于商业数据处理与管理，如：银行，会计业，人事管理，财会，统计报表，情报检索，证券，金融等等1959年5月 美国国防部召开数据系统语言会议1959年12月 第一个COBOL语言文本1960年4月 正式发表COBOL 60,经过扩充完善COBOL 61ANSI COBOL 61-最早的版本1965年COBOL 65-ANSI COBOL 68-ISO COBOL 721972年COBOL 72-ANSI COBOL 74-ISO COBOL 78ANSI COBOL 85-应用最广泛的版本ANSI COBOL 2002-最新版本,1.2 COBOL语言的特点,描述性好，能根据需要描述各种形式的数据适合大批量数据处理，能对数据进行严密的组织(算术运算简单但运算量大，逻辑运算多)接近自然语言(英语)，成文自明例如：ADD A TO B GIVING C遵循ISO标准，通用性强，移植方便格式固定，结构严谨，层次分明缺点是比较繁琐,1.3 COBOL程序的编译,创建分区数据集ST.COBOL.SOURCE(COB)存放源程序创建分区数据集ST.COBOL.LOAD 存放可执行模块它的属性比较特殊：Record format=URecord length=0Block size=6144创建顺序数据集ST.COBOL.COMLINK编写JCL用于编译链接源文件例1.3创建顺序数据集ST.COBOL.RUN编写JCL用于运行可执行模块,1.4 两个简单的COBOL源程序,例程1.4.1 了解COBOL程序的基本结构例程1.4.2 简单的变量定义，输入输出及运算,1.5 COBOL程序的结构,1.5.1 部1.5.2 节，段和描述体1.5.3 句子，语句和子句1.5.4 结构一览表,1.5.1 部,IDENTIFICATION DIVISION(标识部)主要指定源程序的名称，也可记录背忘信息，如日期作者ENVIRONMENT DIVISION(环境部)指出程序中用到的数据文件名与系统设备的对应关系DATA DIVISION(数据部)说明程序中所有数据的类型和所占内存大小PROCEDURE DIVISION(过程部)定义程序要执行的指令，是程序的核心注意：四个部缺一不可！即使部的内容为空也要写全！,1.5.2 节，段，描述体,部下设置节(SECTION),节下设段(PARAGRAPH)或描述体(DESCRIPTION ENTRY)标识部下直接定义段环境部下定义节，节下定义段数据部下定义节，节下定义描述体过程部下定义节，节下定义段(复杂程序)也可以直接定义段(一般程序),1.5.3 句子，语句和子句,句子(SENTENCE)由语句(STATEMENT)组成，语句又由子句(CLAUSE)组成句子以一个句号加一个以上的空格来结束每个语句都是一条完整的指令，用相应的动词表示其操作子句也有一个动词(往往可省)，指定某一方面特定的功能,1.5.4 结构一览表,1.6 COBOL程序的书写格式（一）,ANSI格式标准COBOL程序每行80列，被分为五个区域第16列为“标号区”标号是6位数字，应从小到大，但不一定连续标号只是方便查阅程序，可以不写第7列为“续行区”使用“-”表示本行是紧接在上一行后面续行要从第12列开始写使用“*”表示本行是注释,1.6 COBOL程序的书写格式（二）,第811列为“A区”程序中有些内容必须从该区开始书写，如：部头，节头，段头，层号01和77，文件描述符第1272列为“B区”程序正文部分，过程部语句必须从该区开始书写第7380列为“注释区”写入此区的内容为注释内容，编译时被舍去,1.6 COBOL程序的书写格式（三）,早期COBOL要求所有字母应大写，现在COBOL大小写等价，用引号括起来的字符串除外，如：ADD A TO B=add A To bDISPLAY HELLO DISPLAY hello相邻的两个COBOL字之间有一个以上的空格运算符和等号左右必须各有一个空格圆括号外侧必须有一个空格，内侧不必，如：A+(B+C)/D逗号，句号，分号左边不能有空格，而右边应有,1.7 COBOL字符和COBOL字,COBOL字符是指在程序中允许出现的字符包括数字，大小写字母及15个专用符号+,-,*,/,=,逗号,句号,分号,引号,$,(,),空格COBOL字是由上述字符组成的最小单位分为保留字:在COBOL已经规定专门用途的字用户字:用户自定义的名字 如:程序名，文件名，节名，段名，数据项名等,1.8 数据名,数据名相当于其他语言的变量名，代表一个具体的数据项数据名长度为130个字符只能由字母(至少一个)，数字和连字符“-”组成，连字符不能出现在两端，不能包含空格不应用保留字作为数据名123,DECO.HENRY,OWEN-,3R,DIVISION尽量使用有意义的英文字或拼音，如：NAME,AGE，GONGZI建议：多使用连字符，如:DEPTART-NUMBER,1.9 常量（一）,数值常量由正负号，小数点，数字09组成的序列如：12300,45.67,-89小数点不能出现在常数右边，如：MOVE 20.TO AGE数值长度不超过18位最少有一个数字最多有一个正负号,且只能出现在最左边,1.9 常量（二）,非数值常量用引号括起来的字符串 如：ABCD,$123,HELLO WORLD由纯数字组成的非数值常量不能用于计算123和123不同可以使用保留字,如:DATA可以写入引号,如:MOVE QUOTE HENRY QUOTE TO NAME,1.9 常量（三）,表意常量例1.9ZERO,ZEROS,ZEROES表示零字符SPACE,SPACES表示空格HIGH-VALUE,HIGH-VALUES表示具有最高值的字符(每个字符二进制为11111111)LOW-VALUE,常LOW-VALUES表示具有最低值的字符(每个字符二进制为00000000)QUOTE,QUOTES表示引号ALL 常量:表示由该量组成的字符串,1.10 COBOL所处理数据的特点,层次:数据间不是孤立的,而是存在从属关系记录:具有一定层次关系的一组数据项的最大集合文件:记录在外部介质上的记录的集合库:由若干个文件组成初等项:数据的基本单位组合项:由若干初等项和低一层组合项组成层号:由两位整数组成,用来表示层次,层号约小则层次越高,1.10 COBOL所处理数据的特点,层次:数据间不是孤立的,而是存在从属关系记录:具有一定层次关系的一组数据项的最大集合文件:记录在外部介质上的记录的集合库:由若干个文件组成初等项:数据的基本单位组合项:由若干初等项和低一层组合项组成层号:由两位整数组成,用来表示层次,层号约小则层次越高,
