The i will (almost) always produce an "F" for positive. z will (almost)
always produce "C" for positive. I used to use this method to determine
whether a file was generated on AS400 or 370. Either one accepts the
other. If you have a file on i that was created on z, it'll have C's in
the zone of decimal fields. When the record is updated by a program on
i, the zone will be rewritten to F. Used to see this all the time when
we were moving files back and forth between systems with SNADS.
The EBCDIC representation on either system of characters 0-9 is xF0-xF9.
In an unpacked decimal field, either system will fill the field with the
EBCDIC representation of each of the characters in the value and then
set the sign on the last (rightmost, lowest order) character.
-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of McKown, John
Sent: Wednesday, January 14, 2009 2:34 PM
To: Midrange Systems Technical Discussion
Subject: RE: Changing a zoned decimal value with SQL
-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Vern Hamberg
Sent: Wednesday, January 14, 2009 2:18 PM
To: Midrange Systems Technical Discussion
Subject: Re: Changing a zoned decimal value with SQL
IIRC F is not the only valid indicator of positive values in a zoned
field - it is really a single bit that says what the sign is
- I don't
remember which it is
I think that the "i" is the same as the "z". On the "z", a sign nybble
of A, C (preferred), E, or F indicate plus, whereas B or D (preferred)
indicate negative. The (preferred) means that these are the sign nybbles
generated by the hardware instructions.
--
John McKown
Systems Engineer IV
IT
Administrative Services Group
HealthMarkets(r)
Administrative Services Group
9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * (817)-961-6183 cell john.mckown@xxxxxxxxxxxxxxxxx
* www.HealthMarkets.com
Confidentiality Notice: This e-mail message, including any attachments,
is for the sole use of the intended recipient(s) and may contain
confidential or proprietary information. Any unauthorized review, use,
disclosure or distribution is prohibited. If you are not the intended
recipient, please contact the sender by reply e-mail and destroy all
copies of the original message.
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at
http://archive.midrange.com/midrange-l.
midrange.com
