FORTRAN Reference Manual

Run-Time Diagnostic Messages
FORTRAN Reference Manual528615-001
G-7
Message Format
additional_information
if present, gives more detail about message. For example, if an error occurs while
accessing a file, additional_information might be the file-system error
number.
optional_text
if present, provides additional information about the error. For example, it might
show the FORTRAN unit number. optional_text helps you identify the cause of
the error.
top_of_stack
shows the name of the procedure that invoked the run-time library routine in which
the error was detected, the offset within the procedure, and the number of the code
segment in which the procedure’s code is located.
bottom_of_stack
shows the name of the first procedure—the main procedure—of the process in
which the error occurred, the offset within the procedure, and the number of the
code segment in which the procedure’s code is located. The stack trace includes
all procedures between top_of_stack and bottom_of_stack.
The following examples show messages that FORTRAN might write to the standard
log file:
If a program passes a negative value to a square root function, FORTRAN writes a
message such as the following to the standard log file:
\NODE.$Z012:3 - *** Run-time Error 049 ***
\NODE.$Z012:3 - Square root domain fault
\NODE.$Z012:3 - From: DRAWIT + %513, UC.00
\NODE.$Z012:3 - CIRCLE + %21, UC.00
\NODE.$Z012:3 - MYPROG + %7, UC.00
If a program tries to open standard input but the file does not exist, FORTRAN
writes a message such as the following to the standard log file:
\NODE.$Z012:3 - *** Run-time Error 059 ***
\NODE.$Z012:3 - Standard input file error (11)
\NODE.$Z012:3 - From: READREC +%54, UC.00
\NODE.$Z012:3 NEXTREC + %15, UC.00
\NODE.$Z012:3 - COMPUTE + %214, UC.00
\NODE.$Z012:3 - MYPROG + %7, UC.00
Note that the error message includes the number of the file-system error number
(11).