FORTRAN Reference Manual

Utility Routines
FORTRAN Reference Manual—528615-001
15-6
FORTRAN_COMPLETION_ Routine
message
is a character expression that the FORTRAN run-time library writes to the standard
log file. message must be at least message-length characters if you specify
message-length. If you do not specify message-length, the actual length of
message is displayed. FORTRAN_COMPLETION_ displays a maximum of 80
characters.
completion-code
is an integer expression whose value is passed as the completion-code
parameter to PROCESS_STOP_.
termination-info
is an integer expression whose value is passed as the termination-info
parameter to PROCESS_STOP_.
spi-ssid
is a character expression whose length is at least 12 characters and whose value
is passed as the spi-ssid parameter to PROCESS_STOP_. spi-ssid is a
subsystem ID (SSID) that identifies the subsystem that defines termination-info.
For further information about subsystem IDs, see the SPI Programming Manual.
text-length
is an integer expression whose value is the length of the value of text. If you omit
this argument, the actual length of text is used.
text
is a character expression whose length is at least text-length characters and
whose value is passed as the text parameter to PROCESS_STOP_. If you do not
specify text-length, FORTRAN_COMPLETION_ uses the actual length of
text.
Considerations
•
Use FORTRAN_COMPLETION_ only in programs that specify an ENV
•
COMMON directive. If you call FORTRAN_COMPLETION_ in a program that
specifies ENV OLD, the FORTRAN compiler does not report a warning or an error,
but the run-time library reports an error and terminates your program.
•
All the arguments are optional. You can use or omit them in any combination.
•
Executing a FORTRAN STOP statement is equivalent to calling
FORTRAN_COMPLETION_, with all its arguments omitted (except possibly
message). For example:
STOP is equivalent to CALL FORTRAN_COMPLETION_