AsciiToEbcdic (String function): Difference between revisions
m (→Examples) |
m (→Examples: use "white-space:pre-wrap" to prevent long line from exceeding box boundary) |
||
Line 39: | Line 39: | ||
==Examples== | ==Examples== | ||
The following fragment shows calls of <var>AsciiToEbcdic</var> against strings with and without non-translatable characters. | The following fragment shows calls of <var>AsciiToEbcdic</var> against strings with and without non-translatable characters. | ||
<p | <p style="whitespace:pre">%a string Len 20 | ||
%a = '31':X | %a = '31':X | ||
Print %a:AsciiToEbcdic | Print %a:AsciiToEbcdic | ||
Line 48: | Line 48: | ||
</p> | </p> | ||
The result is: | The result is: | ||
<p class="output">1 | <p class="output" style="white-space: pre-wrap;">1 | ||
1&#x81;2 | 1&#x81;2 | ||
CANCELLING REQUEST: MSIR.0751: Class STRING, function ASCIITOEBCDIC: | CANCELLING REQUEST: MSIR.0751: Class STRING, function ASCIITOEBCDIC: CHARACTERTRANSLATIONEXCEPTION exception: ASCII character X'81' without valid translation to EBCDIC at byte position 1 ... | ||
CHARACTERTRANSLATIONEXCEPTION exception: ASCII character X'81' without | |||
valid translation to EBCDIC at byte position 1 ... | |||
</p> | </p> | ||
Revision as of 18:05, 7 January 2014
Convert ASCII string to EBCDIC (String class)
AsciiToEbcdic is an intrinsic function that converts an ASCII (ISO-8859-1) string to EBCDIC using the current Unicode tables. Optionally, untranslatable characters are represented with character references.
Syntax
%outString = string:AsciiToEbcdic[( [CharacterEncode= boolean])] Throws CharacterTranslationException
Syntax terms
%outString | A string variable to receive the method object string translated to EBCDIC. |
---|---|
string | The input string, which is presumed to consist of ASCII characters. |
CharacterEncode | The optional, name required, CharacterEncode argument is a Boolean enumeration. If its value is:
|
Exceptions
AsciiToEbcdic can throw the following exception:
- CharacterTranslationException
- If the method encounters a translation problem, properties of the exception object may indicate the location and type of problem.
Usage notes
- More information is available about the Unicode tables.
- The AsciiToEbcdic function is available as of Sirius Mods version 7.3.
Examples
The following fragment shows calls of AsciiToEbcdic against strings with and without non-translatable characters.
%a string Len 20 %a = '31':X Print %a:AsciiToEbcdic %a = '318132':X Print %a:AsciiToEbcdic(CharacterEncode=True) Print %a:AsciiToEbcdic
The result is:
1 12 CANCELLING REQUEST: MSIR.0751: Class STRING, function ASCIITOEBCDIC: CHARACTERTRANSLATIONEXCEPTION exception: ASCII character X'81' without valid translation to EBCDIC at byte position 1 ...
See also
- The inverse of the AsciiToEbcdic method is EbcdicToAscii.