MSG_FMTx - Assign a value to a message token (formatted)

Description:

A given value is encoded using the supplied Fortran 77 format field 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_FMTD	DOUBLE PRECISION
MSG_FMTR	REAL
MSG_FMTI	INTEGER
MSG_FMTL	LOGICAL
MSG_FMTC	CHARACTER

If these subroutines fail, it will usually be apparent in any messages which refer to this token.

Invocation:

CALL MSG_FMTx( TOKEN, FORMAT, VALUE )

Arguments:

TOKEN = CHARACTER * ( * ) (Given)

The message token name.

FORMAT = CHARACTER * ( * ) (Given)

The Fortran 77 FORMAT field used to encode the supplied value.

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.