On Fri, 24 Jun 2005 12:20:19 -0400, Richard Verville wrote: >Each programs sets its identifier flag in the table. Richard > >Donald Pagdin wrote: >> On Fri, 24 Jun 2005 11:15:58 -0400, Richard Verville wrote: >>>>I have this routine that is notreentrant and needs to be OS loaded >>>> (instead of CICS loaded) and while using storage protection in CICS >>>> it has to be in key9 because the program updating it, is running key9. >>>> Right now the key9 program loads it and it gets in Key 8, fetch >>>> protected storage. So there other programs reading it gets a fetch >>>> protection exception. >> >> As others are wondering, Why non-reentrant? How can you update a >> program, or is it a table? What does it do in batch? >>
Oh! So it really isn't a program, per se, it is a data table that you are loading as if it was a non-reentrant program in order to have some of the initialization work done ahead of time. The solution is simple: Don't do it that way. :) Craft a GETMAIN and storage initialization routine to replace the LOAD routine that you have now, all should be well. Otherwise you are just trying to find the appropriate wrench to hammer in the right-sized screw. -- Tom Schmidt Madison, WI ---------------------------------------------------------------------- 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
