$Lstr X2C: Difference between revisions
Jump to navigation
Jump to search
(Automatically generated page update) |
mNo edit summary |
||
| Line 2: | Line 2: | ||
<span class="pageSubtitle">Convert from hexadecimal to byte string</span> | <span class="pageSubtitle">Convert from hexadecimal to byte string</span> | ||
<p class="warning">Most Sirius $functions have been deprecated in favor of Object Oriented methods. The OO equivalent for the $Lstr_X2C function is the [[HexToString (String function)]].</p> | <p class="warning">Most Sirius $functions have been deprecated in favor of Object Oriented methods. The OO equivalent for the $Lstr_X2C function is the <var>[[HexToString (String function)|HexToString]]</var> function.</p> | ||
This function converts from a hexadecimal encoded string to the decoded byte string. It is identical to $X2C (see the <i>[http://www.rocketsoftware.com/m204/products/index/documentation/v7r4/M204-User-Language/view Rocket Model 204 User Language Manual]</i>), except it is longstring capable. | This function converts from a hexadecimal encoded string to the decoded byte string. It is identical to $X2C (see the <i>[http://www.rocketsoftware.com/m204/products/index/documentation/v7r4/M204-User-Language/view Rocket Model 204 User Language Manual]</i>), except it is longstring capable. | ||
The $Lstr_X2C function accepts one argument and returns a string result whose hexadecimal encoding is that argument. | The <var>$Lstr_X2C</var> function accepts one argument and returns a string result whose hexadecimal encoding is that argument. | ||
The first argument is a | The first argument is a Longstring which is a hexadecimal encoding. | ||
The returned value is the hexadecimal decoding of the argument string. If the argument is not a valid hexadecimal encoding, the null string is returned. | The returned value is the hexadecimal decoding of the argument string. If the argument is not a valid hexadecimal encoding, the null string is returned. | ||
| Line 15: | Line 15: | ||
<p class="syntax"><span class="term">%DECODED</span> = <span class="literal">$Lstr_X2C</span>(<span class="term">string</span>) | <p class="syntax"><span class="term">%DECODED</span> = <span class="literal">$Lstr_X2C</span>(<span class="term">string</span>) | ||
</p> | </p> | ||
<p> | <p> | ||
< | <var class="term">%DECODED</var> is set to the hexadecimal decoding of <var class="term">string</var>.</p> | ||
< | |||
==usage notes== | |||
<ul> | |||
<li>You can check for an invalid hexadecimal encoding by checking for the null string return value from $Lstr_X2C. Of course, if it is possible that the argument is null, the null string is a valid returned value. If you need to check for errors, and the null string is a possible argument value, you can use an approach such as the following: | |||
<p class="code">%STR = $Lstr_X2C(%IN) | |||
<p class="code"> | IF %STR EQ '' | ||
IF %IN NE '' THEN | |||
error code ... | |||
END IF | |||
END IF | |||
</p> | </p> | ||
<li><var>[[$Lstr_C2X]]</var> is the inverse of <var>$Lstr_X2C</var>. | |||
</ul> | |||
==Example== | |||
The following code would print <code>Red rum</code>, which is the character representation of the EBCDIC characters represented in hexadecimal as "D985844099A494": | |||
<p class="code"> | <p class="code">PRINT $Lstr_X2C('D985844099A494') | ||
</p> | </p> | ||
==Products authorizing {{PAGENAMEE}}== | ==Products authorizing {{PAGENAMEE}}== | ||
<ul class="smallAndTightList"> | <ul class="smallAndTightList"> | ||
| Line 51: | Line 51: | ||
<li>[[Sir2000 Field Migration Facility]]</li> | <li>[[Sir2000 Field Migration Facility]]</li> | ||
</ul> | </ul> | ||
[[Category:$Functions|$Lstr_X2C]] | [[Category:$Functions|$Lstr_X2C]] | ||
Revision as of 23:56, 15 April 2013
Convert from hexadecimal to byte string
Most Sirius $functions have been deprecated in favor of Object Oriented methods. The OO equivalent for the $Lstr_X2C function is the HexToString function.
This function converts from a hexadecimal encoded string to the decoded byte string. It is identical to $X2C (see the Rocket Model 204 User Language Manual), except it is longstring capable.
The $Lstr_X2C function accepts one argument and returns a string result whose hexadecimal encoding is that argument.
The first argument is a Longstring which is a hexadecimal encoding.
The returned value is the hexadecimal decoding of the argument string. If the argument is not a valid hexadecimal encoding, the null string is returned.
Syntax
%DECODED = $Lstr_X2C(string)
%DECODED is set to the hexadecimal decoding of string.
usage notes
- You can check for an invalid hexadecimal encoding by checking for the null string return value from $Lstr_X2C. Of course, if it is possible that the argument is null, the null string is a valid returned value. If you need to check for errors, and the null string is a possible argument value, you can use an approach such as the following:
%STR = $Lstr_X2C(%IN) IF %STR EQ IF %IN NE THEN error code ... END IF END IF
- $Lstr_C2X is the inverse of $Lstr_X2C.
Example
The following code would print Red rum, which is the character representation of the EBCDIC characters represented in hexadecimal as "D985844099A494":
PRINT $Lstr_X2C('D985844099A494')