Ошибка записи в Fortran

Question

Я изо всех сил, чтобы читать из одного текстового файла ввода в новый текстовый файл с помощью компилятора Фортрана в Visual Studio 10. Мой входной файл в формате gslib (прилагается)

program main 

! Unit numbers: 

     lisa = 4 
     lfke = 9 

! Writing input data to file Lisa 

     open(unit=lisa,file='fake.dat',status='OLD',err=80) 
     open(unit=lfke,file='dlfke',status='NEW', err=80) 
     read(lisa,*,err=80) 
     read(lisa,*,err=80) line 
     write(9,*) line  
     close(unit=lisa) 
     close(unit=lfke)   
     80 stop 'ERROR in test file!' 
     end 

Answer 1

Эта программа всегда будет выводить сообщение об ошибке «ERROR в тестовом файле», независимо от того, произошла ли ошибка. После выполнения строки инструкциями закрытия он выполнит строку 80 с помощью оператора stop. Вам, вероятно, будет легче, так как ваша разработка вашей программы, удалить тесты err=80 в каждом операторе ввода-вывода. Затем, если есть ошибка ввода-вывода, программа автоматически прекратит работу и произведет конкретное сообщение о программе. Эти ветви err= полезны, если вы хотите, чтобы ваша программа обрабатывала ошибку, но с этой реализацией она скрывала то, что произошло с ошибкой ввода-вывода, поскольку все ошибки ввода-вывода создают одно и то же сообщение.