Ron Horner writes


Depending on the size, the field would be either PIC s9(4) comp, or PIC
s9(9) comp.

Ron Horner
HP3000 Systems Administrator
JCPenney Logistics
[log in to unmask]
(414) 259-2274
AIM: hornerrr
----- Original Message -----
From: "Braun Brelin" <[log in to unmask]>
To: <[log in to unmask]>
Sent: Wednesday, May 15, 2002 11:23 AM
Subject: Converting packed unsiged IMAGE fields


> Hello folks,
>
> I'm trying to access data from an IMAGE database.  I'm
> able to retrieve data using DbGet(), unfortunately,
> some of the fields are in a packed unsigned format.
> Is there some sort of conversion utility or some sort
> of option to DbGet() which will convert the packed
> format to ASCII?
-----------------------------------------------------------
I believe that Braun is actually talking about packed decimal fields that
map to Cobol PIC 9(N) COMP-3, not COMP layout.  This representation uses 4
bits (a nibble) for each digit of the number with the far right nibble
standing for the sign that can be negative, positive or unsigned).  Also
given his previous postings, he needs a method in Perl to convert this
packed decimal field to an ASCII, or possibly interger value for use.

Mike Berkowitz
Guess? Inc.

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *