Fortran教学ch12.pptVIP

第十二章 文 件 ;本章内容;12.1 FORTRAN 90/95文件概述; FORTRAN中的文件按照存储在外部设备（如磁盘等）上还是存储在程序可访问的内存中而分为以下两种： （1）外部文件 （2）内部文件;1.文件与记录 文件是记录的序列。一个文件包含多个记录，而一个记录又包含多个数据项（或者称字段）。在对文件进行操作时是以记录为单位的。 ;2.文件的存取方式 文件存取方式是指对文件中数据进行读写的操作方式，FORTRAN数据文件的存取方式分为两种：顺序存取和直接存取。 顺序存取是指将文件的记录按建立的时间先后顺序依次存放在存储介质中，所产生的文件记录的逻辑次序与物理顺序是一致的。对这种访问方式就像听录音带一样。 直接存取方式是指由程序指定文件中的某个位置（记录）对它直接存取。对这种访问方式就像使用DVD/VCD一样。;3.文件的结构 文件的结构是指组成文件的记录存储格式。无论是顺序存取文件还是直接存取文件，数据在记录中的存储格式可以有三种：有格式存放、无格式存放和二进制存放。 （1）有格式是指文件中数据以字符形式（ASCII码）存放， （2）无格式是指文件中数据以二进制形式存放。无格式顺序存取文件的记录数据为不定长的二进制位串，长度不超过128个字节。 （3）二进制是指文件中数据按其内存中的存储形式存储，其数据流是由二进制代码形式的一个个字节组成，结构最紧凑，适合于保存大容量的数据。;4.文件的定位 每个文件都有一个隐含的指针，称为文件指针。文件指针总是指向文件中的一个记录（当前记录），对文件数据的读写操作，只能对文件指针指向的当前记录进行读写。;12.2文件操作语句;选项说明：;选项说明：;2.文件关闭（CLOSE）语句 语句格式： CLOSE( [UNIT=]设备号 [,ERR=错误转移] [,IOSTAT=IO状态] [,STATUS=文件属性]) 其中的UNIT、ERR和IOSTAT选项的意义与OPEN语句相同，因此不再重复说明。STATUS选择设置关闭文件时的状态，是一个字符串表达式，其值有以下两个选择： STATUS=KEEP文件关闭后继续保留，缺省值。STATUS=DELETE文件关闭后被永久删除;3.文件输入输出（READ/WRITE）语句 语句格式： READ/WRITE( [UNIT=]设备号[,[FMT=]格式说明] [,REC=记录号] [,IOSTAT=IO状态] [,ERR=错误转移] [,END=结束转移] [,ADVANCE=高级输入] [,SIZE=输入尺寸] ) 输入/输出数据列表;选项说明： （1）UNIT选项：对指定的设备号所连接的文件进行读写操作，它必须与OPEN语句中指定的设备号相同。 （2）FMT选项：设置读写时数据的格式，可以是一个FORMAT语句的标号，或是一个格式字符串。此选项只能对有格式文件使用，对无格式文件不需要设置格式说明。 （3）REC选项：只能用于直接存取文件，用于设置读取的记录号，必须是一个正整数。当READ/WRITE语句从文件中读写数据时，将从指定的记录号开始读写。 （4）ADVANCE选项：ADVANCE选项设置在文本格式下的顺序文件中，每一次READ/WRITE命令完成后，读写位置会不会自定向下移动一行。有两种选择：YES缺省值，每读写一次向下移动一行。NO暂停自动换行的操作。;选项说明： （5）SIZE选项：用于指定读/写操作传输的字符数，是一个长度为4的整型数。当ADVANCE=NO时才可以使用这个选项。 （6）END选项：指定在读写到文件末尾时，要转移到某个代码行继续执行程序，是本程序单位中的一个语句标号。 （7）ERR选项：指定在读写过程中发生错误时，会转移到某个代码行继续执行程序，是本程序单位中的一个语句标号。 （8）IOSTAT选项：设置一个整型变量，用来保存文件的读写状态。如果返回的值是正数，表示读取操作发生错误；如果返回的值为0，表示读取操作正常；如果返回负值，表示文件结束。;12.3 其它文件操作;举例： LOGICAL alive INQUIRE(FILE=score.dat, EXIST=alive) IF(alive) THEN OPEN(7, FILE=score.dat) !打开文件 CLOSE(7,STATUS=’DELETE’) !删除文件 ELSE PRINT*,文件不存在！ ENDIF;2.反绕文件指针（REWIND）语句 语句格式： REWIND( [UNIT=]设备号[,ERR=错误转移][,IOSTAT=IO状态]） 3.指针回退(BACKSPACE)语句 语句格式： BACKSP