$HexA: Difference between revisions

From m204wiki
Jump to navigation Jump to search
(Automatically generated page update)
m (link repair)
 
(7 intermediate revisions by 2 users 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>Most Sirius $functions have been deprecated in favor of Object Oriented methods. The OO equivalent for the $HexA function is the <var>[[HexToEbcdic (String function)|HexToEbcdic]]</var> function.</p>
<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.  


The $HexA function accepts one argument and returns a string result.
The <var>$HexA</var> function accepts one argument and returns a string result.  
 
The first argument is a string containing the characters
<tt>0</tt> - <tt>9</tt> and <tt>A</tt> - <tt>F</tt>. All other characters are treated as <tt>0</tt>. If the number of characters in the first argument is odd, the first argument is considered to begin with an extra <tt>0</tt> character.


==Syntax==
==Syntax==
<p class="syntax"><span class="term">%EBCDIC</span> = <span class="literal">$HexA</span>(<span class="term">hex_string</span>)
<p class="syntax"><span class="term">%ebcdic</span> = <span class="literal">$HexA</span>(<span class="term">hex_string</span>)
</p>
</p>
<p>
<p>
</p>
<var class="term">%ebcdic</var> is set to the EBCDIC equivalent of hex_string.</p>
<p>%EBCDIC is set to the EBCDIC equivalent of hex_string.</p>
 
<var class="term">hex_string</var> is a string containing the characters
<code>0</code> - <code>9</code> and <code>A</code> - <code>F</code>. All other characters are treated as <code>0</code>. If the number of characters in <var class="term">hex_string</var> is odd, <var class="term">hex_string</var> is considered to begin with an extra <code>0</code> character.


==Examples==
==Examples==
Line 29: Line 29:
==Products authorizing {{PAGENAMEE}}==  
==Products authorizing {{PAGENAMEE}}==  
<ul class="smallAndTightList">
<ul class="smallAndTightList">
<li>[[List of $functions|Sirius functions]]</li>
<li>[[Sirius Functions]]</li>
<li>[[Fast/Unload User Language Interface]]</li>
<li>[[Fast/Unload User Language Interface]]</li>
<li>[http://m204wiki.rocketsoftware.com/images/4/4a/JoclrNew.pdf Janus Open Client]</li>
<li>[[Media:JoclrNew.pdf|Janus Open Client]]</li>
<li>[http://m204wiki.rocketsoftware.com/images/1/17/JosrvrNew.pdf Janus Open Server]</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>[http://m204wiki.rocketsoftware.com/images/4/4b/SirfieldNew.pdf Sir2000 Field Migration Facility]</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')

Products authorizing $HexA