$HexA: Difference between revisions
mNo edit summary |
m (link repair) |
||
| (6 intermediate revisions by one other user not shown) | |||
| Line 2: | Line 2: | ||
<span class="pageSubtitle">Convert hexadecimal string to EBCDIC equivalent</span> | <span class="pageSubtitle">Convert hexadecimal string to EBCDIC equivalent</span> | ||
<p class="warn"><b>Note: </b> | <p class="warn"><b>Note:</b> Many $functions have been deprecated in favor of Object Oriented methods. The OO equivalent for the <var>$HexA</var> function is the <var>[[HexToString (String function)|HexToString]]</var> function.</p> | ||
This function converts a hexadecimal string to its EBCDIC equivalent. | This function converts a hexadecimal string to its EBCDIC equivalent. | ||
| Line 29: | Line 29: | ||
==Products authorizing {{PAGENAMEE}}== | ==Products authorizing {{PAGENAMEE}}== | ||
<ul class="smallAndTightList"> | <ul class="smallAndTightList"> | ||
<li>[[ | <li>[[Sirius Functions]]</li> | ||
<li>[[Fast/Unload User Language Interface]]</li> | <li>[[Fast/Unload User Language Interface]]</li> | ||
<li>[ | <li>[[Media:JoclrNew.pdf|Janus Open Client]]</li> | ||
<li>[ | <li>[[Media:JosrvrNew.pdf|Janus Open Server]]</li> | ||
<li>[[Janus Sockets]]</li> | <li>[[Janus Sockets]]</li> | ||
<li>[[Janus Web Server]]</li> | <li>[[Janus Web Server]]</li> | ||
<li>Japanese functions</li> | <li>Japanese functions</li> | ||
<li>[ | <li>[[Media:SirfieldNew.pdf|Sir2000 Field Migration Facility]]</li> | ||
</ul> | </ul> | ||
[[Category:$Functions|$HexA]] | [[Category:$Functions|$HexA]] | ||
Latest revision as of 20:17, 13 March 2018
Convert hexadecimal string to EBCDIC equivalent
Note: Many $functions have been deprecated in favor of Object Oriented methods. The OO equivalent for the $HexA function is the HexToString function.
This function converts a hexadecimal string to its EBCDIC equivalent.
The $HexA function accepts one argument and returns a string result.
Syntax
%ebcdic = $HexA(hex_string)
%ebcdic is set to the EBCDIC equivalent of hex_string.
hex_string is a string containing the characters
0 - 9 and A - F. All other characters are treated as 0. If the number of characters in hex_string is odd, hex_string is considered to begin with an extra 0 character.
Examples
The following statement sets %JUNK to the string 123 (EBCDIC X'F1F2F3'):
%JUNK = $HexA('F1F2F3')
And this statement sets %JUNK to EBCDIC X'0102', which is a non-displayable string.
%JUNK = $HexA('102')