COBOL培训教程
- 格式:doc
- 大小:214.00 KB
- 文档页数:17
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程序。
COB培训教程COB培训教程是一种学习COB编程语言的课程教程。
对于那些想要学习COB编程语言的人来说,这个教程提供了许多有用的信息。
如果你想学习COB编程语言,那么这篇文章会介绍一些必须知道的知识。
COB培训教程基础COBOL全称是COmmon Business Oriented Language,是一种应用比较广泛的商业编程语言,被广泛应用于银行、保险、证券等行业。
COBOL已经出现了很多年,但它仍然是一种用于业务领域的编程语言。
COBOL语言的主要功能是处理文件和数据。
由于其简单易懂的语法和大量的库函数,还有大量的工具和支持,使得COBOL变得尤为重要。
作为一个普遍使用的编程语言,COBOL已经被广泛应用。
COBOL编程语言使用严密的语法规则和代码组织来定义和运行商业应用程序。
COBOL编程语言具有相对较高的可读性和可维护性,这使得它成为了电脑系统的一部分。
COBOL的学习在学习COBOL编程语言时,首先需要对编程的基础有一定的了解。
通常情况下,学习COBOL的最佳方式是了解COBOL的语法规则和数据结构。
对于COBOL学习者来说,需要学习以下内容:1. COBOL编程语言的概述和发展历程2. COBOL中的基本数据类型和数据结构3. 构建COBOL程序的关键元素4. COBOL语句和控制结构5. 使用COBOL编写程序的基本规则和方法除了这些基本的知识,还需要了解一些高级的概念和技术。
这些概念和技术包括:1. COBOL中的高级数据类型和数据结构2. 高级算法和逻辑技巧3. 多线程、容错和扩展性4. 优化COBOL代码的技巧5. 是COBOL与其他编程语言的相互协作COBOL培训教程的优点COBOL培训教程的一大优点是它提供了手把手的学习方法。
通过教师的指导,学生可以快速掌握COBOL编程语言的基础知识和高级概念。
另外,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培训教程-11COBOL是一种过程型编程语言,最初由美国联邦政府财政部和IBM公司共同开发,主要应用于商业和金融领域。
随着计算机技术的不断发展和商业需求的变化,COBOL确立了其在企业信息系统中的重要地位。
而为了满足企业对COBOL程序员的需求,也为有志成为COBOL开发人员的IT专业人士提供了学习机会,许多培训机构开始提供COBOL培训教程,其中包括“COBOL培训教程-11”。
一、“COBOL培训教程-11”是什么?“COBOL培训教程-11”是一个专门为COBOL初学者或想深入学习COBOL的人提供的培训教程。
本教程涵盖了COBOL的基本语法、程序结构、数据类型、数据处理、文件处理、子程序等内容,同时还涉及到企业级COBOL程序的编写和调试。
本教程注重实践操作,通过编写实际的程序来帮助学习者更好地理解和掌握COBOL编程。
二、为什么要学习COBOL?COBOL是一种非常稳定、安全、高效的编程语言,被广泛应用于金融、制造、保险、医疗等行业的业务处理和管理系统。
许多企业的信息系统至今仍在使用COBOL编写的程序,需要维护和升级。
因此,学习COBOL开发有非常广阔的就业前景。
除此之外,COBOL还有以下优点:1. 语法简单易懂,学习门槛不高。
2. 可以处理大型数据,并有效地组织和管理数据。
3. 可以与其他编程语言或工具集成,提供灵活性。
4. 可以从源代码的角度审计系统,保证信息安全。
三、“COBOL培训教程-11”的学习流程1. 熟悉COBOL开发环境学习COBOL之前,需要熟悉COBOL开发环境。
现有的主流开发环境包括微软Windows、Linux、UNIX等,还需要安装COBOL编译器和调试器等开发工具。
在学习过程中需要熟练掌握开发环境的基本使用方法。
2. 学习COBOL基本语法COBOL的基本语法包括程序结构、基本语句、数据类型、运算符等。
学习者需要熟悉这些基本语法,从而能够编写简单的COBOL程序。
COBOL简易教程COBOL简易教程主要内容1.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的初步知识◆COBOL是Common Business Oriented Language (通用商业语言,或称管理语言)的缩写◆最适用于数据处理◆比较接近于自然语言(英语)◆COBOL的结构严谨,层次性强◆COBOL的缺点是比较烦琐。
1.1 一个例子:*************************************************************** ** * * COBOL TRAINING PROGRAM * * VERSION 2.1.0 COPYRIGHT (C) 2004 * * WISTRON DALIAN SOFTWARE CO., LTD. * * ALL RIGHTS RESERVED. * * * **************************************************************** IDENTIFICATION DIVISION.PROGRAM-ID. EXERCIS6.AUTHOR. QXLU (WISTRON DALIAN).DATE-WRITTEN. 04-06-23.DATE-COMPILED. 04-06-23.*----------------------------------------------------------------* * COMMENT : * * * *----------------------------------------------------------------* ENVIRONMENT DIVISION.CONFIGURATION SECTION.SOURCE-COMPUTER. IBM-3084.OBJECT-COMPUTER. IBM-3084.INPUT-OUTPUT SECTION.FILE-CONTROL.SELECT DDI01 ASSIGN TO "DDI01".SELECT DDO01 ASSIGN TO "DDO01".*DATA DIVISION.FILE SECTION.*FD DDI01 LABEL RECORD IS STANDARD DATA RECORD ARE IN-AREA0, IN-AREA1.01 IN-AREA0.05 IN-YEAR-NUM PIC 9(2).05 IN-PRINCIPAL PIC 9(4)V99.05 FILLER PIC X(07).05 RMARK PIC X(01) VALUE X"0A".01 IN-AREA1.05 IN-INTEREST-RATE OCCURS 5 TIMES PIC V999.05 RMARK PIC X(01) VALUE X"0A".FD DDO01 BLOCK 0 RECORDS LABEL RECORD STANDARD RECORDING F.01 PRT-REC.05 FILLER PIC X(79).**====================================== =========================* WORKING-STORAGE SECTION.01 IN-FILE-DATA.05 YEAR-NUM PIC 9(2).05 PRINCIPAL PIC 9(4)V99.05 INTEREST-RATE-TABLE.15 INTEREST-RATE OCCURS 5 TIMES PIC V999.*01 HEADER0 PIC X(79) VALUE' TABLE OF SIMPLE INTEREST'.01 HEADER1 PIC X(79) VALUE' ************************************'.01 HEADER2 PIC X(79) VALUE' PRINCIPAL 4,000.00 FOR 10 PERIODS'.01 HEADER3 PIC X(79) VALUE SPACE.01 HEADER4 PIC X(79) VALUE' PERIOD INTEREST RATE'.01 HEADER5.05 OUT-I-R OCCURS 5 TIMES PIC BBBBBBBBB.999.01 DETAIL0.05 OUT-PERIOD PIC ZZZ.05 OUT-P-I-S-ITEM OCCURS 5 TIMES.10 FOURSPACES PIC X(04) VALUE SPACE.10 OUT-P-I-SUM PIC 9,999.99.01 CNT-YEAR-NUM PIC 9(2).01 I-R-INDEX PIC 9.01 P-I-SUM PIC 9(6)V99.**************************************************************** ** * P R O C E D U R E D I V I S I O N * ***************************************************************** PROCEDURE DIVISION.*INPUT-DATA SECTION.OPEN INPUT DDI01.OPEN OUTPUT DDO01.READ DDI01.MOVE IN-YEAR-NUM TO YEAR-NUM.MOVE IN-PRINCIPAL TO PRINCIPAL.READ DDI01.MOVE IN-AREA1 TO INTEREST-RATE-TABLE.*PROCESS-OUTPUT-DATA SECTION.*PRINT HEADERWRITE PRT-REC FROM HEADER0 BEFORE 1.WRITE PRT-REC FROM HEADER1 BEFORE 1.WRITE PRT-REC FROM HEADER2 BEFORE 1.WRITE PRT-REC FROM HEADER3 BEFORE 1.WRITE PRT-REC FROM HEADER4 BEFORE 1.* PRINT INTEREST RATEPERFORM TEST BEFORE VARYING I-R-INDEXFROM 1 BY 1 UNTIL I-R-INDEX > 5MOVE INTEREST-RATE( I-R-INDEX ) TO OUT-I-R( I-R-INDEX ) END-PERFORM.WRITE PRT-REC FROM HEADER5 BEFORE 1.*PROCESS & PRINT DETAILSPERFORM PRINT-DETAILVARYING CNT-YEAR-NUM FROM 1 BY 1UNTIL CNT-YEAR-NUM > YEAR-NUM.*CLOSE-FILES SECTION.CLOSE DDI01.CLOSE DDO01.*STOP RUN.**---------------------------------------------------------------* * PRINT-DETAIL **---------------------------------------------------------------* PRINT-DETAIL SECTION.*MOVE CNT-YEAR-NUM TO OUT-PERIOD.PERFORM PROCESS-DETAILVARYING I-R-INDEX FROM 1 BY 1 UNTIL I-R-INDEX > 5. WRITE PRT-REC FROM DETAIL0 BEFORE 1.*PRINT-DETAIL-RTN.EXIT.**---------------------------------------------------------------* * PROCESS-DETAIL **---------------------------------------------------------------* PROCESS-DETAIL SECTION.*COMPUTE P-I-SUM = PRINCIPAL *( INTEREST-RATE( I-R-INDEX ) * CNT-YEAR-NUM + 1 ). MOVE P-I-SUM TO OUT-P-I-SUM( I-R-INDEX ).*PROCESS-DETAIL-RTN.EXIT.** *** END OF CODING EXERCIS6 ***1.2 COBOL 程序的结构(1/p4)部(Division) 一部可包括若干节节(Section) 一节可包含若干段段(Paragraph) 一段可包含若干句子句子(Sentence) 一个句子可包含若干语句语句(Statement) 制定计算机完成一定的操作子句(Clause) 制定完成某一方面的功能每个程序应包含四个部IDENTIFICATION DIVISION (标识部)主要用来指定源程序名字,也可以写入其他用作备忘的某些信息(如日期、作者等)。
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培訓教程教程目錄如下: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 语言也被称为“用于管理的语言”。
一.C OBOL 语言的特点最适于数据处理领域:算数计算量少而逻辑处理量多,输入输出量大,数据间存在着一定的逻辑关系,大量的分类排序;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 列为“标号区”;第7列为“续行标志区”;第8至此11列,称为“A区”。
程序中有些内容如部头,节头,段头,层号01,层号77 及文件描述符FD等应从A区开始写;第12至此72列,称为“B区”。
写程序中的正文部分。
如过程部中的句子只能从B区开始写;第73至80列,称为“注释区”。
五。
COBOL字符集包括:数字0 --- 9 ,字母A--- Z ,a --- z , 专用字符:+ - * / = , . ; ‘( ) < > $ 及空格。
属于系统字符集而不属于COBOL字符集的字符只能出现在COBOL 程序中的字符串里。
六。
常量:COBOL 常量分为数值常量(如100,-29),非数值常量(如‘ABC’)和表意常量(如ZERO,SPACE,HIGH-V ALUE,LOW-VALUE ,QUOTE ,ALL 常量)。
七。
COBOL 所处理的数据的特点层次的概念:数据间存在的从属关系。
文件的概念:多个记录可以组成一个文件。
记录的概念:具有一定层次关系的一组数据项的最大集合,它是内存中具有独立逻辑含义的最大存取项,具有最高层次。
CHAPTER 2 过程部初步-----最基本的过程部语句CHAPTER 2 过程部初步-----最基本的过程部语句一。
输入输出语句。
1。
ACCEPT语句:直接从终端键盘或系统指定的输入设备上输入数据。
ACCEPT 标识符[FROM 助忆名]注:A。
标识符(identifier)指的是能唯一地标识一个数据项的数据名,不能唯一地标识一个数据项的数据名不是标识符。
标识符可以是组合项。
B。
在ACCEPT语句中如不写FROM部分,如ACCEPT A ,则表示从系统隐含指定的设备上读入一个数据给A。
如果不想从指定的设备上输入,则要用FROM 选项, 这时“助忆名”需要在环境部中事先说明和那种外部设备相联系。
如:ENVIRONMENT DIVISION。
(环境部)CONFIGRATION SECTION。
(配置节)SPECIAL-NAMES。
(专用名段)CONSOLE IS ABC如在过程部中有ACCEPT T FROM ABC。
则表示要从控制台接收数据。
2。
DISPLAY语句:从计算机内存中输出到某一指定的输出设备上。
DISPLAY { 标识符1,常量1}[标识符2,常量2]。
[UPON 助忆名](标识符和助忆名的说明同上)ACCEPT语句和DISPLAY语句不必定义文件适用于少量的数据输入输出。
3。
READ语句:COBOL语言中数据的输入输出主要是通过对外部文件的读写进行的。
READ 语句就是从外部文件上读入数据输出到程序中的数据项中。
在程序中用到的所有文件都需要在环境部中指定程序中用到的文件名与实际外部文件的联系。
数据部也要对文件加以描述。
指定数据结构各数据项所占的内存单元长度以及数据形式。
COBOL 的存取是以文件为对象以记录为单位的。
READ语句的最简单的格式为: READ 文件名ENVIRONMENT DIVISION。
INPUT-OUTPUT SECTION。
FILE-CONTROL。
SELECT IN-FILLE ASSIGN TO 外部文件名。
为了存储读入的记录,必须在内存开辟一个与文件记录长度相等的存储区,即…输入文件纪录区‟。
每一个输入文件都有相应的…输入文件纪录区‟,与之一一对应。
亦即在数据部中描述文件的数据结构。
假设IN-FILE文件每一记录中包含的内容为:产品代码,产品数量,产品单价,生产日期。
设某一记录的具体数据如下:0 0 1 0 0 1 0 0 0 0 0 1 0 0 0 1 9 9 9 0 3 2 2prodcode quantity price year mon day如果我们希望读入该记录并对各数据项进行处理,则需要在…输入纪录区‟中划分出各数据项,以便存放相应的数据。
定义输入纪录区以及划分记录区中各数据项的工作是由数据部来完成的。
下面我们简单介绍数据部定义记录区方法,针对上面输入数据的特点,我们可以在数据部中对记录区作如下描述:DA TA DIVISION。
FD IN-FILE LABLE RECORD IS STANDARD。
01 IN-RECORD。
(定义记录区名为IN-RECORD)02 PROD-CODE PIC 9(4)。
02 PROD-QUANTITY PIC 9(5)。
02 PROD-PRICE PIC 9(6)。
02 MANU-DA TE。
(生产日期为一组合项)05 DATE-CCYY PIC 9(4)。
05 DATE-MM PIC 9(2)。
05 DATE-DD PIC 9(2)。
其中,FD 即FILE DESCRIPTION,表示从该行起是…文件描述体‟。
LABLE RECORD IS STANDARD :所有的磁盘文件和磁带文件都必须写明此句。
01 层定义…输入纪录区‟ 的名字为IN-RECORD,由于01层属于FD描述体,因此也就指定了IN-RECORD 和IN-FILE 的关系。
亦即从IN-FILE 读入的数据存放在IN-RECORD记录区中。
这样,在执行一次READ语句后,文件中一个记录的数据便输入到内存记录区,按排列顺序分别送到记录区中各数据项中。
注意文件的各记录中的数据是不分数据项的,只是按一定的顺序把数据存放在各字节中。
所以数据部对记录区中各数据项的描述应该与文件的记录中各数据排列次序和长度相一致。
READ 语句的一般形式:READ 文件名RECORD [INTO 标识符] [AT END 执行语句] ,例如:READ IN-FILE INTO TEMP-RECORD AT END STOP RUN该语句除了将读到的数据传送到IN-RECORD之外,还传送到TEMP-RECORD中。
在遇到文件尾时,程序结束运行。
4。
WRITE语句:将内存中的数据输出到外部设备,主要是由WRITE 语句来完成的。
WRITE语句的最简单的格式为:WRITE 记录名(注意WRITE语句的操作对象是记录,所以是…记录名‟而不是…文件名‟)与输入文件相似输出文件也要在环境部中指定所对应的实际存在的外部文件:ENVIRONMENT DIVISION。
INPUT-OUTPUT SECTION。
FILE-CONTROL。
SELECT OUT-FILLE ASSIGN TO 打印机名。
也要在数据部中定义输出记录区:DA TA DIVISION。
FD OUT-FILE LABLE RECORD IS OMITTED。
01 OUT-RECORD。
02 PROD-CODE PIC 9(4)。
02 PROD-QUANTITY PIC 9(5)。
02 PROD-PRICE PIC 9(6)。
02 MANU-DA TE05 DATE-CCYY PIC 9(4)。
05 DATE-MM PIC 9(2)。
05 DATE-DD PIC 9(2)。
LABLE RECORD IS OMITTED :凡输出设备是打印机的都必须写明此句。
如输出设备是磁盘,则仍用LABLE RECORD IS STANDARD。
01 层定义…输出纪录区‟ 的名字为OUT-RECORD,由于01层属于FD描述体,因此也就指定了OUT-RECORD 和OUT-FILE 的关系。
在用WRITE 语句输出一个记录之前,应向输出记录区传送数据。
如已将数据传送到上述各数据项中,则在执行W RITE OUT-RECORD 语句后,则记录区中的数据通过打印机打印出来。
WRITE 语句的一般形式:标识符2 LINEBEFORE 整数 LINESWRITE 记录名[FROM 标识符1 ] AFTER ADV ANCING 助忆名PAGE5。
OPEN语句:程序中如果需要读写文件,则该文件必须先用OPEN语句打开,系统在执行READ,WRITE以前先检查该文件是否已在规定的外部设备上准备就绪。
OPEN语句的一般格式为:INPUT 文件名1 [,文件名2]。
OPEN OUTPUT 文件名3 [,文件名4]。
6。
CLOSE语句:当对一个文件的读或写的操作已完成,就应关闭该文件。
CLOSE语句的一般格式为:CLOSE 文件名 1 [,文件名2]。
COBOL通过2位长度的文件状态字(FILE-STATUS)来表示文件的操作结果是否成功,常见的文件状态值及意义:二。
算数运算语句1。
ADD语句:格式1:ADD 标识符1 ,标识符2。
TO 标识符m [,标识符n]。
常量1 ,常量2格式2:ADD 标识符1 ,标识符2 ,标识符3常量1 ,常量2 ,常量3。
GIVING 标识符m [,标识符n]。
2。
SUBTRACT语句:格式1:SUBTRACT 标识符1 ,标识符2 。
FROM 标识符m [,标识符n]。
常量1 ,常量2格式2:SUBTRACT 标识符1 ,标识符2 。