资源描述：
《COBOL语言基础培训教程.doc》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。
1、Cobol语言基础培训教程Chapter1cobol概述Cobol是commonbusinessorientedlanguage的缩写。它不仅足商业数据处理的理想语言,而且广泛用于数拯管理领域，因此cobol语言也被称为”用于管理的语言”。—oCobol语言的特点最适于数据处理领域：算数计算量少而逻辑处理量多，输入输出量大，数据间存在着一定的逻辑关系，大量的分类排序；cobol比较接近英语，容易懂；通用性强，易移植,cobol结构严谨，层次分明。二。Cobol的组成部分：1。标识部(identi
2、ficationdivision):用于标识程序名。2O坏境部(environmentdivision):用于说明程序运行的坏境。3。数据部(datadivision):用于说明程序中涉及的所有数据。4O过程部(proceduredivision):是程序的核心部分，它决定计算机应进行什么操作。三。最简单的cobol程序举例：Coll-67812-7273-80Identificationdivision。Program-idoPsampleloEnvironmentdivision。Datad
3、ivision0ProceuredivisionoDisplay'thisisacobolprogram/Stopruno四。Cobol源程序的书写格式：第1至6列为”标号区”。第7列为”续行标志区”第8至此11列，称为”a区”。程序中有些内容如部头，节头，段头，层号01,层号77及文件描述符fd等应从a区开始写。第12至此72列，称为”b区”。写程序中的正文部分。如过程部中的句子只能从b区开始写。第73至80歹IJ,称为”注释区”。五。Cobol字符集包括：数字0-9,字母a-z,a-z,专用
4、字符：+・*/=,./()<>$及空格。属于系统字符集而不属于cobol字符集的字符只能出现在cobol程序中的字符串里。六。常量：Cobol常量分为数值常量(如100,-29),非数值常量(如'abc')和表意常量(如zero,space,high-value,low-value,quote,all常量)o七。Cobol所处理的数据的特点层次的概念：数据间存在的从属关系。文件的概念：多个记录可以组成一个文件。记录的概念：具有一定层次关系的一组数据项的最大集合，它是内存中具有独立逻辑含义的最大存
5、取项，具有最高层次。Chapter2过程部初步—。输入输出语句。loAccept语句：直接从终端键盘或系统指定的输入设备上输入数据。Accept标识符［from助忆名］注：a。标识符(identifier)指的是能唯一地标识一个数据项的数据名，不能唯一地标识一个数据项的数据名不是标识符。标识符可以是组合项。Bo在accept语句中如不写from部分，如accepta,则表示从系统隐含指定的设备上读入一个数据给a。如果不想从指定的设备上输入，则要用from选项，这时”助忆名”需要在环境部中事先说明
6、和那种外部设备相联系。如：Environmentdivisioru(坏境咅19Configrationsectiono(配置节)Special-nameso(专用名段)Consoleisabc如在过程部中有accepttfromabco则表示要从控制台接收数据2。Display语句：从计算机内存中输出到某一指定的输出设备上。Display｛标识符1,常量1｝［标识符2,常量2］。。o［upon助忆名］(标识符和助忆名的说明同上)Accept语句和display语句不必定义文件适用于少量的数据输入
7、输出。3ORead语句：cobol语言中数据的输入输出主要是通过对外部文件的读写进行的。Read语句就是从外部文件上读入数据输出到程序中的数据项中。在程序中用到的所有文件都需要在环境部中指定程序中用到的文件名与实际外部文件的联系。数据部也要对文件加以描述。指定数据结构各数据项所占的内存单元长度以及数据形式。Cobol的存取是以文件为对象以记录为单位的。Read语句的最简单的格式为：read文件名Environmentdivision。Input-outputsection0File-contro
8、loSelectin-filleassignto外部文件名。为了存储读入的记录，必须在内存开辟一个与文件记录长度相等的存傍区，即'输入文件纪录区’。每一个输入文件都有相应的'输入文件纪录区’，与之一一对应。亦即在数据部中描述文件的数据结构。3。Read语句:假设imfile文件每一记录中包含的内容为：产品代码，产品数量，产品单价，生产日期。设某一记录的具体数据如下：00100100000100019990322Prodcodequantitypriceyearmonday如果我们希望读入该记录并
