Well, you don't ever load R5 or R8 which you have in the USINGs. I found I couldn't trust R10 to point to $JCT either.
> -----Original Message----- > From: IBM Mainframe Discussion List > [mailto:[EMAIL PROTECTED] On Behalf Of Kopischke, David G. > Sent: Thursday, October 12, 2006 7:25 PM > To: [email protected] > Subject: Jes2 Exit52 Again > > Greetings again, > I'm having a hard time getting this exit to work. My > assembler skills are pretty much non-existent. I'm trying > convert an old JES2 EXIT2 to work as as an EXIT52. Following > the manuals, IBM's sample exit and the old exit, I put this > together. I yanked all the doc so it would post without being > too terribly long. It abends S0C4 whenever it is executed. I > don't see where it's wandering off, but that's no surprise. > If anyone can spare some time to help, I'd appreciate it.... again. > > I originally had the load of register 5 wrong, so it > errored off. It was working up until the point where it > formatted and inserted a jobcard though. > I'm guessing there's something wrong with the address in R5. > More likely the way I'm using it. The manuals say X052JXWR is > supposed to point to an area to be used to format an inserted > card. I also backed it off to look like the old exit and set > R5 to the address starting at byte 8 of R1, but that S0C4's too. > > Thanks again, > ---------------------------------------------------------------------- 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
