第4章 数据部1.pptVIP

COBOL 语言程序设计 大连理工大学IBM技术中心 姜厚云 jianghy@dlut.edu.cn 第四章 数据部之一 §4.1 数据部概述 §4.2 文件节 §4.3 字型字句 §4.4 工作单元节 §4.5 区域图 §4.6 程序举例 §4.1数据部概述 §4.1.1 数据部的作用 §4.1.2 数据的层次和层号 §4.1.3 数据部的结构 §4.1.1 数据部的作用 数据部是COBOL源程序中的第三部分，也是唯一描述数据的部分，不可或缺，程序中涉及到的全部数据（输入，输出，中间）都要在此定义 数据有两类： 孤立项：两个相互独立，没有内在联系的数据项，各自占据内存区域 组合项：数据相互管理，它们之间在逻辑上存在联系 (平等或从属)， 其各个数据项的数据类型可以不同 所有数据项都应在数据部中对其属性进行描述 a. 类型 (数值/字符) 和 存储形式 (长度) b. 数据项间的关系 (层次和层号) c. 记录与文件的关系 d. 文件的书写 用数据部将数据和数据“加工”过程分离，使任务单纯清晰，便于程序的书写，修改和阅读 §4.1.2 数据的层次和层号 COBOL中把有从属关系的数据用层次(level)关系来描述，数据的层次结构是： 记录(record) - 组合项(group item) - 初等项(elementary item) 例4.1.2 层次规定如下： a. 描述层次结构的层号从01－49；01层最高，用来描述记录 b. 从属项的层号比其上属项的层号大，但层号不必连续 c. 如果多个数据项都从属于同一组合项但互不从属，则这几个数据项 应具有相同的层号 d. 如果多个数据项都不属于同一组合项且互不从属，则这几个数据项 可以有不同的层号 e. 一个层号为K的组合项包括它下面所有层号比它大的数据项，直到 遇到小于或等于K的层次为止 §4.1.3 数据部的结构 数据部通常用到的有以下几个节 文件节 (FILE SECTION) 工作单元节 (WORKING-STORAGE SECTION) 联接节 (LINKAGE SECTION) 报表节 (REPORT SECTION) §4.2 文件节 §4.2.1 文件节的作用 §4.2.2 文件描述 §4.2.3 记录描述 §4.2.4 数据项描述 §4.2.5 书写格式 §4.2.6 程序举例 §4.2.1 文件节的作用 程序中每个输入和输出文件都要在此描述，内容包括： a. 文件名和文件属性 b. 文件中包括的记录的名字 c. 每个记录中数据的层次关系 d. 记录中各数据项的数据形式和占内存的大小 例4.2.1 §4.2.2 文件描述 文件描述体用FD (FILE DESCRIPTION)开始，而不是用层号开始，FD后面是在环境部中定义的内部文件名 LABEL RECORD IS STANDARD 只有磁盘(带)文件才有标号记录，且一律定义为‘标准的标号记录’； LABEL RECORD IS OMITTED 打印文件是没有标号记录的，应定义为‘标号记录省略’ DATA RECORD IS RECEIVABLE 表示文件中包含的记录名是 RECEIVABLE，该项可省略 §4.2.3 记录描述 记录描述体由01层号开头，后跟记录名 如： 01 RECEIVABLE. 例4.2.1中 RECEIVABLE记录包含四个初等项，每个初等项的数据类型和长度须单独定义 如果记录下面不再分项，即记录本身就是一个初等项，则可以定义成： 01 RECEIVABLE PIC X(80). §4.2.4 数据项描述 在每个初等项的名字后使用 PIC 子句描述数据类型和长度 §4.3 详细介绍 §4.2.5 书写格式 文件描述FD必须从A区开始书写 层号01必须从A区开始书写 其它层号可以从A或B区开始书写，为使层次清楚，最好从B区开始按层次关系写成锯齿形状，如： 01 A1. 02 B1. 03 C1 PIC …… 03 C2 PIC …… 01 A2. 02 B2 PIC …… §4.2.6 程序举例 练习1： 从磁盘文件FILE1中读取数据，每行80列，在行间插入空行后写入磁盘文件FILE2，写出完整的源程序 练习2： 磁盘文件MATHGRD1中包含学生数学课成绩记录，包括如下字段：学号(stno)，名字(name)，成绩(grade). 如果成绩低于60，评定为差(p