next up previous
Next: CHR_NTH - Return the two-character ordinal abbreviation for a specified integer
Up: Routine Descriptions
Previous: CHR_MTOA - Translate a string from the machine's characters set to ASCII

CHR_MTOE  -  Translate a string from the machine's character set to EBCDIC

Description:
The string STR1, which is a Fortran 77 CHARACTER string, is returned in STR2 translated into a form which can be written and subsequently read correctly by a machine which uses the EBCDIC character set.

Any characters which are not represented in the EBCDIC character set are translated to EBCDIC SPACE. Non-printable characters are translated where possible.

Invocation:
CALL CHR_MTOE( STR1, STR2 )

Arguments:
STR1 = CHARACTER ( ) (Given)
The Fortran 77 character string.
STR2 = CHARACTER ( ) (Returned)
A character string which may be written and subsequently read correctly by a machine which uses the EBCDIC character set to represent characters in Fortran. If STR2 is shorter than STR1, the translated string will be truncated; if STR2 is longer than STR1, STR2 will be padded with blanks beyond the translated string.

System-specific
This subroutine has been implemented for machines which use the ASCII character set.



next up previous
Next: CHR_NTH - Return the two-character ordinal abbreviation for a specified integer
Up: Routine Descriptions
Previous: CHR_MTOA - Translate a string from the machine's characters set to ASCII



CHR Character Handling Routines
Starlink User Note 40
A C Charles
P C T Rees
A J Chipperfield
2 August 1995
E-mail:ussc@star.rl.ac.uk