Re:how to get cobol ii dc cobol to access above-the-line storage?

Discussion created by ca.portal.admin on Aug 14, 2008
its been so long since i had to deal with this -

all of our DC COBOL program are loaded to to the non-xa non-reentrant program pool

they were link edited with AMODE ANY RMODE 24 (this does not seem right, but oh well)

one of these program is causing our pool 0 to go short

there are no funky assembler calls - getstg or any of that ilk ...

1) what can a "" normal"" cobol program do to use pool 0 storage - just allocation of working-storage?

2) what can I tell them to do to make this program access XA storage pools
- link edit as AMODE 31 RMODE ANY ?

the tasks that might cause this program to be invoked all appear to be location any


Chris Hoelscher
Senior IDMS & DB2 Database Administrator Humana Inc

The information transmitted is intended only for the person or entity to which it is addressed and may contain CONFIDENTIAL material. If you receive this material/information in error, please contact the sender and delete or destroy the material/information.
IDMS Public Discussion Forum


Re: how to get cobol ii dc cobol to access above-the-line storage?
"Hi Chris,

If you have FileAid or INSYNC on z/OS you can use it to change the RMODE =
and AMODE of any dc-cobol program, it is very simple and quick. You =
would not have to recompile everything to make use of XA storage. I =
didn't think there was any sites still using below the line storage for =
dc-cobol programs. How about it, anyone else still using 24 bit storage =
for dc-cobol programs?=20

Steve Harmeson