IBM SC33-1683-02 User Manual

Page 389

Advertising
background image

GMMTRANID(name4 | *)

returns the transaction identifier of the CICS good morning transaction.

name4

The name of a 4-byte area that is to receive the CICS good morning
transaction id.

INITSTATUS(FIRSTINIT|INITCOMPLETE|SECONDINIT|THIRDINIT)

returns a value indicating the stage reached during CICS initialization.

FIRSTINIT

The first stage of CICS initialization.

INITCOMPLETE

CICS initialization is complete.

SECONDINIT

The second stage of CICS initialization. This stage corresponds to the
period when first phase PLTPI programs are run; that is those programs
in a PLT that are defined before the DFHDELIM statement.

THIRDINIT

The third stage of CICS initialization. This stage corresponds to the
period when second phase PLTPI programs are run; that is those
programs in a PLT that are defined after the DFHDELIM statement.

JOBNAME(name8 | *)

returns the 8-character MVS job name under which the CICS region is running.

name8

The name of a 8-byte area that is to receive the MVS job name.

OPREL(name2 | *)

returns the last 2 digits of the level number of the MVS element of OS/390,
under which the CICS region is running.

name2

The name of a 2-byte area that is to receive, as a half-word binary
value, the level number of the MVS element of OS/390. For example,
OS/390 Release 3 MVS is represented by 03.

Note: This field is supported for compatibility purposes only. The information is

derived from the last two numbers held in the MVS CVTPRODN field.
For example, CVTPRODN holds SP5.2.2 for MVS/ESA SP Version 5
Release 2.2 (in which case OPREL returns 22), and SP6.0.3 for OS/390
Release 3. You are recommended to use the OSLEVEL field for the full
version and release number of the OS/390 product.

OPSYS(name1 | *)

returns the type of operating system on which the CICS regions is running.

name1

The name of a 1-byte area that is to receive the hexadecimal character
of the operating system on which CICS is running. A value of “X”
represents MVS/ESA.

OSLEVEL(name4 | *)

is the version, release, and modification level of the OS/390 product on which
CICS is running.

state data access functions

Chapter 3. The user exit programming interface (XPI)

357

Advertising