test

Sun Studio 12：Fortran 库参考

1.4.14.1 fseeko64：将文件复位到逻辑单元中

该函数的调用方式如下所示：

INTEGER fseeko64

n = fseeko64( lunit, offset64, from )

lunit

INTEGER*4

输入 

开放的逻辑单元 

offset64

INTEGER*8

输入 

相对于 from 指定位置的 64 位字节偏移量

from

INTEGER*4

输入 

0=文件开头 

1=当前位置 

2=文件结尾 

返回值 

INTEGER*4

输出 

n=0：OK；n>0：系统错误代码

注 –

对于后续文件，在调用 fseeko64 后执行输出操作（例如 WRITE）会导致 fseeko64 位置后面的所有数据记录被删除，并替换为新的数据记录（以及文件结束标记）。只有在使用直接访问文件时，才能将记录重新写入到位。

示例：fseeko64()－将 MyFile 复位到距开头两个字节处：


       INTEGER fseeko64, lunit/1/, from/0/, n
       INTEGER*8 offset/200/
       open( UNIT=lunit, FILE=’MyFile’ )
       n = fseeko64( lunit, offset, from )
       if ( n .gt. 0 ) stop ’fseek error’
       end