I think I said this :) > -----Original Message----- > From: IBM Mainframe Discussion List [mailto:[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
