CICS transaction number from IDMS

Products

• IDMS

Issue/Introduction

Is it possible to tie the CICS task number to each transaction on the IDMS side?

Environment

Release: All supported releases.

Resolution

Here's some info about the fact that the CICS transaction numbered is stored in the ERE. But IDMS doesn't store this info anywhere after the fact to report on, so it would be necessary to access the ERE with an exit to retrieve/save this information somewhere.

There are two places in the ERE control block to find the CICS transaction number.

1. ERELID2 offset ERE+x'3C' but this is valid only while the ERE is active and once the ERE becomes inactive, ERELID2 is then set to zero.
2. In the SVC extension of the ERE extension of the ERE the CICS transaction number can be found at offset ERE+x'100' which is moved there by the IDMS SVC and used later by IDMS Performance Monitor statistics. To locate the SVC extension in the ERE use the following equation:
   
   ADDRESS OF FIRST ITEM = A(ERE) + ESESOXOF + ESESOXLN + SVXFIXHL
   
   or A(ERE)+X'90'+X'50'+x'04' = SVC extension Header length.

The layout of the CICS ERUS fields are listed below (ERE X'E8')

PMXCJBNM DS CL8 CICS REGION JOB NAME
PMXCTI   DS CL4 CICS TRANSACTION ID (PCTTI)
PMXCTETI DS CL4 CICS TERMINAL NAME (TCTTETI)
PMXCLID1 DS CL4 TPMON LREID1 - IDMSINTC TPNAME
PMXCLID2 DS F TPMON LREID2 - CICS TASK ID
PMXCTEOI DS CL8 CICS OPERATOR ID (TCTTEOI)