EMS_SETx

Assign a value to a message token (concise)

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:


x Fortran Type


D DOUBLE PRECISION
R REAL
I INTEGER
L LOGICAL
C CHARACTER


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

Invocation

CALL EMS_SETx( TOKEN, VALUE )

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.