I changed to use the $JCT address in the XPL, I don't know if this will help you. I didn't look al that close at your code after I noticed the unloaded USINGS.
> -----Original Message----- > From: IBM Mainframe Discussion List > [mailto:[EMAIL PROTECTED] On Behalf Of Dave Kopischke > Sent: Friday, October 13, 2006 9:15 AM > To: [email protected] > Subject: Re: Jes2 Exit52 Again > > On Fri, 13 Oct 2006 00:10:41 -0700, Gibney, Dave > <[EMAIL PROTECTED]> wrote: > > > Sorry, typo, make that R7 not R5 > > > > Thanks for your help, I caught the typo. In my cutting & > pasting, I missed a couple lines from the IBM sample exit: > > LR R8,R0 Copy XPL address > L R7,X052AREA Get JRW address > > I added these back in right after $ENTRY, but it still > S0C4's. The R10 USING for the JCT is copied from the previous > EXIT2. The doc in the sample exit says R10 should point to > the JCT as in the old EXIT2 ??? Is that not true ??? Or more > probably I'm not using it correctly ??? ---------------------------------------------------------------------- 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
