Description:
A given value is encoded
using a concise format and the result assigned to the named message token. If the token is already
defined, the result is appended to the existing token value. The given value may be one
of the following Fortran 77 data types and there is one routine provided for each data
type:
|
|
| Subroutine | Fortran 77 Type |
|
|
| MSG_SETD | DOUBLE PRECISION |
| MSG_SETR | REAL |
| MSG_SETI | INTEGER |
| MSG_SETL | LOGICAL |
| MSG_SETC | CHARACTER |
|
|
| |
If these subroutines fail, it will usually be apparent in any messages which refer to this token.
Invocation
CALL MSG_SETx( TOKEN, CVALUE )
Arguments
TOKEN = CHARACTER
(
)
(Given)
The message token name.
VALUE = Fortran 77 type (Given)
The value to be assigned to
the message token.
System-specific
The precise effect of failures will depend upon the computer
system being used.