Microsoft KB Archive/11345

PRB: Error 1200, ASSIGN Label Number Used In > 1 I/O Statement PSS ID Number: Q11345 Article last modified on 02-09-1993

3.13 3.20 3.30 3.31

MS-DOS

SYMPTOMS An attempt to run an application fails and the application generates the following message:

? Error: Data format error in file USER Error Code 1200, Status 000E CAUSE The application uses the ASSIGN statement to associate a label number with a symbolic name and uses the label number in two or more READ or WRITE statements.

RESOLUTION To work around this problem, modify the source code to use the associated symbolic name in all references to a given label number.

STATUS Microsoft has confirmed this to be a problem in FORTRAN versions 3.13, 3.2, 3.3, and 3.31 for MS-DOS. This problem was corrected in FORTRAN version 4.0 for MS-DOS.

More Information:

The following code demonstrates this problem.

Sample Code #1
C Compile options needed: None

PROGRAM TEST ASSIGN 4 TO I WRITE(*, 4) ' HELLO' WRITE(*, 4) ' HELLO' 4 FORMAT(A6) END

The following code example does not generate the run-time error.

Sample Code #2
C Compile options needed: None

PROGRAM TEST ASSIGN 4 TO I WRITE(*, I) ' HELLO' WRITE(*, I) ' HELLO' 4 FORMAT(A6) END

Additional reference words: 3.13 3.20 3.30 3.31

=
================================================================

Copyright Microsoft Corporation 1993.