FORTRAN Reference Manual

Utility Routines
FORTRAN Reference Manual—528615-001
15-32
CHECKMESSAGE Routine
Example
?GUARDIAN CHECKLOGICALNAME
INTEGER error
error = CHECKLOGICALNAME ('*.programs')
CHECKMESSAGE Routine
The CHECKMESSAGE routine determines whether a specific message exists or
reports the number of the highest-numbered saved ASSIGN message.
result
is an integer variable in which CHECKMESSAGE stores its result. See
Considerations.
messagenumber
is an integer expression that identifies the specific ASSIGN message to check. The
value for messagenumber must be a positive integer, 0, -1 or -3.
Considerations
•
Saved ASSIGN messages
Each saved ASSIGN message is identified by a positive integer. messagenumber
refers to the integer value given to the specific message when it was saved. The
set of numbers associated with the ASSIGN messages are integers from 1 to n,
where n is normally the greatest number of ASSIGN messages saved during the
initial process creation. You can specify the following values for the
CHECKMESSAGE routine:
•
Values returned by CHECKMESSAGE
If messagenumber is zero, result is zero if there are no saved ASSIGN
messages. Otherwise, result is the number of the highest-numbered saved
ASSIGN message.
result = CHECKMESSAGE ( messagenumber )
Value Meaning
-3 Checks for the presence of a saved PARAM message
-1 Checks for the presence of a saved startup message
0 Returns the highest message number in the set of saved ASSIGN
messages
>0 Checks for the presence of a saved ASSIGN message with the
same number as the message supplied