---------------------------------<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