COBOL培训chart_10.ppt

COBOL 磁带文件和磁盘文件 磁带文件和磁盘文件 文件的组织形式 顺序文件 索引文件 直接文件 相对文件 文件的组织形式是指记录在文件中排列的方式 磁盘上可以建立以上四种文件，磁带上只能建立顺序文件 文件的存取方式 顺序存取方式 随机存取方式 (直接存取方式 ) 动态存储方式 磁带文件和磁盘文件 文件的组织形式和存取方式 顺序存取、随机存取、动态存储 相对文件 随机存取 直接文件 顺序存取、随机存取、动态存储 索引文件 顺序存取 顺序文件 存取方式 文件组织形式 磁带文件和磁盘文件 磁带文件 磁带文件上的信息是以“块”为单位的，块是磁带存取的最小物理单位 每块中包含的记录数称为块化因子 系统在每个记录前增加一个“计数字段”，用来记录本记录中的字节数 磁带文件和磁盘文件 其中： BOT：它是“磁带开始标志”的简写 记录标号：也称内部标号，是一个数据块，内存文件标识、保留日期、建立日期、卷序号 记录数据块 文件结尾标志 EOT：一片铝片，作用是停止磁带驱动器运动防止脱带 磁带文件和磁盘文件 磁带文件 磁带文件的组织形式 EOT 文件尾记录 数据 … … 数据 标号记录 BOT 磁带文件和磁盘文件 磁带文件 COBOL中有关磁带文件的成分 标识部 环境部 INPUT-OUTPUT SECTION. FILE-CONTROL SELECT 文件名 ASSIGN TO 磁带机1，磁带机2… [;ORGANAZATION IS SEQUENTIAL] [;ACESS MODE IS SEQUENTIAL] 磁带文件和磁盘文件 磁带文件 COBOL中有关磁带文件的成分 数据部 要在数据部中对此带文件进行描述，说明其标号记录、块化因子、记录长度等 例： FD MT-FILE LABEL RECORDS IS STANDARD BLOCK CONTAINS 10 RECORDS DATA RECORD IS MT-REC 01 MT-REC. 02 PRODUCT-CODE PIC 9(8) 02 PRODUCT-NAME PIC X(5) 02 UNIT-PRICE PIC 9(4)V99. 磁带文件和磁盘文件 磁带文件 COBOL中有关磁带文件的成分 过程部 OPEN语句 OPEN INPUT[OUTPU] 文件名 REVERSED[WITH NO REWIND] 其中： REVERSED表示“反读” WITH NO REWIND表示磁带不反绕 磁带文件和磁盘文件 磁带文件 COBOL中有关磁带文件的成分 过程部 CLOSE语句 CLOSE 文件名 REEL [WITH NO REWIND[LOCK]] 其中： NO REWIND的作用和OPEN语句中的相同 LOCK可选项用于关闭文件，即关闭该文件后程序中不能再打开 REEL可选项表示关闭的是某一磁带卷，不是文件 磁带文件和磁盘文件 磁带文件 COBOL中有关磁带文件的成分 过程部 READ语句 READ 文件名 [INTO 数据名] AT END 强制语句 WRITE语句 WRITE 记录名 [FROM 标识符] 磁带文件和磁盘文件 磁盘顺序文件 OPEN语句 INPUT 文件名1 [，文件名2 ]… OPEN OUTPUT 文件名3 [，文件名4 ]… … I-O 文件名5 [，文件名6 ]… CLOSE语句 CLOSE 文件名 [WITH LOCK] [，文件名2 [WITH LOCK]] 磁带文件和磁盘文件 磁盘顺序文件 READ语句 REWRITE语句 REWRITE 记录名 READ文件名 RECORD [INTO 标识符] [; AT END 强制语句] 注意： 重写语句用相同长度的记录代替原来的记录，它只能用于用I-O方式打开的文件。 在执行REWRITE语句之前，必须先用READ语句读出一条记录，对其进行修改，再用REWRITE语句写回原来位置 不能修改记录的长度和数据的类型 磁带文件和磁盘文件 磁盘顺序文件 WRITE语句 WRITE 记录名 [FROM 标识符] YES REWRITE YES WRITE YES YES READ I-O方式 OUTPUT方式 INPUT方式 OPEN方式 读