조건 및 IOSTAT 값

IOSTAT값은 end-of-file condition, end-of-record condition 또는 입력/출력 명령문 중에 오류 조건이 발생하는 경우 IOSTAT= 지정자의 변수에 지정된 값입니다. IOSTAT= 지정자는 다음 유형의 오류 조건을 보고합니다. 입력 또는 출력 명령문이 성공하면 IOSTAT 값은 0입니다.

      PROGRAM READING
      
      CHARACTER*80 JNAME, AUX
      REAL*8 KI, DCRMAX, TIME, DCRACK
      INTEGER KINC, ELEM, IPT, EOF
      
      
C     Read file with 3 rows
      OPEN(10, FILE='DATA.txt', STATUS='OLD')
C       READ(10, *) AUX, JNAME
      READ(10, '(16X, A)') JNAME
      READ(10, '(16X, F)') KI
      READ(10, '(16X, F)') DCRMAX
      CLOSE(10)
C       PRINT*, '###' // TRIM(JNAME) // '###'
C       PRINT*, KI, DCRMAX
      

C     Read file with multiple lines      
      OPEN(11, FILE='data_table.txt', STATUS='OLD')
      
C     Skip first line     
      READ(11, *, IOSTAT=EOF) AUX

C     Read lines iteratively      
      DO WHILE (EOF .GE. 0)
        READ(11, *, IOSTAT=EOF) TIME, KINC, DCRACK, ELEM, IPT
      END DO
      
      CLOSE(11)
      
      PRINT*, TIME, KINC, DCRACK, ELEM, IPT
      
      
      END

• 카탈로그 번호
• 심각
• 복구 가능
• 변환
• 언어

 

 

• 레코드의 끝
• 파일의 끝
• 오류 조건