perror(3F)
NAME
perror, gerror, ierrno − get system error messages
SYNOPSIS
subroutine perror (string)
character∗(∗) string subroutine gerror (string)
character∗(∗) string character∗(∗) function gerror() function ierrno()
DESCRIPTION
perror will write a message to fortran logical unit 0 appropriate to the last detected system error. string will be written preceding the standard error message.
gerror returns the system error message in character variable string. gerror may be called either as a subroutine or as a function.
ierrno will return the error number of the last detected system error. This number is updated only when an error actually occurs. Most routines and I/O statements that might generate such errors return an error code after the call; that value is a more reliable indicator of what caused the error condition.
FILES
/usr/lib/libU77.a
SEE ALSO
BUGS
string in the call to perror can be no longer than 127 characters.
The length of the string returned by gerror is determined by the calling program.
NOTES
UNIX system error codes are described in intro(2). The Fortran I/O error codes and their meanings are:
100"error in format"
101"illegal unit number"
102"formatted i/o not allowed"
103"unformatted i/o not allowed"
104"direct i/o not allowed"
105"sequential i/o not allowed"
106"can’t backspace file"
107"off beginning of record"
108"can’t stat file"
109"no ∗ after repeat count"
110"off end of record"
111"truncation failed"
112"incomprehensible list input"
113"out of free space"
114"unit not connected"
115"read unexpected character"
116"blank logical input field"
117"’new’ file exists"
118"can’t find ’old’ file"
119"unknown system error"
120"requires seek ability"
121"illegal argument"
122"negative repeat count"
123"illegal operation for unit"
149"cannot keep a scratch file"
150"could not print file upon closing"
151"could not print & delete file upon closing"
152"cannot write to a read-only file"
153"record number greater than maximum"
154"cannot print a scratch file"
155"cannot delete a read-only file"
156"unrecognizable data type"
157"invalid number of dimensions"
When compiling source with the -Qocs option, an explicit underscore needs to be added to the end of the routine names. When compiling source with the -Qocs option, gerror may not be called as a function because character values are returned differently under the 88Open OCS standard.
CX/UX Hf77 Fortran Reference Manual