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
