On 10/28/2011 3:39 PM, Joe Aulph wrote:
The code is not-reentrant, I've done no GETMAIN's, has anyone ever ran into this sort of thing? Any help would be appreciated.
Your second sample doesn't show you loading R1 after the LOAD. If that's not it, then the most likely cause, in my experience, is that your program is doing something nasty, perhaps (re)using the SYSIN/SYSPRINT data sets, or overwriting storage, or shifting to an inappropriate addressing mode. In the case that your DD names are also used by the program, you could change ARGLIST to include substitute DD names for input and output DDs, to see if that changes anything.
As I mentioned yesterday, in assembler it is possible to call IDCAMS with a parameter list that enables an input and output exit, so you do not need to allocate unneeded SYSIN/SYSPRINT data sets. While it takes a little effort to set up the first time, it's nice to have in the long run.
Gerhard Postpischil Bradford, VT ---------------------------------------------------------------------- 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
