> -----Original Message-----
> From: IBM Mainframe Discussion List On Behalf Of Ted MacNEIL
>
> A former colleague of mine asked me how does he convert his
> CICS/COBOL from 24-bit.
> He is an LE shop, but most of the programmes are still 24-bit.
>
> I tried to help, but not having written a COBOL programme
> since 1981, I'm not exactly an expert.
>
> I told him the obvious:
> Recompile/link with RMODE/AMODE
Current COBOL compilers generate 31-bit capable code by default (in
fact, I don't believe you can change that). To cause data areas to be
allocated above the line, specify compiler option DATA(31) and
recompile. The Binder (linkage editor) should automagically assign
AMODE(31) and RMODE(ANY).
> Under CICS: ALL31 ON
Also check the HEAP and STACK parameters (and possibly a few others; see
the LE Customization manual), for ANY vs BELOW.
> Is there anything else? It's been so long since I've had to
> worry about this that I cannot remember anything else!
In the CICS resource definitions, AFTER everything has been
appropriately recompiled, ensure the TRANSaction definitions specify
TASKDATALOC(ANY) and the PROGram definitions specify DATALOC(ANY). If
using Program Autoinstall, might have to rework the installation exit to
set DATALOC(ANY).
> Also, ISTR there is a way to dump the current optiond to see
> what the current LE options are:
>
> PARM='.../something'
In CICS, with a reasonably current version of LE, there exists the CLER
transaction (supplied by LE) which displays everything that would be
listed with the LE RPTOPTS(ON) set. The CLER transaction also allows to
change the TRAP, RPTOPTS, RPTSTG, ALL31, CBLPSHPOP and TERMTHDACT
options.
> Any suggestions/places to look (up)?
COBOL, CICS and LE manuals. :-)
BTW, I noticed I did not have to "override" your address when I just hit
"Reply"; it filled-in the IBM-MAIN address. That means "you fixed it",
whatever "it" was.
-jc-
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
