CVTIZV
Pass an integer value to a zoned numeric value
WTSupported in traditional Synergy on Windows
|
|
USupported on UNIX
|
VSupported on OpenVMS
|
The CVTIZV routine was deprecated in Synergy/DE version 9; we recommend you use an integer assignment instead, as shown in the note in the Discussion. |
xcall CVTIZV(value, field)
Arguments
value
Passed directly or using one of the following functions: (n)
^VAL = Pass the integer by value.
^REF = Pass the integer by reference.
^XTRNL = Pass the integer by external reference. (OpenVMS only)
field
The variable that will be loaded with the converted integer. (n)
Discussion
We recommend that you replace the deprecated CVTIZV routine with an integer assignment. For example,
retlen = ^addr(prcnmlen)
retlen = numeric field
retlen = ^xtrnl(SOME LITERAL) See Moving integer data to a decimal/packed destination for more information about assigning integer values. |
The CVTIZV subroutine converts an integer value to a zoned numeric value. The integer must be passed by value, reference, or external reference.
A field can be converted either into itself or into another named field.
Examples
The following example converts the externally defined constant SS$_ENDOFFILE and places the result in the variable sseof. SS$_ENDOFFILE is a system service condition value.
xcall cvtizv(^xtrnl(SS$_ENDOFFILE), sseof)