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:[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
