Thank Steve, I only mentioned it because Bill had discounted the idea and I was pleased with your confirmation it was possible.
:) > -----Original Message----- > From: IBM Mainframe Discussion List [mailto:[email protected]] > On Behalf Of Steve Thompson > Sent: Tuesday, February 07, 2017 5:42 PM > To: [email protected] > Subject: Re: Program now working, but why? > > Cave: > > Great minds.... By the time I saw your post, I had already sent mine. > > Also, someone else suggested a SLIP trap. I like that idea. But then I've been > an IPCS user for decades. And still use it for diagnosing problems today > (after > I put in the DD for ABEND-aid to ignore the ABEND....). > > > Regards, > Steve Thompson > > > On 02/07/2017 06:28 PM, Gibney, Dave wrote: > > I think I said this :) > > > >> -----Original Message----- > >> From: IBM Mainframe Discussion List [mailto:IBM- > [email protected]] > >> On Behalf Of Steve Thompson > >> Sent: Tuesday, February 07, 2017 2:53 PM > >> To: [email protected] > >> Subject: Re: Program now working, but why? > >> > >> On 02/07/2017 02:33 PM, Peter Ten Eyck wrote: > >>> The production assembler program is AM 24 and RM 24. > >>> > >>> The production COBOL program is AM 24 and RM 24. (runs, calls > >>> assembler program) > >>> > >>> The development COBOL program is AM ANY and RM 24. (does not run > >> (SOC4 > >>> in assembler program), does run with mentioned coding change, calls > >>> assembler program) > >>> > >>> -------------------------------------------------------------------- > >>> -- For IBM-MAIN subscribe / signoff / archive access instructions, > >>> send email to [email protected] with the message: INFO > >>> IBM-MAIN > >>> > >> I'm going to take an educated guess since I've been working at > >> solving things like this myself (on a gotta have it by the end of the > >> week basis -- no pressure). > >> > >> But in my case, I'm changing ALC programs to be RENT, AMODE any to > >> give VSCR (Virt Stor Constraint Relief) so all the COBOL programs can > >> go AMODE 31, RMODE 31. > >> > >> The COBOL 4.2 code can obtain buffers above the line (AMODE > >> any/31) while being RMODE 24. > >> > >> So, the data being passed (header record) could be passed from the > >> FD's data area, which would have it not-addressable by the ALC > >> program (the data is pointed to in the above the line buffer). > >> > >> However, the other records are moved to Working Storage which is > >> below the line. > >> > >> Or it could be vice-versa. > >> > >> But that is the kind of thing I would look for. > >> > >> Regards, > >> Steve Thompson > >> > >> --------------------------------------------------------------------- > >> - For IBM-MAIN subscribe / signoff / archive access instructions, > >> send email to [email protected] with the message: INFO > >> IBM-MAIN > > > > ---------------------------------------------------------------------- > > For IBM-MAIN subscribe / signoff / archive access instructions, send > > email to [email protected] with the message: INFO IBM-MAIN > > > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, send email to > [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
