[COBOL培训课件]第1章_cobol语言概述

COBOL 概述1．COBOL语言的发展概述COBOL是Common Business Oriented Language(商业通用语言)的缩写。

实际上，COBOL不仅是商业数据处理的理想语言，而且广泛应用于数据管理领域，如财会工作，统计报表，计划编制，情报搜索，人事管理等。

因此COBOL也被称为“用于管理的语言“。

在计算机的应用领域中，数据处理（data processing）是应用最为广泛的一个领域。

数据处理的日益广泛应用要求人们设计出能满足实际数据处理工作中各种要求的一种计算机语言。

COBOL就是在这种形势下应运而生的。

1959年COBOL-611965年COBOL-651978年COBOL-781985年COBOL-852．COBOL语言的特点①最适于数据处理领域。

所谓数据处理是指对大量数据的收集，统计，分类和加工。

例如企业管理，库存管理，报表统计，账目管理，信息情报检索等方面都属于数据处理。

数据处理的特点是：算术计算量小而逻辑处理多；输入输出多；数据间存在着一定的逻辑关系；大量的分类排序；对打印报表要求比较高，多样化等等。

②COBOL比较接近于自然语言（英语）。

COBOL程序看起来很像一篇用英语写出来的文章。

比如 ADD A TO B 表示 A + B = B 。

COBOL采用大量英文词汇和句型，学过英语的人看COBOL程序感到通俗易懂。

③通用性强，由于COBOL语言的标准化程度较高。

一个计算机上的COBOL程序向另一计算机系统上移植是比较容易实现的。

④COBOL的结构严谨，层次分明。

每个程序分四大部分（称为部 DIVISION），每个部下面分为若干节，每个节下面分为若干段。

每一部分都有固定的程式。

⑤COBOL的缺点是比较繁琐。

无论程序大小简繁，四大部分都要写齐，对每个部进行必要的定义和说明。

因此源程序显得比较冗长。

3．COBOL程序的结构①部IDENTIFICATION DIVISION（标识部） : 主要用来指定源程序的名字，也可以写入其他做备忘的某些信息。

cobol语言概述一．COBO L程序的结构1．部IDENTIF ICATION DIVISION 标识部ENV IRONMENT DIVISION 环境部DATA DIVISION 数据部PROCEDU RE DIVISION 过程部2．节（SEC TION）和段（PA RAGRAPH）（1）部-节-段（2）标识部下面不设节，直接设段（3）过程部可以设节，下面再设段，也可以直接设段3．句子、语句和子句每一段由若干句子（Sentence）组成，一个句子以句号加上一个以上的空格来结束。

句子由语句（Statement）组成。

语句中又可以包含若干子句（clause），每一个子句也有一个动词（但这个动词往往是可以省略的），它指定某一方面的特定功能。

二．COBO L源程序的书写格式1．1-6列：标号区2．第7列：续行标志区（―-‖为续行，―*‖为注解）3．8-11列：A区（部头，节头，段头，层号01、77，文件描述符F D等）4．12-72列：B区（正文）5．73-80列：注释区三．COBO L字符数字0-9，大写字母A-Z，小写字母a-z，专用字符15个{ + - * / = , . ; ‗ ( ) < > $ 空格}四．常量1．数值常量（1）小数点不能多于一个，而且不能出现在常数最右边。

（2）数值常量的长度不能超过18位数字。

（3）至少要有一个数字，不能有多于一个符号。

（4）数字间不能有空格，空格是分界符。

2．非数值常量（1）用‘‘把字符串包起来（2）假如要把‘‘放到非数值常量中，用Q UOTE保留字，如MOVE QUOTE ‗CHINA‘QUOTE TO A（3）长度不应超过120个字符。

五．COBO L的数据关系过程部初步一．输入输出语句1．ACCEPT（接收语句）：直接从中断键盘或系统指定的输入设备上输入少量的数据。

语法：ACCEPT 标识符[F ROM 助忆名]2．READ（读语句）：从外部文件上读入数据输到程序中的数据项中。

第1章 COBOL简介COBOL是Common Business Oriented Language的缩写，即公用面向商业语言的意思。

在系统地学习COBOL程序设计语言之前，有必要首先对COBOL有一个大致的了解。

本章将分别从背景知识、语法格式、以及实际创建COBOL程序3个方面对其进行简要介绍。

1.1 背景知识在介绍COBOL之前，首先需要了解一下大型机的概念。

大型机也叫主机、大机、mainframe等，属于一种商用高端服务器。

目前大型机主要由IBM公司所生产，最新型号为z系列大型机。

COBOL便是用于大型机上应用软件开发的最主要的程序设计语言。

大型机上的工作大体上可以分为两类，分别为系统方向和开发方向。

系统方向的分工很多，包括使用Tivoli监控系统；使用RACF进行安全管理；使用SMS进行存储管理等等。

开发方向的市场需求相对系统方向则要大得多。

对于开发方向，主要需要掌握以下知识。

❑COBOL：最主要的程序设计语言。

❑JCL：作业控制语言，调用由COBOL编写的程序。

❑VSAM：程序中通常用到的文件类型。

❑DB2：大型机上最主要的数据库，通常以COBOL语言为宿主语言。

❑CICS：用于联机交易的中间件，通常也是以COBOL语言为宿主语言。

对于以上知识，在本书中都有详细介绍。

此外，对于大型机底层的开发，还需要掌握大型机上的汇编语言。

对于大型机汇编语言，在本书中也有具体讲解。

COBOL作为大型机上最主要的程序设计语言，迄今已有40多年的历史。

然而，经过40多年的沧桑，COBOL不仅没有被淘汰，反而在当今愈加流行起来。

关于这一点，主要应该是由以下3个因素所决定的。

❑COBOL广泛应用于广泛应用于银行业、信用卡业、保险业、制造业、航空业等等。

这些领域对于稳定性的要求都是十分高的，因此从很大程度上也保证了COBOL的不可取代性。

❑COBOL自身也在不断发展和更新中。

例如，COBOL本身主要属于面向过程的语言。

COBOL 是Common Business Oriented Language 的缩写。

它不仅是商业数据处理的理想语言，而且广泛用于数据管理领域，因此COBOL 语言也被称为“用于管理的语言”。

一。

COBOL 语言的特点最适于数据处理领域：算数计算量少而逻辑处理量多，输入输出量大，数据间存在着一定的逻辑关系，大量的分类排序；COBOL比较接近英语，容易懂；通用性强，易移植,COBOL结构严谨，层次分明。

二。

COBOL的组成部分：1。

标识部（IDENTIFICATION DIVISION）：用于标识程序名。

2。

环境部（ENVIRONMENT DIVISION）：用于说明程序运行的环境。

3。

数据部（DATA DIVISION）：用于说明程序中涉及的所有数据。

4。

过程部（PROCEDURE DIVISION）：是程序的核心部分，它决定计算机应进行什么操作。

三。

最简单的COBOL 程序举例：COL 1 ---6 7 8 12---72 73---80IDENTIFICATION DIVISION。

PROGRAM-ID。

PSAMPLE1。

ENVIRONMENT DIVISION。

DATA DIVISION。

PROCEURE DIVISION。

DIS PLAY …THIS IS A COBOL PROGRAM.‟STOP RUN。

四。

COBOL 源程序的书写格式：第1 至6 列为“标号区”。

第7列为“续行标志区”第8至此11列，称为“A区”。

程序中有些内容如部头，节头，段头，层号01，层号77 及文件描述符FD等应从A区开始写。

第12至此72列，称为“B区”。

写程序中的正文部分。

如过程部中的句子只能从B区开始写。

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

五。

COBOL字符集包括：数字0 --- 9 ，字母A--- Z ，a --- z , 专用字符：+ - * / = , . ; … ( ) < > $ 及空格。

COBOL程序设计语言入门教程第一章：COBOL简介COBOL，全称为“公共业务计算机编程语言”（Common Business-Oriented Language），是一种专门针对商业应用开发的高级程序设计语言。

本章节将为读者介绍COBOL的背景、特点以及应用领域。

1.1 COBOL的背景COBOL于1960年首次发布，由美国政府、大型企业和专业团体联合开发。

当时，计算机还是新兴的技术，大多数应用主要集中在科学计算领域。

为了适应商业应用的特殊需求，COBOL 应运而生。

1.2 COBOL的特点COBOL以易读性和易维护性著称。

它采用了自然语言风格的编码，使得非专业的程序员也能轻松理解和修改代码。

此外，COBOL还具有丰富的数据处理功能和强大的文件处理能力，适用于处理大量数据的商业应用。

1.3 COBOL的应用领域COBOL广泛应用于金融、保险、银行、物流以及政府行政等领域。

由于COBOL的稳定性和成熟性，一些大型企业仍在使用COBOL开发和维护核心业务系统。

第二章：COBOL基础语法在本章节中，我们将介绍COBOL的基本语法，包括程序结构、数据类型、变量定义、运算符等内容。

2.1 程序结构COBOL程序由多个部分组成，包括程序头、数据定义、主程序和辅助程序。

程序头包含程序名称、作者、日期等信息；数据定义定义所有的变量和文件；主程序包含实际的业务逻辑；辅助程序用于处理一些通用的功能。

2.2 数据类型和变量定义COBOL的数据类型包括数字、字符串、日期、逻辑等。

变量定义使用关键字“PIC”（Picture）来指定变量的类型和长度，例如“PIC 9(4)”表示一个4位数的整数变量。

2.3 运算符COBOL支持常见的算术运算符（加、减、乘、除）和逻辑运算符（与、或、非）。

此外，COBOL还提供了特殊的字符串连接运算符和条件运算符，用于处理字符串和条件语句。

第三章：COBOL程序设计在本章节中，我们将介绍COBOL程序的设计方法和常用技巧，包括文件处理、条件语句、循环结构以及子程序的使用。

COBOL语言的发展概述•COBOL是Common Business Oriented Language(商业通用语言)的缩写。

•COBOL不仅是商业数据处理的理想语言，而且广泛应用于数据管理领域，因此COBOL也被称为“用于管理的语言”。

•在计算机的应用领域中，数据处理（data processing）是应用最为广泛的一个领域。

数据处理的日益广泛应用要求人们设计出能满足实际数据处理工作中各种要求的一种计算机语言。

COBOL就是在这种形势下应运而生的。

COBOL语言的特点•最适于数据处理领域。

•COBOL比较接近于自然语言（英语）。

•通用性强。

•COBOL的结构严谨，层次分明。

•COBOL的缺点是比较繁琐。

COBOL程序的结构•COBOL源程序的结构•标识部环境部数据部过程部段段段节节节节节节节节节段……描述体……段……句子……句子……语句……动词……COBOL的四部●标识部(IDENTIFICATION DIVISION)➢主要用来指定源程序名字，也可以写入其它用作备忘的某些信息(如日期、作者等)。

●环境部(ENVIRONMENT DIVISION)➢指出程序中用到的数据文件名与计算机系统的设备的对应关系，即把某一文件名与某一外部设备联系起来。

●数据部(DATA DIVISION)➢程序中所用到的全部变量都应在数据部中说明它们的类型和所占的内存。

●过程部(PROCEDURE DIVISION)➢编写相应的程序语句来实现源程序需要实现的相应功能。

COBOL源程序的书写格式•ANSI书写格式标号区续行区 A 区 B 区（正文区）注释1 6 7 8 11 12 72 73 80•终端格式•COBOL字符和COBOL字•COBOL字符COBOL字•系统字符集保留字•COBOL字符集例如：DIVISION，SECTION•包括以下字符：用户字（非保留字）・数字：0〜9・大写字母：A〜Z・小写字母：a〜z・专用字符：+ ，-，*，/等数据名的命名规则•每个数据名的长度为1〜30个字符之间。

COBOL简易教程主要内容1.COBOL语言的基本概念及程序的结构∙关于COBOL的初步知识∙COBOL程序的结构∙COBOL源程序的书写格式2.COBOL数据表示∙常量∙层次的概念∙PICTURE语句∙数据在内存中的各种形式3.算术运算∙变量赋值 (MOVE, MOVE CORR)∙算术运算(ADD, SUB, MUL, DIV, COMPUTE等) ∙内部函数4.字符串处理∙合并、分离、取子串、替换等5.程序逻辑控制∙条件的分类∙IF、EVALUATE∙PERFORM6.表处理定义、赋值、引用、查询7.读、写多格式记录文件8.常用语句小结9.子程序1.COBOL语言的基本概念及程序的结构1.1关于COBOL的初步知识◆COBOL是Common Business Oriented Language (通用商业语言，或称管理语言)的缩写◆最适用于数据处理◆比较接近于自然语言（英语）◆COBOL的结构严谨，层次性强◆COBOL的缺点是比较烦琐。

1.2 COBOL 程序的结构部（Division) 一部可包括若干节节（Section) 一节可包含若干段段（Paragraph) 一段可包含若干句子句子（Sentence) 一个句子可包含若干语句语句(Statement) 制定计算机完成一定的操作子句(Clause) 制定完成某一方面的功能每个程序应包含四个部IDENTIFICATION DIVISION (标识部)主要用来指定源程序名字，也可以写入其他用作备忘的某些信息（如日期、作者等)。

ENVIROMENT DIVISION(环境部)主要用于指出程序中用到的数据文件名与计算机系统的设备的对应关系，即把某一文件名与一个外部设备联系起来。

DATA DIVISION(数据部〕程序中所用到的全部数据（包括输入输出的数据和中间数据)都应在数据部中说明它们的类型和所占内存情况。

PROCEDURE DIVISION(过程部〕用来给出程序要执行的指令，使计算机产生相应的操作，例如进行数学运算。

COBOL语言第一章COBOL概述COBOL简介1．COBOL是Common Business-Oriented Language（通用商业语言）※COBOL-85标准，IBM COBOL（大型机）、FUJITSU COBOL（PC）COBOL构成1．IDENTIFICATION DIVISION （标识部）用来指定源程序名和作为备忘的某些信息2．ENVIRONMENT DIVISION （环境部）指出程序中用到的数据文件名与计算机系统的设备对应关系,指定程序所用内存区大小等3．DATA DIVISION （数据部）程序中所用到的全部数据包括输入输出和中间数据4．PROCEDURE DIVISION （过程部）程序要执行的指令，即主处理部分※程序中四大部分缺一不可节和段除标识部没有节，每个部下面有若干个节（SECTION）。

每一节下面可包括若干段。

IDENTIFICATION DIVISION段┇┇ENVIRONMENT DIVISION节段┇节┇DATA DIVISION节描述体┇┇┇PROCEDURE DIVISION（节）段┇┇不区分大小写例：ABC 等同于AbcCOBOL每个句子后要加句号“.”例：PERFORM 1000-INIT.※但在特殊的语句体里是不能写句号、包括：条件、循环、调用例：IF IN1-AREA = HIGH-VALUEMOVE FLG-ON TO FLG-ENDEND-IF.运算符和等号左右两边留空格。

（）左右两边留空格。

例：IF （IN1-AREA = HIGH-VALUE）OR （IN2-AREA = SPACE）……END-IF.COBOL程序纸每行有80列，一行分为几个区标识部Ａ．功能：提供程序的一般性文档说明Ｂ．元素①．IDENTIFICATION DIVISION．//部起始标识②．PROGRAM-ID．XXXXX．//程序名称③．AUTHOR．XXXXX．//作者名称④．INSTALLAION．XXXXX．//公司名称⑤．DATE-WRITTEN．XXXXX．//修改日期⑥．DATE-COMPILED．XXXXX．//编译日期⑦．SECURITY．XXXXX．//安全信息环境部Ａ．功能：提供与程序外部有关的信息Ｂ．元素①．ENVIRONMENT DIVISION．//部起始标识②．CONFIGURATION SECION．//配置节标识③．SOURCE-COMPUTER．XXXXXX．//程序编译计算机型号④．OBJECT-COMPUTER．XXXXXX．//程序运行计算机型号⑤．SPECIAL-NAMES．XXXXXX．//外部设计、货币符号定义⑥．INPUT-OUTPUT SECTION．//输入节标识⑦．FILE-CONTROL．//文件信息描述段标识⑧．I-O-CONTROL．//文件信息描述段标识数据部Ａ．功能：提供程序变量的存放位置Ｂ．元素①．DATA DIVISION．//部起始标识②．FILE SECTION．//文件节标识③．WORKING-STORAGE SETION．//工作存储节标识④．LINKAGE SECTION．//连接节标识⑤．COMMUNICATION SECTION．//通讯节标识⑥．REPORT SECTION．//报表节标识过程部Ａ．功能：即程序逻辑处理部分、包含过程性语句Ｂ．元素①．PROCEDURE DIVISION．//部起始标识②．XXXXXX SECTION ．．．．．．EXIT//子过程节标识数据常量1．ZERO：表示一个或多个零字符2．SPACE：表示一个或多个空格字符3．HIGH-VALUE：表示一个或多个具有“最高值”的字符（二进制11111111）4．LOW-VALUE：表示一个或多个具有“最高值”的字符（二进制00000000）数据类型描述字符例：03 CON-IN1-KENSU PIC X(17).03 CON-IN2-KENSU PIC S9(8).数据定义１．数据层在COBOL中数据项的定义是由若干个层来组织的，即：一个数据项的定义要包括（层号、数据项名称、定义语句、数据类型及数据长度等部分组成）层号：从01～49层用列描述具有层次机构的数据项，77层用来描述独立的数据项，66和88是特殊层２．PICTURE(PIC)语句//数据项目定义语句格式：层号数据项名称PIC类型长度VALUE初始值例：01 FLG-DEFINE.03 FLG-ON PIC X VALUE 'Y'.03 FLG-OFF PIC X VALUE 'N'.03 FLG-FIRST PIC X.03 FLG-END PIC X.03 FLG-EOF1 PIC X.03 FLG-SELECT1 PIC X.03 FLG-SELECT2 PIC X.３．FILLER语句//用来临时占用不使用的数据位置格式：层号FILLER PIC类型长度例：01 WRK-AREA-DEFINE.03 WRK-SAGYO PIC 9(8).03 FILLER REDEFINES WRK-SAGYO.05 WRK-SAGYO-Y PIC 9(4).05 WRK-SAGYO-MD PIC 9(4).05 FILLER REDEFINES WRK-SAGYO-MD.07 WRK-SAGYO-M PIC 9(2).07 WRK-SAGYO-D PIC 9(2).03 FILLER REDEFINES WRK-SAGYO.05 WRK-SAGYO-YM PIC 9(6).05 FILLER PIC 9(2).４．REDEFINES//对上层已知长度的数据项目进行，项目拆份，定义程多个数据项格式：层号FILLER REDEFINES 上层数据项名称例：01 WRK-AREA-DEFINE.03 WRK-SAGYO PIC 9(8).03 FILLER REDEFINES WRK-SAGYO.05 WRK-SAGYO-Y PIC 9(4).05 WRK-SAGYO-MD PIC 9(4).05 FILLER REDEFINES WRK-SAGYO-MD.07 WRK-SAGYO-M PIC 9(2).07 WRK-SAGYO-D PIC 9(2).03 FILLER REDEFINES WRK-SAGYO.05 WRK-SAGYO-YM PIC 9(6).05 FILLER PIC 9(2).５．OCCURS语句//指定数据项位固定项目数或可变项目数的表格（数组）格式：层号数据项目名称OCCURS 维数01 MRG-TBL-DEFINE.03 MRG-TBL OCCURS 2.05 MRG-FLG PIC X.05 MRG-KEY PIC X(12).03 MRG-END PIC X VALUE HIGH-VALUE.＊＊MOVE FLG-ON TO MRG-FLG(1)MRG-FLG(2).６．COPY语句//将文件从源库中复制到COBOL源程序中格式：COPY 文件名称例：COPY XRA240※在这里可以把COPY语句理解程C语言中INCLUDE语句第五章逻辑语句操作语句１．MOVE语句//将数据从发送项目复制到一个或几个接收项目例：MOVE AA TO BB２．ADD语句//将两个或几个数字操作数相加例：ADD AAA TO BBBADD 20.00, AB GIVING AD ON SIZE ERROR GO TO ERROR.３．SUBTRACT语句//从一数据中减去一个或几个操作数例：SUBTRACT AP FROM ADSUBTRACT 20.00, AP FROM AO GIVING MM ON SIZE ERROR GO TO ERROR.４．COMPUTE(+、-、*、/)语句//算术表达式例：COMPUTE TAX = A1 * A2 + B3５．DISPLAY语句//将数据写入输出设备例：DISPLAY “XXXXX”逻辑语句１．IF语句// IF语句测试一个条件并根据条件值执行两种语句系列之一IF 条件判断执行语句ELSE执行语句END-IF例：IF FLG-END = FLG-OFFPERFORM 5000-PROC-DETAILADD CON-1 TO CTR-SYORIELSEIF CTR-SYORI NOT = ZEROPERFORM 5100-PROC-LASTEND-IFEND-IF.２．EVALUATE语句// EVALUATE语句根据一列表大式的值，从一大组语句中选择一组要执行的语句EVALUATE 条件判断WHEN 条件值执行语句WHEN 条件值执行语句WHEN OTHER执行语句END-EVALUATE例：EVALUATE SQLCODEWHEN CNST-SQL-NORMCONTINUEWHEN OTHERMOVE CON-SQL-OPEN TO PRM2-ACA903-02MOVE CON-TBL-A025 TO PRM2-ACA903-01PERFORM 7500-DB-ABENDEND-EVALUATE.４．PERFORM语句//PERFORM语句使控制传递到另一个过程，并执行后返回A．PERFORM节名称例：PERFORM 4020-EDIT-FIRST.B．PERFORM 节名称次数TIMES例：PERFROM EDIT-FIRST 10 TIMES.C．PERFORM 节名称UNTIL 条件判断例：PERFORM UNTIL FLG-END = FLG-ONPERFORM 2000-MAINEND-PERFORM.D．PERFORM 节名称TEST BEFORE(AFTER) VARYING 计数器FROM 1 BY 1 UNTIL 计数器> 计数例：PERFORM WRITE-FIRST TEST BEFORE VARYING AA1 FROM 1 BY 1 UNTIL AA1 > 10控制语句１．GOTO语句//GOTO语句将控制转入过程部中的另一个位置GOTO标示例：LB-EX.………………GOTO LB-EX.２．CONTINUE语句// CONTINUE语句什麽也不干，只是一个语句占位符３．STOP语句//STOP语句结束程序或暂停程序直到操作员将其重新启动４．EXIT语句//EXIT语句什麽也不干，作为段中唯一的语句，提供程序中插入段名的位置第六章逻辑处理子程序１．子程序类型：外部子程序、内部子程序２．作用区域：包容、并行(COMMON)３．参数区定义：数据部的数据节Ａ．数据部：WORKING-STORAGE SETION４．程序调用：PERFORM、CAL ．．．．．．USING ．．．．．．表格操作１．表格类型：固定长度、可变长度２．表格定义：数据部的数据节Ａ．数据部：OCCURS、ASCENDING、DESCENDINGＢ．表格操作：SET、SEARCH、PERFORM．．．．．．VARIES文件访问１．文件类型：顺序、关系、索引２．信息定义：环境部的文件节、数据部的文件节Ａ．环境部：INPUT-OUTPUT SECTION(FILE-CONTROL、I-O-CONTROL) Ｂ．数据部：FILE SECTION(FD)３．文件操作：过程部的文件节Ａ．OPEN、CLOSEＢ．READ、WRITE数据库访问１．DB类型：DB2、ORACLE、SQL SERVER２．缓冲区定义：数据部的数据库节Ａ．数据部：WORKING-STORAGE SETION３．数据操作：过程部的数据库节Ａ．EXEC SQL ．．．．．．END-EXECＢ．OPEN、CLOSE、SELECT．．．。

/index.htmlCOBOL 教程- -Tag：COBOL教程目录CHAPTER 1 COBOL 概述CHAPTER 2 过程部初步CHAPTER 3 标识部和环境部CHAPTER 4 数据部之一CHAPTER 5 过程部之二CHAPTER 6 过程部之三CHAPTER 7 各部之间的关系及程序举例CHAPTER 8 联机及批量程序的一些差异CHAPTER 9 COBOL 编程规范CHAPTER 1 COBOL 概述COBOL 是Common Business Oriented Language 的缩写。

它不仅是商业数据处理的理想语言，而且广泛用于数据管理领域，因此COBOL 语言也被称为“用于管理的语言”。

一。

COBOL 语言的特点最适于数据处理领域：算数计算量少而逻辑处理量多，输入输出量大，数据间存在着一定的逻辑关系，大量的分类排序；COBOL比较接近英语，容易懂；通用性强，易移植, COBOL结构严谨，层次分明。

二。

COBOL的组成部分：1。

标识部（IDENTIFICATION DIVISION）：用于标识程序名。

2。

环境部（ENVIRONMENT DIVISION）：用于说明程序运行的环境。

3。

数据部（DATA DIVISION）：用于说明程序中涉及的所有数据。

4。

过程部（PROCEDURE DIVISION）：是程序的核心部分，它决定计算机应进行什么操作。

三。

最简单的COBOL 程序举例：COL 1 ---6 7 8 12---72 73---80IDENTIFICATION DIVISION。

PROGRAM-ID。

PSAMPLE1。

ENVIRONMENT DIVISION。

DATA DIVISION。

PROCEURE DIVISION。

DISPLAY …THIS IS A COBOL PROGRAM.‟STOP RUN。

四。

COBOL 源程序的书写格式：第1 至6 列为“标号区”。