From: "Donald Blake"
Sent: Friday, April 13, 2018 7:00 AM
Let me try that again ...
WORK DS CL6
DS X , Slack byte
UNPK WORK(7),SDWACMPC(4)
NC WORK,=X'0F0F0F0F0F0F'
TR
From: "Robin Vowels"
Sent: Saturday, April 14, 2018 2:35 PM
Should be
OCWORK,='F0F0F0F0F0F0'
---
This email has been checked for viruses by Avast antivirus software.
https://www.avast.com/antivirus
Okay, I was getting some wires crossed over this in that I
conflated the special case of converting binary data to a hexadecimal character
string and the general case where binary data in (putatively) packed decima
format is
From: "Martin Ward"
Sent: Saturday, April 14, 2018 12:13 AM
On 13/04/18 15:02, Seymour J Metz wrote:
Unpacking x'0123' gives you x'F0F132'; the OI then gives you
x'F0F1F2'; what you want is x'F0F1F2F3'. Or with an UNNPK length of 4
you get x'F0F0F1F2'; still not what you
From: "Seymour J Metz"
Sent: Saturday, April 14, 2018 12:17 AM
Of course; the standard way to convert binary to hex is the UNPK/TR with a one
byte pad.
There is no such "standard" way.
The usual way is to use CVD.
---
This email has been checked for viruses by Avast
On 13/04/18 15:02, Seymour J Metz wrote:
Unpacking x'0123' gives you x'F0F132'; the OI then gives you
x'F0F1F2'; what you want is x'F0F1F2F3'. Or with an UNNPK length of 4
you get x'F0F0F1F2'; still not what you want.
Suppose the byte after the X'0123' is X'xy' (where x and y are
any hex
Unpacking x'0123' gives you x'F0F132'; the OI then gives you x'F0F1F2'; what
you want is x'F0F1F2F3'. Or with an UNNPK length of 4 you get x'F0F0F1F2';
still not what you want.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM
I lost half this thread, but wouldn't this whole deal be easier if you used a
mix of SRL and SRDL in an even odd pair to separate the nibbles and then either
a couple of OI's depending on the value of the nibble or a table "0-9A-F" to
index into? That way you'd get the hex value to look up.
Of course; the standard way to convert binary to hex is the UNPK/TR with a one
byte pad.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Assembler List on behalf
of Martin Ward