fortran二进制数据读取求助

lqouc

point_number2=22309 ！第二组数据前的字符数量
point_number2=34347 ！第三组数据前的字符数量
这个变量为啥声明两遍？
从程序代码里面完全看不出表头有多长，代码的意思是表头len=1403，但是文字描述说不需要的长度为34347，然后在读入2600*8。recl的长度也和read里面实际的数组长度不一致，感觉你的程序并不能执行这个意图。
你可以先试一下我改的这一段，如果还不行，我觉得就需要先弄明白文档的排列规则了。
OPEN(19,FILE=***,FORM="binary",STATUS="OLD“ ,ACCESS="DIRECT")
READ(19) dum
DO i = 1 , 2600
READ(19) p(i)
END DO
CLOSE(19)

小鑫

lqouc 发表于 2016-5-14 15:20
point_number2=22309 ！第二组数据前的字符数量
point_number2=34347 ！第三组数据前的字符数量
这个变量 ...

谢谢了，小老师那边又有杂事要我忙，加班到周天现在才忙完。2个point_number2是我发帖时笔误了，应该是point_number2=22309,point_number3=34347，这两个值和len=1403分别是我要读入的前三组数据的位置。第一组数据前有长为1403字节的表头；第二组数据从第22309+1字节开始，第三组数据从第34347+1字节开始

小鑫

lqouc 发表于 2016-5-14 15:20
point_number2=22309 ！第二组数据前的字符数量
point_number2=34347 ！第三组数据前的字符数量
这个变量 ...

试了一下版主帮我改的程序，我用的是VS编译器，读到open的时候会提示forrtl:severe(37):inconsistent record length....的错误，似乎是说RECL必须定义

lqouc

小鑫 发表于 2016-5-15 15:27
试了一下版主帮我改的程序，我用的是VS编译器，读到open的时候会提示forrtl:severe(37):inconsistent rec ...

我用intel和compaq的编译器都不要求写recl，不知道你的是什么情况了。