Thanks for the reply. I shortened the program to limit it to the problem area:
PROGRAM TEST
CHARACTER*5 MESS
CHARACTER*20 FNAME
CHARACTER*67 TEXT
ITX1 = 14
IWR = 13
FNAME = 'TEST.TXT'
OPEN (ITX1, FILE=FNAME, ACCESS='DIRECT', RECL=78...
Program is reading direct formatted text file. Each record consist of two character variables and two integer variables. The first record has text in both character variables but the second record has only blanks in the first character variable.
These are the relevant statements used...
I used the GNU Fortran 77 compiler to resurrect an old program. It brought up an error with this statement:
18 READ(IUNI1, 1001,REC=1, END=17) (LINE(I), I=1,IRL)
It printed a (1) under the R of REC and a (2) under the E of END and noted:
conflicting I/O control statements at (1) and (2)...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.