Rational Developer for System z
Enterprise COBOL for z/OS, Version 4.1, Compiler and Runtime Migration Guide


Recommended runtime options for CICS applications

Table 1 describes the Language Environment runtime options that are highly recommended for existing COBOL CICS applications. On CICS, Language Environment has different default settings than under non-CICS (most of the Language Environment default settings are the same as the recommended COBOL settings).

For a complete list of Language Environment runtime options, see the Language Environment Programming Reference.

Table 1. Recommended Language Environment runtime options for COBOL CICS applications

Option

LanEnv default setting on CICS

Recommended
COBOL setting

Comments

ABTERMENC

ABEND ABEND Ensures you receive abend codes similar to those issued by VS COBOL II or OS/VS COBOL when an abend, program check, or severe error occurs.

ABTERMENC(ABEND) ensures that you get a system abend code; to get a system dump, see Obtaining a system dump or a CICS transaction dump.

ALL31

ON ON ALL31(ON) allows Language Environment to allocate its control blocks above the line. With ALL31(OFF), Language Environment increases its use of below the 16-MB line storage. For more information on the differences in Language Environment storage usage on CICS for ALL31(OFF) and ALL31(ON), see Virtual storage requirements.

ALL31(ON) is the recommended setting for COBOL applications. You can use ALL31(ON) if all of your VS COBOL II, IBM COBOL and Enterprise COBOL programs are AMODE 31, even if you are also running OS/VS COBOL programs in your CICS regions. (Load modules containing only OS/VS COBOL and assembler programs are AMODE 24 and are not affected by the setting of ALL31.)

Note: To run with ALL31(ON), every program in the Language Environment enclave must be AMODE 31, including assembler programs, unless the main program is AMODE 24. In this case, Language Environment will automatically switch to ALL31(OFF) for the run unit (enclave).

Use ALL31(OFF) if your load modules contain VS COBOL II, IBM COBOL, or Enterprise COBOL programs and assembler programs that require AMODE 24 and are in run units where the first program in the run unit was AMODE 31.

ANYHEAP
BELOWHEAP
HEAP
LIBSTACK
STACK

See Language Environment Installation and Customization. Default settings Language Environment provides these runtime options to help manage storage.

TERMTHDACT

TRACE

UADUMP or
UATRACE

Use TERMTHDACT(UADUMP), TERMTHDACT(UATRACE), or TERMTHDACT(UAONLY) to receive a transaction dump under Language Environment when the environment is terminating due to a severe error (for example, a program check or abend). Alternatively, use an abnormal termination exit. See Obtaining a system dump or a CICS transaction dump for details.

You might not want to use TERMTHDACT(DUMP), TERMTHDACT(TRACE), TERMTHDACT(UADUMP), or TERMTHDACT(UATRACE) in production, because these TERMTHDACT suboptions can cause a lot of time to be spent writing Language Environment dump data to transient queue data CESE when a transaction abends. If a traceback CEEDUMP is not needed by the application environment use TERMTHDACT(MSG) to eliminate the performance overhead of writing formatted CEEDUMPs to the CESE CICS transient data queue.

TRAP

ON ON TRAP specifies how Language Environment routines handle abends and program interrupts. In order for applications to run successfully, you must specify TRAP(ON).

Terms of use | Feedback

This information center is powered by Eclipse technology. (http://www.eclipse.org)