01-Cobol-基础知识讲义

合集下载

《COB基本教程》课件

《COB基本教程》课件

COB程序的错误处理与异常情 况
探讨如何处理COBOL程序中的错误和异常情况,保证程序的正确性和稳定性。
COB程序的优化与性能提升
提供COBOL程序优化的基本原则和方法,以及如何优化程序性能以提高执行 效率。
COB与其他编程语言的比较
对比COBOL与其他编程语言,如Java、C++等,分析它们在不同领域的应用和 优势。
COB程序的控制结构
讲解COBOL中的控制结构,如条件语句、循环语句和分支语句等,以及它们在程序中的使用方法。
COB文件处理与数据存储
介绍COBOL中文件处理的基本概念和技术,包括文件读写、文件组织和数据 存储。
COB程序的调试与运行环境
指导如何调试COBOL程序,并提供了与COBOL程序运行相关的开发环境和工具。
COB程序的多人协作与版本管 理
指导多人协作开发COBOL程序的方法和技巧,以及版本管理工具的使用。
COB编程的未来发展趋势
展望COBOL编程的未来发展趋势,包括新技术的应用和COBOL语言的改进。
探索COBOL语言的特点,包括其面向业务的设计思想、可读性和可维护性。
COB程序开发基本流程
详细介绍COBOL程序的开发流程,包括需求分析、程序设计、编码、调试和 测试等环节。
COB程序的数据类型和变量声 明
解释COBOL中常用的数据类型及其在程序中的声明和使用方法。
COB常用内置函数与语句
介绍COBOL常用的内置函数和语句,如字符串处理、数学运算和逻辑控制等。
COB在企业信息系统中的应用
展示COBOL在企业信息系统开发中的广泛应用,如银行系统、保险系统和物流系统等。
COB程序的维护和更新
介绍COBOL程序的维护和更新方法,包括版本控制、修复Bug和升级功能等。

cobol教程

cobol教程

cobol教程COBOL教程COBOL(Common Business-Oriented Language)是一种面向商业应用的编程语言,它主要用于处理大型企业的数据处理和事务处理。

本教程旨在帮助初学者了解和学习COBOL的基本概念和语法规则,从而能够编写简单的COBOL程序。

1. 基本语法COBOL程序由一系列的“句子”组成,每个句子以句点(.)结束。

句子由一系列的“词”组成,每个词由一个或多个字符组成。

COBOL对大小写敏感,因此要注意单词的大小写。

2. 数据定义在COBOL中,需要先定义要处理的数据。

可以使用“DATA DIVISION”来定义数据项及其属性。

数据项可以是数字、字符或日期等类型。

例如,可以定义一个名为“EMPLOYEE-ID”的变量来存储员工的唯一标识。

3. 过程部分过程部分是COBOL程序的核心,用于执行实际的业务逻辑。

可以使用各种控制结构(如IF语句和PERFORM循环)来实现条件判断和循环操作。

通过使用一系列的“句子”来描述要执行的操作。

4. 文件处理COBOL可以处理各种类型的文件,如顺序文件和索引文件。

可以使用“FILE SECTION”来定义文件及其属性,然后使用相关的文件处理语句来读取和写入文件。

5. 运行和调试COBOL程序可以通过COBOL编译器进行编译,并通过COBOL运行时系统来执行。

可以在运行过程中进行调试,以便找出程序中的错误并进行修复。

总结本教程提供了COBOL的基本概念和语法规则的介绍,以及一些常用的编程技巧和注意事项。

希望通过学习本教程,您能够对COBOL有一个初步的了解,并能够编写简单的COBOL程序。

mf培训课件——cobol

mf培训课件——cobol
其它: 如:SYSTEM-NAME,DBCS字符
ppt课件
7
CHAPTER 1 COBOL概述
六。常量 COBOL 常量分为数值常量(如 100,-29),非数值常量(如 ‘ABC’ )和表 意常量(如 ZERO,SPACE,HIGH-VALUE,LOW-VALUE ,QUOTE ,ALL 常量)。
二。COBOL的组成部分: 1。标识部(IDENTIFICATION DIVISION):用于标识程序名。 2。环境部(ENVIRONMENT DIVISION):用于说明程序运行的环境。 3。数据部(DATA DIVISION):用于说明程序中涉及的所有数据。 4。过程部(PROCEDURE DIVISION):是程序的核心部分,它决定计算机应 进行什么操作。
01 和 77级变量定义;
文件描述符FD等应从A区开始写。
4
列12∽72: B区(B AREA)
下面的程序语句必须从B区开始写:
Entries, sentences, statements, clauses , Continuation lines.
5
列73∽80:行注释区
ppt课件
6
CHAPTER 1 COBOL概述
ENVIRONMENT
DIVISION。
DATA
DIVISION。
PROCEURE DIVISION。
DISPLAY ‘HELLO WORLD!’
STOP RUN。
73---80
ppt课件
5
CHAPTER 1 COBOL概述
四。COBOL 源程序的书写格式
1
列 1 ∽ 6 :标识区(SEQUENCE NUMBER AREA)
ppt课件

cobol基本语法教学内容

cobol基本语法教学内容

c o b o l基本语法基本語法一、COBOL基本語法一、cobol的书写格式(每行)1、前6列为序号区(一般不编辑)2、第7列为标示列,仅可以写如下几个标示符。

a. “*”注释符(注释当前行的代码)b “-“字符串连接符3、第8列---11列为A区,包括以下内容。

a 部、节名。

b 层号014、第12列---72列为B区,过程部的程序必须写在B区中。

5、第72以后部分不能编辑。

二、cobol的语法结构 (几大部分)1、标示部(IDENTIFICATION DIVISION):提供程序的一般性文档说明。

2、环境部(ENVIRONMENT DIVISION): 提供程序外部有关的项目。

a.配置节(CONFIGURATION SECTION)①.指定源计算机(SOURCE-COMPUTE).②.目标计算机(OBJECT-COMPUTE).b. 输入输出节(INPUT-OUTPUT SECTION).文件的物理路径的定义。

方法二:(过程部中动态指定文件)SELECT FILE-LOG ASSIGN TO SELECT-FILEORGANIZATION IS LINE SEQUENTIAL.在数据部定义字符串变量SELECT-FILE,在文件FILE-LOG打开前动态指定文件路径。

3、数据部(DATA DIVISION)。

程序中的变量都在数据部中定义,Cobol中没有全局变量和局部之分。

(变量的类型结构参照5.变量类型)a. 文件节(FILE SECTION)给环境部定义的文件指定一个RECORD变量,读写文件用:FD FILE-LOG.01 RECORD-LOG PIC X(2000).b. 工作存储节定义程序中用到的临时变量。

a) COBOL变量定义需要加层号(表示层次关系),·层号从01开始如: 01 I PIC X(10).·组合项如: 01 WORK-AREA.05 NUM-1 PIC 9(09).05 STR-1 PIC X(10).b) 层号依次排列顺序为:01 ,05,10,15,20,30 ·······c.连接节子程序的参数的定义。

COBOL学习基础教程 01

COBOL学习基础教程 01

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商业应用编程课件

Cobol商业应用编程课件

Cobol商业应用编程课件一、概述商业应用编程是指利用计算机技术为企业提供解决方案、提升效率以及增加价值的过程。

Cobol是一种广泛应用于商业领域的编程语言,本课件将介绍Cobol商业应用编程的基本知识和技巧。

二、Cobol简介Cobol(Common Business-Oriented Language)是一种为解决商业应用而设计的编程语言。

它于1959年发布,目前已成为业界公认的商业应用编程标准。

Cobol具有易读易写的特点,适用于大规模数据处理、事务处理以及企业级应用开发。

三、Cobol商业应用开发环境搭建1. 安装Cobol编译器:在开始Cobol商业应用编程之前,需要先安装Cobol编译器,比如Micro Focus Cobol。

按照安装向导进行安装,并设置相关环境变量。

2. 配置开发环境:打开集成开发环境(IDE),创建Cobol项目,并进行相关配置,如设置编译选项、引入必要的库文件等。

四、Cobol基本语法1. 数据定义:Cobol使用“PIC”来定义变量的数据类型和长度,例如“PIC X(10)”表示一个长度为10的字符变量。

2. 过程语句:Cobol使用英语类似的句子结构来表达程序逻辑,例如“IF condition THEN ... ELSE ... END-IF”。

3. 文件处理:Cobol提供了丰富的文件处理功能,可以读取和写入各种类型的文件,如顺序文件、索引文件等。

五、Cobol商业应用编程技巧1. 数据处理:在商业应用开发中,数据处理是核心任务。

合理设计数据结构,使用适当的数据类型和命名规范,能够提高程序的可读性和可维护性。

2. 事务处理:商业应用通常需要处理大量的事务,例如银行交易、订单处理等。

Cobol提供了事务处理机制,包括事务提交、回滚等,保证数据的完整性和一致性。

3. 错误处理:商业应用必须能够处理各种错误情况,如数据输入错误、文件读写错误等。

使用Cobol提供的错误处理机制,可以捕获并处理这些错误,保证程序的健壮性。

COBOL基础知识

COBOLChapter 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 ---678 12---7273---80IDENTIFICATION DIVISION。

PROGRAM-ID。

PSAMPLE1。

ENVIRONMENT DIVISION。

DATA DIVISION。

PROCEURE DIVISION。

DISPLAY ‘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不仅是商业数据处理的理想语言,而且广泛应用于数据管理领域,因此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 知识点集锦(上)

COBOL知识点集锦(上)cobol知识点集锦COBOL数据类型计息是银行的一项重要业务,包括日常代理客户收、付计算客户利息和年度计息等。

目前,这些工作大多数是在IBM ES9000主机的SAFE应用系统平台上进行,该系统联机程序和联机计息程序是用IBM370汇编语言实现的。

为方便汇编语言读写,在VSAM文件存储的数据中,数据存放格式进行了特殊的定义。

如日期存放采用X(3)型,01年03月15日,存入EBCD 码为X‘010315’。

在进行年度计息时,为了实现各种复杂的运算工作,一般采用COBOL语言来实现各种运算。

而采用COBOL语言读取X(3)型数据时,读出的是字符型数据,不能直接进行运算,必须转换为COBOL数据类型的数据后才能进行相应处理。

如刚才的X‘010315’,需要转换为内部十进制数据X‘0010315C’。

本文介绍一种用COBOL语言实现字符型X(3)与内部十进制数据相互转换的方法。

由X(3)型转换为内部十进制由于日期数据总是大于零,在COBOL语言的工作单元节定义变量DATE-FIRST后,再追加定义COBOL语言的最小数据单元X‘000C’,即十进制12。

由于重定义DATE-CASE为DATE -CHANGE后,DATE-CHANGE是原日期数据的1000倍,于是要在过程部将DATE-CHANGE除以1000。

首先,在COBOL程序WORKING-STORAGE SECTION.中定义如下内容:WORKING-STORAGE SECTION.01DATE-CASE.02DATE-FIRST PIC X(3).02DATE-SIGN PIC9(4)COMP VALUE12.;定点二进制数01DATE-CHANGE REDEFINES DATE-CASE PIC9(9)COMP-3.;内部十进制数据01DATE-HEX PIC X(3).;转换前数据01DATE-DEC PIC S9(7)COMP-3.;转换后数据然后,在过程部PROCEDURE DEVISION.中加入如下语句:PROCEDURE DEVISION.MOVE DATE-HEX TO DATE-FIRST.COMPUTE DATE-CHANGE=DATE-CHANGE/1000.MOVE DATE-CHANGE TO DATE-DEC.由内部十进制转换为X(3)型在进行相反的转换时,要消除因COBOL语言数据类型标志“C”引起的原日期数据前多加的一个0,所以需要将转换数据乘以10,再取出前6位数据即可。

1-COBOL简介


123456
72 73 80 (标识部) (程序名) (环境部) (数据部) (过程部)
DISPLAY ‘HELLO,COBOL!’ STOP RUN.
COBOL程序的书写格式
ANSI格式 标准COBOL程序每行80列,被分为五个区域 第1-6列为 “标号区” ▪标号是6位数字,应从小到大,但不一定连续 ▪标号只是方便查阅程序,可以省略 第7列为 “注释标志区” , “续行区” ▪使用 “*” 表示本行是注释 ▪使用 “-” 表示本行是紧接在上一行后面 续行第12列用单引号,续行内容接着书写
创建运行JCL
运行LOAD数据集中指定的可执行模块HELLO
查看运行结果
在H队列中可以查看运行结果
第三节 简单COBOL样本程序
例1: 了解COBOL程序的基本结构 例2: 变量定义,赋值,运算及输出
29
了解COBOL程序的基本结构
变量定义,赋值,运算及输出
The system flowchart for a COBOL compilelink-and-go procedure
Figure 17-01
编译链接COBOL程序的标准JCL
***************************** Top of Data *********************************** //UTE21A JOB ,'LU KUN',CLASS=A, // MSGCLASS=X,MSGLEVEL=(1,1), // NOTIFY=&SYSUID //JOBPROC JCLLIB ORDER=IGY330.SIGYPROC //*JCLLIB一般不用指定,默认从系统库中找,如SYS1.PROCLIB, ADCD.ZOSV1R5.PROCLIB //STEP1 EXEC IGYWCLG //COBOL.SYSIN DD DSN=UTE21.COBOL.SOURCE(COB1),DISP=SHR //*Source program input for the COBOL compiler. //*COBOL.SYSLIB DD DSN=UTE21.COBOL.COPYLIB,DISP=SHR //*The copy library or libraries. //*--------------------------------------------------------------------* //LKED.SYSLMOD DD DSN=UTE21.COBOL.LOAD(COB1),DISP=SHR //*LOAD Module output //*LKED.SYSLIB DD //* DD DSN=UTE21.COBOL.OBJLIB,DISP=SHR //*the SYSLIB statement concatenates a user library with the library that’s provided by the IBM //*procedure because the COBOL program uses object modules from both libraries
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

第一章关于COBOL的初步知识一. COBOL语言的特点COBOL是Common Business-Oriented Language(公用面向商业的语言)的缩写,主要供数据处理、数据收集及分析之用。

COBOL自60年代初开始广泛应用于计算机应用领域(商业和其他领域)。

事实上,除了商业之外,各种管理工作都广泛使用COBOL,如各种统计工作,财会工作,企业计划编制,作业制度,情报检索,人事管理等。

COBOL针对商业世界的使用,是真正商用应用程序开发的首选语言。

.1适于数据处理领域。

.2采用英语语法的高级语言,可读性、可维护性、可移植性较强。

3.通用性强,标准化程度较高。

.4结构严谨,层次分明。

.5缺点是比较繁琐。

.最简单的COBOL程序介绍二例1:IDENTIFICATION DIVISION.(标识部)PROGRAM-ID. EXAM1.(程序标识段)ENVIRONMENT DIVISION.(设备部)DATA DIVISION.(数据部)PROCEDURE DIVISION.(过程部)A. DISPLAY ‘THIS IS A COBOL PROGRAM.’.STOP RUN.例2:IDENTIFICATION DIVISION.(标识部)PROGRAM-ID. EXAM2.(程序标识段)ENVIRONMENT DIVISION.(设备部)DATA DIVISION.(数据部)WORKING-STORAGE SECTION.(工作单元节)77 A PICTURE IS 9(3).(对A进行描述)77 B PICTURE IS 9(3).(对B进行描述)PROCEDURE DIVISION.(过程部)S. ACCEPT A.(输入A值)ACCEPT B.(输入B值)ADD A TO B.(A+B->B)DISPLAY A,B.(显示A和B值)STOP RUN.三.COBOL程序的结构1.部每个程序都包括四个部:IDENTIFICATION DIVISION(标识部)提供程序的一般性文档说明,主要用来指定源程序名。

ENVIRONMENT DIVISION(环境部)列出程序中所用到的文件。

程序中不需要外部文件时,环境部为空,也可以省略部标题。

DATA DIVISION(数据部)程序中所用到的全部数据(包括:文件数据—-用于输入输出、静态数据、参数等)都应在数据部中说明它们的类型和所占内存的情况。

PROCEDURE DIVISION(过程部)包含构成程序的过程性语句,用来给出程序要执行的指令,使计算机产生相应的操作。

2.节和段标识部下只有各个段。

除标识部以外,每个部下可以有若干个节(SECTION),每个节以“节头”作标识。

每个节下又可包括若干段(PARAGRAPH),每个段用“段名”标识。

各个段内有各种COBOL元素。

3.句子,语句和子句在过程部中,每一段由若干个句子(Sentence)组成。

一个句子是以英文句号来结束的。

句子又由语句(Statement)组成。

一个语句中又可以包含若干个子句(Clause)。

注意:部标题、节标题、段名、数据项目描述及句子后必须用英文句号结束,否则程序无法编译。

4.描述体(描述款目)在数据部中有若干个节,每个节中有若干个描述体,每个描述体又有若干个子句构成。

四.源程序的书写格式1.1~6列,为“序号区”,为6位整数序号,不是程序本身的内容。

序号不是必须的,但其所占区域要保留。

2.第7列,为“指示符区(续行标志区)”。

连接符“-”表示本行是紧接在上一行的后面。

“*”或“/”表示本行为注释行。

“D”表示本行为调试行。

3.8~11列,为“A区”,部头,节头,段头,层号01,层号77以及文件描述符FD,程序结束标题等应从A区开始书写,但不一定从第8列开始写。

4.12~72列(现在有时厂家规定可到80列),为“B”区,过程部中的句子只能从B区开始书写。

5.73~80列,为“注释区”。

在写程序时,应注意以下几点:1.大写或小写字母均可,习惯用大写字母。

2.相邻的两个字之间必须留一个以上的空格。

3.运算符和等号左右两边必须各留一个空格。

4.逗号,句号,分号的左边不能留空格,而右边应有空格。

五.COBOL字符和COBOL单字COBOL字符集包括以下字符:0~9, a~z, A~Z, + - * / = , . ; ’ ” ( ) < > $空格:COBOL单字分三种:保留字、用户自定义字及系统名称。

COBOL单字的规则如下:1.字长为1~30个字符之间。

2.只能由字母,数字和连字符“-”组成,第一个和最后一个字符不能用连字符。

3.字中不能出现空格。

4.小写字母与大写字母等价。

5.不能用保留字作为用户定义字和系统名称,但用户定义字和系统名称可以用同一个单词。

用户自定义字:文件、数据、标号、程序等所取的名称。

系统名称:COBOL保留字,用于与操作环境通信,又COBOL厂家定义。

分为:Computer name、Implementers name、Language name。

保留字:有300多个。

如:+、ACCEPT、ADD、BEFORE、DATA。

六.常量1.数值常量(数字直接数)例: 123, +45.67, -89.652.非数值常量(非数字直接数):字符串内的引号用两个连续引号表示。

例:’abcd’, ’Expired’,3.象征常量:用保留字表示某些常用常量(直接数)。

例:ZERO ZEROS ZEROESSPACE SPACESHIGH-VALUE HIGH-VALUESLOW-VALUE LOW-VALUESQUOTE QUOTESALL 常量七. COBOL处理数据的特点:层次的概念;记录和文件的概念。

八.程序文本的复制与替换操作1.COPY语句COPY语句用COBOL源文本text-name替换从COPY字开始到终止句号之前的内容。

2.REPLACE语句REPLACE语句将COBOL源程序某个段中的文本进行替换。

替换从REPLACE语句的第一个格式开始,到REPLACE OFF 语句结束。

第二章标识部和环境部一.标识部(IDENTIFICATION DIVISION)(一)必写部分IDENTIFICATION DIVISION.PROGRAM-ID. 程序名.(二)任选部分一般格式:[AUTHOR. 作者姓名][INSTALLATION. 设计这个程序的公司或部门。

][DATE-WRITTEN. 编写日期,可记入修订史,修改日期、原因及人员。

][DATE-COMPILED. 编译日期][SECURITY. 保密程度的描述。

]注:标识部中的段标题只能按部描述中指定的顺序出现。

3.环境部(ENVIRONMENT DIVISION)环境部指定程序中与特定计算机或操作系统相关的方面,指明用到哪些设备,哪些文件,将程序中用到的内部文件名与外部文件(或外部设备)联系起来。

如果程序不需要任何环境部提供的项目,则可以省略环境部。

一般格式:ENVIRONMENT DIVISION.CONFIGURATION SECTION. 配置节SOURCE-COMPUTER.OBJECT-COMPUTER.SPECIAL-NAMES.INPUT-OUTPUT SECTION. 输入/输出节.I-O-CONTROL.1.配置节包括SOURCE-COMPUTER, OBJECT-COMPUTER和SPECIAL-NAMES(专用名段)。

SOURCE-COMPUTER段标识编译程序的计算机。

若该段省略,则编译程序的计算机是源计算机。

如果指定WITH DEBUGGING MODE 从句,则编译所有源调试行,否则把调试行作为说明语句。

OBJECT-COMPUTER段标识编译程序运行的计算机。

SPECIAL-NAMES段用于把系统中原规定的一些设备名或功能名或符号改为用户自己指定的名字或符号。

SPECIAL-NAMES.CLASS REAL-NUMBER IS "0123456789+-."----可用于类条件测试DECIMAL-POINT IS COMMA. -----逗号用作小数点,句号用作编辑符CURRENCY SIGN IS “Y”. -----表示货币符号的字符,DEFAULT$ 2.输入输出节输入输出节只用于文件,它把内部文件与外部文件(包括外部设备)联系起来。

它有两个段:文件控制段:段是给文件命名,指出存放该文件的外部设备及其他有关文件控制信息。

对每个文件包含一个项目。

.SELECT FILE-1 ASSIGN TO “T”.SELECT FILE-2 ASSIGN TO DISK.SELECT FILE-3 ASSIGN TO PRINTER.输入输出控制段:I-O-CONTROL段包含定义程序返回点,不同文件共享的内存区和多文件卷中文件位置的项目。

第三章数据部一数据部的节.数据部包含程序引用的所有数据的定义,如文件记录、变量、表格和报表。

COBOL将数据部分成节,每个节是可选的,但程序中的节应按指定顺序定义。

DATA DIVISION.FILE SECTION. 文件节WORKING-STORAGE SECTION. 工作存储节LINKAGE SECTION . 连接节COMMUNICATION SECTION. 通信节REPORT SECTION. 报表节1.文件节程序中每一个输入或输出文件都要在文件节中定义。

包括:(1)文件名和文件属性。

(2)文件中包括的记录名。

(3)每个记录中数据的层次关系。

(4)记录中各数据项的数据形式和占内存的大小。

DATA DIVISION. (数据部)FILE SECTION. (文件节)FD FILE-1. (文件名)LABEL RECORD IS OMITTEDDATA RECORD IS STUDENT-SCORE.01 STUDENT-SCORE. (记录名)03 NAME PIC X(10).03 NUM PIC 9(06).03CORUSE-SCORE.05 CORUSE-1 PIC 9(03).05 CORUSE-2 PIC 9(03).05 CORUSE-3 PIC 9(03).2.工作存储节包含程序所需的临时结果和初始化静态数据的数据定义。

WORKING-STORAGE SECTION.77 X PIC S99 VALUE -21.01 A PIC 9(08).01 B.03 B1 PIC X(04).03 B2 PIC X(02).03 B3 PIC X(02).3.连接节本节只用于子程序,包含调用程序传递的数据(即参数)。

LINKAGE SECTION.01 LCMIN.COPY RCI001.01 LCMOT.COPY RCJ001.4.通信节通信节描述作为程序间接口的数据和消息控制系统,用以实现与通信设备相关的消息分析的COBOL方法。

相关文档
最新文档