Message tokens can be set to the most concise character encoding of a given variable's value with the routines EMS_SETx, e.g.CALL EMS_REP( 'EMS_ROUTN_TOKEN', 'Error text: ^TOKEN', STATUS )
For the EMS_SETx routines, x corresponds to one of five standard Fortran 77 data types:CALL EMS_SETC( 'TOKEN', 'A token' )
x | Fortran Type |
---|---|
D | DOUBLE PRECISION |
R | REAL |
I | INTEGER |
L | LOGICAL |
C | CHARACTER |
EMS Error Message Service