Thanks everybody, the correct form of the UNPK was the key. Bobby Bauer Center for Information Technology National Institutes of Health Bethesda, MD 20892-5628 301-594-7474
-----Original Message----- From: IBM Mainframe Assembler List [mailto:[email protected]] On Behalf Of Dave Day Sent: Wednesday, August 08, 2012 9:21 AM To: [email protected] Subject: Re: Printing a return code Probably a gazillion different ways to do this, but I use an unpack followed by a translate. UNPK 0(9,RX),WORD(5) L R15,=a(HXCNVTBL) TR 0(8,RX),0(R15) MVI 8(RX),C' ' HXCNVTBL is a 256 byte table with the correct values set for the translate. You have to make sure the word you are using for the unpack doesn't end on a storage boundary or you 0c4. --Dave On 8/8/2012 8:07 AM, Bauer, Bobby (NIH/CIT) [E] wrote: > New to the list but been written assembler off and on for years. > I'm writing some code using the BCPii API. The return codes from the CALLs > are placed into storage in (to me) an unusual manner. In a full word that > looks like: > 00000301 > or > 00000F01 > > How can I make these printable? I'm using a SNAP to debug but getting the RC > into a WTO would be a LOT easier. Any ideas? > > Bobby Bauer > Center for Information Technology > National Institutes of Health > Bethesda, MD 20892-5628 > 301-594-7474 >
