A positive value is identified by a sign encoded as --
X'A'
X'C' (Preferred)
X'E'
X'F'
A negative value is identified by a sign encoded as --
X'B'
X'D' (Preferred)
The preferred encoding are always generated by packed decimal instructions,
The alternative encoding are accepted as input to packed decimal
instructions.
John P. Baker
NGSSA, LLC
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On
Behalf Of zMan
Sent: Saturday, July 14, 2012 11:12 PM
To: [email protected]
Subject: Re: COBOL packed decimal
On Sat, Jul 14, 2012 at 5:46 PM, John P. Baker <[email protected]> wrote:
> By the way, a 5-byte field capable of containing a 9-digit packed
> decimal value has a 0.55% probability of containing a valid packed
> decimal value (taking into consideration all six (6) valid sign
> representations) and a 0.18% probability of containing a valid packed
> decimal value (taking into consideration only the two (2) preferred sign
representations).
OK, I'll byte...what are the six? I know of three (C, D, F). Would love a
reference so I can understand this better.
--
zMan -- "I've got a mainframe and I'm not afraid to use it"
----------------------------------------------------------------------
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
