ca.portal.admin

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

Discussion created by ca.portal.admin on Aug 14, 2008
Latest reply on Aug 14, 2008 by ca.portal.admin
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

thanks,

Chris Hoelscher
Senior IDMS & DB2 Database Administrator
Humana Inc
502-476-2538
choelscher@humana.com



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
IDMS-L@LISTSERV.IUASSN.COM
SMTP
IDMS-L@LISTSERV.IUASSN.COM
IDMS-L@LISTSERV.IUASSN.COM
SMTP








Normal

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

Recompile programs ensuring that at least the parms in bold are in
effect

PARM.COB='NOFDU,RES,RENT,NOADV,NOFSRT,NOTEST,LIST',
PARM.LKED=(LIST,XREF,LET,MAP,RENT,'AMODE=31','RMODE=ANY')

And:
1. change SYSGEN as appropriate
2. Double check with your systems programmer to ensure COBOL II
libraries are concatenated


Dan Miley
Lockheed Martin

Outcomes