---------------------------------<snip>----------------------------
Except that an UNPK would leave the field 0C, not C0, so this sounds like an old programmers tale to me.
---------------------------------<unsnip>---------------------------
No.
UNPK DSNAME(7),=PL4'0' (X'0000000C')

Would leave DSNAME = X'F0F0F0F0F0F0C0'

Because of the sign in the last nibble. Remember that PACK and UNPK both do the same thing to the last byte: reverse the two nibbles.

--
Rick
--
Remember that if you’re not the lead dog, the view never changes.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to