- COBOL 教程
- COBOL - 首页
- COBOL - 概述
- COBOL - 环境设置
- COBOL - 程序结构
- COBOL - 基本语法
- COBOL - 数据类型
- COBOL - 基本动词
- COBOL - 数据布局
- COBOL - 条件语句
- COBOL - 循环语句
- COBOL - 字符串处理
- COBOL - 表格处理
- COBOL - 文件处理
- COBOL - 文件组织
- COBOL - 文件访问模式
- COBOL - 文件处理动词
- COBOL - 子程序
- COBOL - 内部排序
- COBOL - 数据库接口
- COBOL 有用资源
- COBOL - 问答
- COBOL - 快速指南
- COBOL - 有用资源
COBOL - 文件访问模式
到目前为止,已经讨论了文件组织方案。对于每种文件组织方案,都可以使用不同的访问模式。以下是文件访问模式的类型:
- 顺序访问
- 随机访问
- 动态访问
本模块中提到的语法及其各自的术语仅指它们在程序中的用法。使用这些语法的完整程序将在下一章中讨论。
顺序访问
当访问模式为顺序时,记录检索方法根据所选的文件组织而变化。
对于顺序文件,记录按插入的顺序访问。
对于索引文件,用于获取记录的参数是记录键值。
对于相对文件,使用相对记录键检索记录。
语法
以下是顺序访问模式的语法:
ENVIRONMENT DIVISION. INPUT-OUTPUT SECTION. FILE-CONTROL. SELECT file-name ASSIGN TO dd-name ORGANIZATION IS SEQUENTIAL ACCESS MODE IS SEQUENTIAL ENVIRONMENT DIVISION. INPUT-OUTPUT SECTION. FILE-CONTROL. SELECT file-name ASSIGN TO dd-name ORGANIZATION IS INDEXED ACCESS MODE IS SEQUENTIAL RECORD KEY IS rec-key1 ALTERNATE RECORD KEY IS rec-key2 ENVIRONMENT DIVISION. INPUT-OUTPUT SECTION. FILE-CONTROL. SELECT file-name ASSIGN TO dd-name ORGANIZATION IS RELATIVE ACCESS MODE IS SEQUENTIAL RELATIVE KEY IS rec-key1
随机访问
当访问模式为随机时,记录检索方法根据所选的文件组织而变化。
对于索引文件,记录根据放置在键字段中的值进行访问,该键字段可以是主键或备用键。可以存在一个或多个备用索引。
对于相对文件,通过相对记录键检索记录。
语法
以下是随机访问模式的语法:
ENVIRONMENT DIVISION. INPUT-OUTPUT SECTION. FILE-CONTROL. SELECT file-name ASSIGN TO dd-name ORGANIZATION IS INDEXED ACCESS MODE IS RANDOM RECORD KEY IS rec-key1 ALTERNATE RECORD KEY IS rec-key2 ENVIRONMENT DIVISION. INPUT-OUTPUT SECTION. FILE-CONTROL. SELECT file-name ASSIGN TO dd-name ORGANIZATION IS RELATIVE ACCESS MODE IS RANDOM RELATIVE KEY IS rec-key1
动态访问
动态访问支持在同一个程序中同时进行顺序访问和随机访问。使用动态访问,可以使用一个文件定义来执行顺序和随机处理,例如按顺序访问某些记录,并按其键访问其他记录。
对于相对文件和索引文件,动态访问模式允许您在读取文件时在顺序访问模式和随机访问模式之间来回切换,方法是在 READ 语句中使用 NEXT 短语。NEXT 和 READ 功能将在下一章中讨论。
语法
以下是动态访问模式的语法:
ENVIRONMENT DIVISION. INPUT-OUTPUT SECTION. FILE-CONTROL. SELECT file-name ASSIGN TO dd-name ORGANIZATION IS SEQUENTIAL ACCESS MODE IS DYNAMIC RECORD KEY IS rec-key1 ALTERNATE RECORD KEY IS rec-key2 ENVIRONMENT DIVISION. INPUT-OUTPUT SECTION. FILE-CONTROL. SELECT file-name ASSIGN TO dd-name ORGANIZATION IS RELATIVE ACCESS MODE IS DYNAMIC RELATIVE KEY IS rec-key1
广告