陈小丽_论文初稿21

COBOL语言在汽车销售系统开发中的应用研究黄思民(信息科学与技术学院,2006(3)班,06263125号)[摘要] COBOL自60年代初开始就广泛应用于计算机领域，以其可读性、可维护性和可移植性受到商业单位和政府部门的青睐，但是在国内了解COBOL的人却并不是很多。

本文在使用COBOL语言实现P32L项目的相关功能模块的基础上，首先介绍了COBOL的一些基础知识和COBOL在项目开发中的应用的一般步骤，然后重点讨论了COBOL在实现功能的过程中如何与DB2和JCL相互调用和COBOL程序进行测试时的一些基本步骤与方法，最后，对此次研究进行了总结。

[关键字] COBOL语言 P32L项目大型机 JCL DB21 引言大型机[1]一般用在尖端的科研领域，其主机通常由许多中央处理器协同工作，有着超大的内存和海量的存储空间。

大型机的性能优势如可用性、可扩展性、安全性、分区和负载能力是其他类型服务器所不及的。

大型机处理复杂多任务的能力超强，当机时间远远低于其他类型的服务器；大型机I/O能力强，常用于超大型数据库的访问；采取动态分区管理，根据不同应用负载量的大小灵活地分配系统资源；从底层防止入侵的设计策略使大型主机安全性比较高。

以上特性对于像金融、电信、交通、能源、政府等行业中对于系统处理能力和安全性稳定性要求都极为苛刻的应用来说，大型主机是不可替代的。

目前，COBOL语言、PL/I 语言是主要用于大型机开发的程序设计语言。

但和大型机相关的语言并不是就只有这两种，JCL[2]、CICS、REXX 、OPC等都是大型机常用的一些基本语言。

此次研究的P32L项目主要涉及到的是COBOL和JCL这两门语言。

其中，JCL只是一个工具，它的主要任务就是和大型机的相关操作系统进行交互，完成用户要求的一些任务。

所以完成项目功能模块主要是靠COBOL语言。

本文主要从COBOL在实现功能的过程中如何与DB2和JCL相互调用、COBOL程序进行测试时的一些基本步骤和方法等方面入手，深入研究了COBOL在P32L项目中的应用方法。

2 P32L和COBOL简介2.1 P32L项目简介P32L项目是一个针对于日本的尼桑汽车专门设计的销售系统。

尼桑（NISSAN）汽车公司是日本的第二大汽车公司，同时也是第一家开始制造小型Datsun轿车和汽车零件的制造商。

由于公司不断地发展，业务管理上要求处理的数据量变得非常庞大，一般的PC 机难以处理，而大型机最适合数据处理领域，处理能力强，处理数据量大。

因此，尼桑汽车公司委托IBM公司对其数据进行分析，并且设计出合适的汽车销售管理系统。

经IBM公司需求分析后，发现尼桑汽车公司的数据处理方面存在的主要问题是对大量的初始数据进行加工，加工过程是一些极其简单的运算或逻辑判断，但需要重复许多次，最后输出大量的结果数据，这些数据还往往是一些表格。

数据量大、逻辑简单、易组织及加工过程重复构成了这类问题的主要特性。

2006年，IBM公司针对这一数据特征，开发出了“尼桑汽车销售系统”，也就是此次研究的P32L项目。

P32L项目的主要功能是：从汽车出厂的时候开始，记录车辆的基本信息，当车辆被购买后，记录相应车主的信息，并预先收取汽车的相关费用，在该车主将车转手的时候，会根据定的百分比扣除费用，并将剩下的钱退回，同时记录下一任车主的信息，以此类推，直到该汽车被销毁。

2.2 COBOL的发展状况分析目前，中国从事大型机的人并不是很多，大多数计算机人员都是使用JA V A、C++等语言，几乎很少有人有机会意识到COBOL的重要性。

其实，COBOL的重要性可以用这句话来描述：在大型机领域，70％[3]的数据都是用COBOL语言处理的，并且90％的ATM 事务处理用的都是COBOL语言。

每天在线处理的COBOL事务有300亿次。

500强中有492家（包括全部的100强）使用了COBOL语言，目前在COBOL方面的投资已经超过3万亿美元，据统计用COBOL书写的程序超过了1000亿行，并且以每年大约50亿行代码的速度在增长。

COBOL在商业领域有着雄厚基础，主要应用于银行、金融证券等非常重要的商业数据处理领域以及大型机应用方面。

日本的金融证券等领域从上世纪70年代开始，大规模的采用了COBOL语言进行系统开发，随着时代的发展，需要对原有的系统进行升级、改造，以及追加业务处理功能等等。

然而日本和中国相应的COBOL技术人才非常的紧缺，具备COBOL技能的软件开发人员的工薪也水涨船高，COBOL开发人员比学习其它开发语种的工薪都高出一个级别。

在日本发往国内的外包业务中COBOL业务占据着最主要的位置，COBOL项目最基本的表现是规模大、周期长、利润丰厚，对于这种一次投入上百人同时开发作业的项目，在北京市也只有一些对日软件开发的龙头企业具备开展COBOL业务的资格。

总体来说，随着数据处理的增多，处理速度的要求提高，人们开始再次将目光转向大型机。

相信随着大型机的再次兴起，COBOL也将会再次谱写曾经的辉煌。

本文主要通过使用COBOL语言在P32L项目的功能模块，研究COBOL项目的一般实现步骤、COBOL的一些相关使用方法等，从而对COBOL项目有个更深的了解。

2.3 COBOL的特点COBOL是一种面向数据处理、面向文件、面向过程的高级编程语言，是一种功能很强而又极为冗长的语言。

COBOL适用于具有循环处理周期的环境（例如打印工资支票）以及数据操纵量相当大的环境。

主要应用于商业数据处理领域，对各种类型的数据进行收集、存储、传送、分类、排序、计算及打印报表、输出图象是它的强项。

2.4 COBOL 的程序结构COBOL 程序由4个部（DIVISION）[4]组成：IDENTIFICATION DIVISION（标识部）、ENVIRONMENT DIVISION（环境部）、DATA DIVISION（数据部）、PROCEDURE DIVISION（过程部），而且每个部又由若干节(SECTION)组成。

在P32L项目CODING的过程中，无论是简单的还是复杂的程序，都是紧紧围绕这四个部展开的，CODING人员需要根据IDD的要求，在不同的部里面CODING相应的内容。

同时，还必须严格按照客户提供的CODING基准来进行CODE，以达到美观、整齐、易读的效果。

2.4.1 IDENTIFICATION DIVISION标识部是COBOL程序中的第一个部，主要用来描述与程序本身相关的信息。

任何一个COBOL程序中都必须包含有标志部。

标志部主要包含以下字段：●PROGRAM-ID；●AUTHOR；●DATE-WRITTEN；●DATE-COMPILED。

图1为P32L项目中一个COBOL程序J013G0的标识部。

图1 标识部2.4.2 ENVIRONMENT DIVISION环境部主要用于显示程序可以被运行的计算机环境。

它主要包括“CONFIGURATION SECTION”配置节和“INPUT-OUTPUT SECTION”输入/输出节。

配置节的作用主要是来指定程序同外部环境之间的一些配置信息。

主要包括：●SOURCE-COMPUTER：描述编译程序的计算机；●OBJECT-COMPUTER：描述运行程序的计算机；●SPECIAL-NAMES：指定货币符号选择小数点、提供开关名和定义字母表。

输入输出节的作用主要是指定程序中所用到的文件同外部环境之间的对应关系。

也就是说，输入/输出节主要作用是将程序中的逻辑文件同环境中的物理文件相对应起来。

该节主要包括：●FILE-CONTROL：用于指定文件的对应关系，是该节中主要用到的字段；●I-O-CONTROL：用于定义程序返回点，不同文件共享的内存区，以及多文件卷中文件的位置。

图2显示了一个环境部，其中I1-SHUKKA-WAKU-IMP-FILE是个逻辑输入文件，它只作为一个输入文件的变量在程序中使用，通过SYS01与真实存在的物理文件对应起来。

图2 环境部2.4.3 DATA DIVISION数据部主要用于定义和声明程序所要使用的变量及其他数据。

程序要使用的全部变量和数据必须在这里定义。

“DATA DIVISION”主要包含“FILE SECTION”和“WORKING-STORAGE SECTION”节。

FILE SECTION：用于对程序中用到的文件里的数据进行定义。

需要注意的是，此处说的文件指的是程序中的逻辑文件。

其文件名必须和环境部输入/输出节中由SELECT语句指定的文件名一致。

在文件节中，如图3所示，主要是通过FD语句实现对文件的定义。

在P32L项目中，每个功能模块都有一个IDD，IDD会提供给CODING人员一个关于所有变量的长度和类型的表格，同时项目还会提供一个layout和copy文，分别对应变量的定义方法和组织形式。

CODING人员可以根据这些信息确定DATA DIVISION里文件变量该如何定义。

图3 FILE SECTION中的FDWORKING-STORAGE SECTION：主要用于定义本程序中所需用到的各种数据。

其中数据的定义方式同在文件节中的类似，不过此处定义的数据与文件是没有直接关系的。

在P32L项目里，有的时候需要定义结束标志和选择开关等变量，但这些变量都是临时变量，跟文件里的变量没有太过直接的关系，所以这些变量就可以放在WORKING-STORAGE-AREA中，如图4所示，供本程序使用。

图4 WORKING-STORAGE SECTION2.4.4 PROCEDURE DIVISIONCOBOL 程序的所有逻辑处理部分都是在过程部中编写的。

需要传入参数时，采用“PROCEDURE DIVISION USING 引数名[，参数名...]”的方式。

过程部中的程序代码是由COBOL语句所组成的。

在P32L项目中，经常会将实现某一特定功能的多条语句定义为一个语句段。

语句段在COBOL中类似于函数的概念，可以直接通过语句段名对其进行调用。

例如，图5中KAISHI-SHORI就是一段关于在数据处理之前所做的一些操作，此处我们将其单独分离出来，在图6的MAIN处理的时候直接调用就行了。

这样做，对于读程序的人来说比较简洁明了，对于编程者来说在逻辑上比较有条理，使用起来也比较方便。

图5 开始处理段图6 MAIN处理段当程序逻辑代码完成后，通常使用“STOP RUN”语句表明程序的结束。

在子程序中，也可使用“GO BACK”语句或“EXIT PROGRAM”语句表示程序的结束。

3 COBOL在P32L项目开发中的基本步骤在P32L项目中，虽然很多不同功能模块的实现过程中有很多细节不同，但是基本步骤都是固定的，图7为CODING人员所需要做的一般步骤。