COBOL语言

高级程序设计语言

COBOL语言，是一种面向过程的高级程序设计语言，主要用于数据处理，是国际上应用最广泛的一种高级语言。COBOL是英文Common Business-Oriented Language的缩写,原意是面向商业的通用语言。它采用 300多个英语单词作为保留字，以一种接近于英语书面语言的形式来描述数据特性和数据处理过程,因而便于理解和学习。COBOL语言是专门为企业管理而设计的高级语言，可用于统计报表、财务会计、计划编制、作业调度、情报检索和人事管理等方面。

简介

发展

50年代中期电子计算机开始用于商业和企业的事务处理,而事务处理与科学计算不同,数据繁多而运算简单,它只需要一定的运算能力,但对数据结构的描述和大批量数据的分析处理方面则要求有很强的功能。

特点

COBOL语言的主要特点是：

程序结构图为COBOL源程序的逻辑结构图。每个 COBOL语言程序都是按部、节、段和体几个层次构成的。每个程序由标识部、设备部、数据部、过程部等四个部组成。

标识部提供标识该程序的信息，如程序名、日期、程序员的姓名等。

设备部又称环境部，它提供有关该程序运行环境即计算机主机和外部设备方面的信息。它是程序中唯一描述计算机硬件的部分。COBOL程序规定把这一部分单独分出来,借以提高程序的通用性，把一个COBOL程序从一台计算机移到另一台不同的计算机去时只须修改这一部分内容便可执行。

数据部描述作为处理对象的数据文件、记录、数据项的结构和特性。例子下面是一个记录描述的例子：

01RECORD-1

02NAMEPICTUREISX(20)

02SEX PICTUREISA

02BIRTHDAY

03YEAR-BPICTUREIS9999

03MONTH-B PICTUREIS99

03DAY-B PICTUREIS99

这一记录由三项组成：NAME（姓名）是不超过20个字符的字符串，由X(20)说明；SEX（性别）是一个字母，由A说明,程序中可用M表示男性而用F表示女性；BIRTHDAY（出生日期）是一组合项,由3个表示年、月、日的更基本的项组成。各数据项的层次结构由层号表示，例中的01，02，03就是表示数据项在记录中的层次。这种表示方法很便于程序员描述管理、财会等领域中常见的有结构的数据。

过程部描述数据处理的步骤。数据从外部传入计算机主存储器称为输入；从主存储器将数据传出称为输出；数据在主存储器内从一个存储区传到另一个存储区称为传送；对数据进行加、减、乘、除运算称算术运算。这些都是数据处理的基本操作，程序由一系列描述基本操作的语句组成。如果程序执行中需要根据某个条件是否满足来决定它的后继处理步骤，称为转移控制，由控制语句来描述。每个COBOL语句包含一个英语动词,用以指明该语句操作的性质。动词后面随有若干操作对象的信息和描述操作的补充信息。下面是一段COBOL过程部的程序：

ACCEPTQUANTITY

MULTIPLYQUANTITYBYPRICEGIVING

TOTAL-PRICE

DISPLAYTOTAL-PRICE

ACCEPT(接收)、MULTIPLY(乘)、DISPLAY(显示)是三个英语动词。QUANTITY(数量)、PRICE(单价)、TOTAL-PRICE(总价)是变量的名称,代表被处理的对象。BY(被......)、GIVING（给出）是辅助用的保留字，说明被处理对象之间的关系。上述程序的意义为：从终端上接受操作员用键盘输入的商品数量值，然后将数量乘以单价得出总价，最后在显示屏幕上显示总价。

组成

字符集

数字0—9，字母A—Z，a—z,专用字符：+-*/=,.;’()<>$及空格。属于系统字符集而不属于COBOL字符集的字符只能出现在COBOL程序中的字符串里。

常量

COBOL 常量分为数值常量（如100，-29），非数值常量（如’ABC’）和表意常量（如ZERO，SPACE，HIGH-VALUE，LOW-VALUE，QUOTE，ALL常量）。

书写格式

第1至6列为”标号区”。第7列为”续行标志区”

第8至此11列，称为”A区”。程序中有些内容如部头，节头，段头，层号01，层号77及文件描述符FD等应从A区开始写。

第12至此72列，称为”B区”。写程序中的正文部分。如过程部中的句子只能从B区开始写。

第73至80列，称为”注释区”。

数据特点

全国各地天气预报查询