Insert the unsigned 4 byte value in the right half of a zeroed 64-bit
register and use CVDG. There is also a CVBG.
On 2022-01-19 12:32 p.m., Dave Clark wrote:
If I have a 4-byte signed binary number (i.e., up to 2147483647),
I can convert it to packed format as follows.
L R2,BIN4
CVD R2,PWORK8
How would I convert a 4-byte --un--signed binary number (such as
an RBA, up to 4294967295) to packed format? If you need a reason, I'm
writing an external REXX function that needs to be able to return an RBA
in zoned decimal format to the caller.
Thus, although I know how I would convert a signed zoned number
back to a signed binary format, I also need to know how to convert those
unsigned 10 zoned digits back to an unsigned binary format. Help with
both issues?
Sincerely,
Dave Clark
Gary Weinhold
Senior Application Architect
DATAKINETICS | Data Performance & Optimization
Phone:+1.613.523.5500 x216
Email: [email protected]
Visit us online at www.DKL.com
E-mail Notification: The information contained in this email and any
attachments is confidential and may be subject to copyright or other
intellectual property protection. If you are not the intended recipient, you
are not authorized to use or disclose this information, and we request that you
notify us by reply mail or telephone and delete the original message from your
mail system.
