Yes. This is from the wiki I maintain as my memory: ?If this symbol is undefined in an assembly and the KBASE macro is used, add the following macro invocation after the nearest LTORG.
KSHOW MF=(G,TRHEX) ?If after doing this, the offset to the TRHEX table is negative, add the following before the KSHOW macro invocation. ORG csectname+240 ORG IBM Mainframe Assembler List <[email protected]> wrote on 08/09/2012 10:02:07 AM: > From: Paul Gilmartin <[email protected]> > To: [email protected], > Date: 08/09/2012 10:07 AM > Subject: Re: Printing a return code > Sent by: IBM Mainframe Assembler List <[email protected]> > > On Aug 8, 2012, at 12:16, Kirk Talman wrote: > > > An old technique is to use a truncated table from the days when the amount > > of storage used mattered. This is from a macro expansion. Often placed > > at the end of the program just after the LTORG. > > > > TRHEX EQU *-X'F0' > > DC C'0123456789ABCDEF' > > > But beware if you code: > > TR 0(8,RX),TRHEX > > which might have addressability problems in a short CSECT. > > -- gil ----------------------------------------- The information contained in this communication (including any attachments hereto) is confidential and is intended solely for the personal and confidential use of the individual or entity to whom it is addressed. If the reader of this message is not the intended recipient or an agent responsible for delivering it to the intended recipient, you are hereby notified that you have received this communication in error and that any review, dissemination, copying, or unauthorized use of this information, or the taking of any action in reliance on the contents of this information is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail, and delete the original message. Thank you
