Re: target too small but dump says not?

On 8/9/2013 10:01 AM, James Franz wrote:

RNQ0103 error message - target too small
dumped the program and wondering why value -026960399 does not fit in a 9,0 field ?

what am I missing? This has been running many years, and not new code (2008), but recent compile v6r1)
fixed format eval

Eval WPkgID(PkgCounter) = WorkPackageID

values from dump

WPKGID ZONED(9,0) DIM(10)
(1) 005864648.
(2-10) 000000000.

(one of many fields in a DS)
WORKPACKAGEID BIN(9,0) -026960399. 'C2C9D3F1'X

jim

Not sure what's missing; the dump looks reasonable from here. I tried
the following test program on 7.1 to see what I got, and it was as expected:

d binary s 9b 0
d zoned s 9s 0 dim(2)

/free
binary = *hival;
zoned(1) = binary;
dump;
binary = *loval;
zoned(2) = binary;
dump;
*inlr = *on;
/end-free

NAME ATTRIBUTES VALUE
BINARY BIN(9,0) 999999999. '3B9AC9FF'X
ZONED ZONED(9,0) DIM(2)
(1) 999999999. 'F9F9F9F9F9F9F9F9F9'X
(2) 000000000. 'F0F0F0F0F0F0F0F0F0'X

BINARY BIN(9,0) -999999999. 'C4653601'X
ZONED ZONED(9,0) DIM(2)
(1) 999999999. 'F9F9F9F9F9F9F9F9F9'X
(2) -999999999. 'F9F9F9F9F9F9F9F9D9'X

1) How are you on PTFs?
2) If you run this little sample, do you get the same results? If so,
there must be something else going on and we might need to see some
source code.
--buck