On 4/25/2013 4:13 PM, Frank Swarbrick wrote:
That's useful to know. We communicate with Visa and they use this format for
many of the fields in their messages. Currently we use some overly clever COBOL
to convert these to DISPLAY (zoned decimal) format. When I have time I'll see if
I can write a little asm routine to use CDUTR andCSDTR for this. I guess I would
have to follow a CDUTR with a CSDTR to convert it to signed-packed, and then use
UNPK (if desired) to get it to zoned decimal. Interesting.
Hmm. Maybe ED instead of UNPK, I think.
________________________________
From: Tom Marchant <[email protected]>
To: [email protected]
Sent: Thursday, April 25, 2013 8:01 AM
Subject: Re: Packed decimal and sign nibble
On Wed, 24 Apr 2013 10:38:06 -0600, Steve Comstock wrote:
So-called "unsigned packed-decimal" data is mis-leading
at best because it cannot be used in any packed decimal
arithmetic or compare operations....
Unsigned-Packed-Decimal was introduced in the sixth edition of
the z/Architecture Principles of Operation, SA22-7832-05, along
with the Decimal-floating-point facility. The publication date is
April, 2007
--
Tom Marchant
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
--
Kind regards,
-Steve Comstock
The Trainer's Friend, Inc.
303-355-2752
http://www.trainersfriend.com
* To get a good Return on your Investment, first make an investment!
+ Training your people is an excellent investment
* Try our tool for calculating your Return On Investment
for training dollars at
http://www.trainersfriend.com/ROI/roi.html
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
