Didn't read your entire thing. You are operating on display numbers.
What your change will do is zero fill the number. On Tue, 24 Oct 2006 16:25:15 -0400 Anne Crabtree <[EMAIL PROTECTED]> wrote: :>I didn't "place" anything in it. I assumed the EDit command put something there. Is that wrong? :> :>>>> [EMAIL PROTECTED] 10/24/2006 4:21 PM >>> :>On Tue, 24 Oct 2006 16:11:26 -0400 Anne Crabtree <[EMAIL PROTECTED]> :>wrote: :> :>:>Working on the IEFACTRT routine and it has the following assembler statements for getting return code ready to print on hasp: :> :>:>CVD R0,RWORK GET ADDRESS OF COND FIELD :>:>MVC M1CC-1(L'M1CC+1),=X'402120202020' MOVE IN EDIT MASK :>:>ED M1CC-1(L'M1CC+1),RWORK+5 CONVERT RET CODE TO CHAR :> :>:>However, I want the return code to print as hexidecimal instead of decimal. I tried the following after these prior 3 statements: :> :>:>NC M1CC+1(4),=4X'0F' :>:>TR M1CC+1(4),=C'0123456789ABCDEF' :> :>:>(I don't understand exactly how this works but it is how it is coded in our old exit which used the SMF type 4 records). :> :>:>Why is it not translating the decimal to hexadecimal??? :> :>What did you place in M1CC? -- Binyamin Dissen <[EMAIL PROTECTED]> http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
