You need two additional bytes after ONEBYTE and TWOBYTE,
so that UNPK can do its nibble switching thing there.

ONEBYTE  DC    X'C4'
         DS    C
TWOBYTE  DS    CL2
         DS    C
...
         UNPK  TWOBYTE(3),ONEBYTE(2)
         TR    TWOBYTE,HEXTAB-C'0'
...
HEXTAB   DC    C'0123456789ABCDEF'

I hope, I didn't miss anything.

Kind regards

Bernd


Am 12.09.2016 um 17:33 schrieb Bill Ashton:

Hello my friends, this is a simple assembler question, but for some reason
is not clicking for me this morning.

How do I take a 1-byte character field containing a Hex value like x'C4'
and turn it into a 2-byte character field containing C4 (x'C3F4')? I know
how to turn it into a decimal value and Edit and all that, but I am
blanking on this simple conversion.

Thanks for your patience and your solution!


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to