COBOL培训教程-2
cobol学习02——基本语句
cobol学习02——基本语句1.MOVE语句 是整个COBOL中最常⽤额语句。
可以实现变量的赋值，参数传递等类似功能。
可以对单个数据进⾏复制，也开业对⼀组数据进⾏复制。
a、复制单个数据 例： 01 IN-STATUS PIC X(5). --> MOVE 'READY' TO IN-STATUS. --> MOVE IN-STATUS TO OUT-STATUS. 说明：当复制的数据为数值类型时 如果⽬标数据的长度⼤于源数据项内容的长度时，则在⽬标数据项的⾼位以0进⾏填充 如果⽬标数据的长度⼩于源数据项内容的长度，对⾼位超出部分进⾏截断。
如果数值含有⼩数部分，需要作为浮点数做相应处理。
b、复制⼀组数据 通过MOVE语句对⼀组数据进⾏复制。
MOVE语句中的两个变量分别是数据组的名称。
注意点： 所复制的组内数据必须同名，不同名的数据将不被复制。
如果数据项在分组中，则分组名称也必须相同。
数据项在组内的顺序可以任意。
以FILLER命名的数据项不被复制。
2.PERFORM语句 执⾏COBOL中所编写的相应的处理过程。
过程处理相当于COBOL中的函数，PERFORM⽤于调⽤这些函数。
可通过THRU选项同时对多个处理过程进⾏执⾏。
3.ACCEPT和DISPLAY语句 可以⽅便调试。
a、ACCEPT语句接收数据 既可以接收⽤户从终端输⼊的数据，也可以接收由系统产⽣的相应数据。
接收的数据存放在 COBOL数据部中所定义的相应变量中。
4.REDEFINES语句 ⽤于同⼀块内存区域内进⾏重定义。
可以定义多个指向同⼀内存区域的变量。
01 TEST-AREA. 05 TEST-A PIC X(4). 05 TEST-B REDEFINES TEST-A.5.⽂件相关语句 ⽂件包括常规⽂件，以及VSAM⽂件。
基本操作包括⽂件的打开、关闭、⽂件读写。
a、OPEN和CLOSE语句 OPEN语句⽤于⽂件的打开操作。
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程序。
COB培训教程
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商业应用编程课件
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语言程序设计实用PPT课件
• 创建分区数据集ST×××.COBOL.SOURCE(COB××) 存放源程序
• 创建分区数据集ST×××.COBOL.LOAD 存放可执行模块 它的属性比较特殊： Record format = U Record length = 0 Block size = 6144
▪用引号括起来的字符串 如：‘ABCD’, ‘$123’, ‘HELLO WORLD’
▪由纯数字组成的非数值常量不能用于计算 ‘123’和123不同
▪可以使用保留字,如: ‘DATA’ ▪可以写入引号,如:
MOVE QUOTE ‘HENRY’ QUOTE TO NAME
第18页/共22页
§1.9 常量 （三）
第15页/共22页
§1.8 数据名 • 数据名相当于其他语言的变量名，代表一个具体的数据项 • 数据名长度为1－30个字符 • 只能由字母(至少一个)，数字和连字符“-”组成，连字符不能出现在两端，
不能包含空格 • 不应用保留字作为数据名
123, DECO.HENRY, OWEN-, 3R, DIVISION • 尽量使用有意义的英文字或拼音，如：NAME, AGE，GONGZI • 建议：多使用连字符，如:DEPTART-NUMBER
第14页/共22页
§1.7 COBOL字符和COBOL字 • COBOL字符是指在程序中允许出现的字符
包括数字，大小写字母及15个专用符号 +,-,*,/,=,逗号,句号,分号,引号, $,(,),<,>,空格
• COBOL字是由上述字符组成的最小单位 分为 保留字: 在COBOL已经规定专门用途的字 用户字: 用户自定义的名字 如:程序名，文件名，节名，段名，数据项名等
2--COBOL程序结构
INPUT-OUTPUT SECTION
• •
都是可选的，当使用外部文件时必写输入输出节
配置节
配置节包含三个段
SOURCE-COMPUTER. computer-name.
标识对该COBOL程序进行编译的计算机
OBJECT-COMPUTER. computer-name.
标识运行该COBOL程序的计算机
数据项的大小的定义
字段大小的定义方式： 通过在PICTURE中A，X，9的数目来指定： 01 Cust-Rec-In.
05 05 Cust-ID-In Picture XXXX. Amt-In Picture 99999.
用A, X or 9后面括号中的数值指定 01 Cust-Rec-In.
05 05 Cust-ID-In Picture X(4). Amt-In Picture 9(5).
PICTURE(PIC)子句
指定数据的类型 指定数据的大小
数据项类型
字母型（Alphabetic）
Only letters or blanks For name, item description, etc.
数值型（Numeric）
Only digits For fields used in arithmetic operations
-IN and -OUT for fields (Emp-Salary-IN and Emp-Salary-OUT) -FILE and -RECORD for file and record names (Emp-File and EmpRecord)
下面哪些是合法的数据名
1. 2. 3. 4. 5. 6. Date-Of-Birth Amount$Out Section –First-Name 98-6 Time out
cobol课件大型机基本操作
对文件进行读取和写入操作。
打开文件
使用适当的命令或函数打开已存在的文件。
关闭文件
完成文件操作后，使用命令或函数关闭文件。
数据传
对数据进行格式转换以满 足特定需求。
将数据从大型机导出到外 部目的地。
将数据从外部源导入到大 型机中。
数据导入
数据导出
数据转换
程序执行与调试
编译程序
01
将源代码编译成可执行程序。
解决方案
使用编译器提供的错误信息，定位问题所在，并 逐一修正。
数据处理错误
总结词
数据处理错误通常是由于数据类 型不匹配、数据范围超出限制或 数据操作不当引起的。
详细描述
检查数据类型是否匹配，数据范 围是否在允许的范围内，以及数 据操作是否正确。
解决方案
根据数据类型和范围要求，对数 据进行适当的转换和验证，确保 数据操作的正确性。
执行程序
02
运行编译后的程序并查看输出结果。
调试程序
03
使用调试工具检查程序中的错误并进行修复。
04 常见问题与解决方案
程序编译错误
1 2 3
总结词
编译错误通常是由于语法错误、拼写错误或结构 问题引起的。
详细描述
检查代码中的拼写错误、语法错误和结构问题， 确保所有语句都符合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程序设计—2
1、文件控制段（FILE-CONTROL） 2、输入输出控制段（I-O-CONTROL）
Input-output section identifiers devices and files used by program. I-O-Control defines files on device.现在一般都不用. File-Control relates system file names with devices files named in the select statement.
COBOL语言程序设计
第二章 标识部和环境部
2.1 标识部IDENTIFICATION DIVISION.
标识部是COBOL程序的第一部分，是不可缺 少的。所有COBOL程序（主程序、子程序） 都必须有一个名字，而名字是在标识部定义。 标识部还可以填入编写程序日期、作者等其 他信息。 主程序 – Main Program 子程序 - Subprogram
(二)源计算机段和目标计算机段的一般格式
（三）专用名段：
专用名段用来通知系统把系统中原规定的一些设 备名或功能名或将符号改为用户自己指定的名字 或符号。 欧洲人习惯用逗号标识小数点： DECIMAL-POINT IS COMMA. 货币符号变动 CURRENCY SIGN IS ‘Y’
3、输入输出节（INPUT-OUTPUT SECTION） (一)、输入输出节主要作用是把程序中的内部文件和 外部文件（主机中的数据集）联系起来。包含以下两 个段：
2、微机系统中，可以在ASSIGN TO的后面直接接上实际的 文件名： INPUT-OUTPUT SECTION. FILE-CONTROL. SELECT F1 ASSIGN TO 'D:\COBOL_S\A.TXT'. DATA DIVISION. FILE SECTION. FD F1 LABEL RECORD IS STANDARD. 01 REC. 02 A1 PIC 9(6). 02 A2 PIC 9(3). 02 NAME PIC X(32). 其他方式等参阅实际系统的相关手册
COBOL程序设计语言入门教程
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程序的设计方法和常用技巧，包括文件处理、条件语句、循环结构以及子程序的使用。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
COBOL培训教程 COBOL培训教程 （二）
讲师： 讲师：李金鹏
四部之一 —标识部 标识部
标识部
• COBOL源程序的第一部分是标识部。他 COBOL源程序的第一部分是标识部 源程序的第一部分是标识部。 是程序中不可缺少的部分。 是程序中不可缺少的部分。标识部的 作用是标识一个COBOL源程序， COBOL源程序 作用是标识一个COBOL源程序，即为程 序加上标志，以便识别。 序加上标志，以便识别。 • 标识部可以分为必写的部分和可选的 部分。 部分。
SPECIAL-NAMES. 专用名描述项. [DECIMAL-POINT IS COMMA.] [CURRENCY SIGN IS 非数值常量.] [专用名 IS 助忆名.]
输入输出节
• 文件控制段的一般格式： 文件控制段的一般格式：
FILE-CONTROL. SELECT 文件名 ASSIGN TO 外部文件名.
标识部的一般格式
• 标识部的必写部分
IDENTIFICATION DIVISION. PROGRAM-ID. AUTHOR. INSTALLATION DATE-WRITTEN DATE-COMPILED SECURITY 程序名. 作者姓名. 计算机设置的场所 程序编写的日期 程序编译的日期 保密程度
• 标识部的任选部分
标识部定义例： 标识部定义例：
IDENTIFICATION DIVISION. (标识部头) PROGRAM-ID. EX. (程序名为EX） AUTHOR. ZHANG. (作者：ZHANG) INSTALLATION. DALIAN. (编写的场所：大连） DATE-WRITTEN. 2003/01/01. (编写日期) DATE-COMPLIED. 2003/01/01. (编译日期) SECURITY. THISPROGRAM RESREICTED TO PERSONNEL WHO HAVE BEEN CLEARED BY THE CONTROLLER’S OFFICE. (保密：本程序仅限于 被检查人员审查通过 的人使用)
四部之一 —环境部 环境部环境部环境部的作用是说明程序运行的环境， 环境部的作用是说明程序运行的环境， 即程序在什么软硬件环境下运行。这是 即程序在什么软硬件环境下运行。 整个COBOL COBOL程序中唯一于计算机硬件设 整个COBOL程序中唯一于计算机硬件设 备有关系的部分。 备有关系的部分。这部分要说明程序用 到哪些设备，哪些文件， 到哪些设备，哪些文件，将程序中用到 的内部文件名与外部文件（或外部设备） 的内部文件名与外部文件（或外部设备） 之间建立联系。 之间建立联系。
[ORGANIZAION [ACCESS MODE [RECORD KEY [FILE STATUS IS IS IS IS …] (SEQUENCIAL , INDEXED , RELATIVE) …] (SEQUENCIAL, RANDOM , DYNAMIC) …] …]
标识部和环境部的实例
配置节
• 源计算机段和目标计算机段的一般格式： 源计算机段和目标计算机段的一般格式：
SOURCE-COMPUTER. OBJECT-COMPUTER. MEMORY SIZE 源计算机名. 目标计算机名. WORDS IS 整数 CHARACTERS MOUDLES
• 专用名段的一般格式： 专用名段的一般格式：
环境部的一般格式
ENVIRONMENT DIVISION. CONFIGURATION SECTION. (配置节). SOURCE-COMPUTER. 源计算机名. OBJECT-COMPUTER. 目标计算机名. SPECIAL-NAMES. 专用名描述项. INPUT-OUTPUT SECTION. (输入输出节) . FILE-CONTROL. 文件控制描述体. I-O-CONTROL. 输入输出控制描述体.