View source for $C2X

<p>The $C2X function translates each byte within a character string into two-byte hexadecimal-equivalent characters. $C2X returns a character string that is twice as long as the original string. The maximum input length is 126 bytes. If the input length is more than 126 bytes, a null string is returned.</p>
<b>Syntax</b>
<p>The format for the $C2X function is:</p>
<p class="code">$C2X(charstr)   
</p>
<p>where charstr is the input character string (either a %variable or a quoted literal) </p>
<b>Example 1</b>
<p class="code">PRINT $C2X('YES') 
</p>
<p>results in this output:</p>
<p class="code">E8C5E2 
</p>
<b>Example 2</b>
<p>This example produces a decimal to hexadecimal conversion:</p>
<p class="code">PROCEDURE D2X
B
PRINT $C2X($BINARY($READ('Enter D2X decimal value'),31)) 
END
END PROCEDURE
</p>
<p>resulting in this output:</p>
<p class="code">$$ENTER D2X DECIMAL VALUE  <--- $READ prompt
64565   <--- User enters some decimal input
0000FC35 <--- Procedure prints output value in hexadecimal
</p>
[[Category:SOUL $functions]]