IMS Connectivity in an On Demand Environment: A Practical Guide to IMS Connectivity

Chapter 11. IMS Connect Extensions 175

Example 11-11 Recorder trace print utility output

ID=A0,160, TOKEN=00000001

ITOC RECORD: LEN=0056 ,APAR=0001 ,ID=IT ,CONTENT=C0

SMF: LEN=0052 ,RECORD TYPE=77 ,TIME=13313877 ,SEQ#=0105168F

UOW: CLNT=CLIENT01 ,RCVT=BD2D0A4811A8A120 ,ENQT=BD2D0A4811AA4C80

DS 1ST MSG DQT=0000000000000000, DS CLR DQT=0000000000000000

ERR TIME=0000000000000000, # MSG XMIT=0000, # MSG RCVD=0000

TIME=BD2D163D8115DF05, LSN=0000000000000001

ID=A1,161, TOKEN=00000001

ITOC REC: LEN=0010 ,APAR=0001 ,CON=80 ,CON1=02 ,TYPE=ITOC / RC / IPB

REMOTE CLIENT IRM: LLLL=X'00000093'

DUMP OF IRM HEADER FOR LENGTH=X'0050'

+0000 00500000 2A53414D 504C452A 00000000 *.&.....(&<......*

+0010 00000000 C3D3C9C5 D5E3F0F1 00400140 *....CLIENT01. . *

+0020 C9E5E3D5 D6404040 C9D4E2C7 40404040 *IVTNO IMSG *

+0030 40404040 40404040 40404040 40404040 * *

+0040 40404040 40404040 5C5C5C5C 5C5C5C5C * *********

DUMP OF CLIENT MSG SEGMENT FOR LENGTH=X'003B'

+0000 003B0000 C9E5E3D5 D6404040 4040C4C9 *....IVTNO DI*

+0010 E2D7D3C1 E840D3C1 E2E3F140 40404040 *SPLAY LAST1 *

+0020 40404040 40404040 40404040 40404040 * *

+0030 40404040 40404040 404040 * *

DUMP OF CLIENT MSG SEGMENT FOR LENGTH=X'0004'

+0000 00040000 *.... *

The recorder trace print utility formats the IMS Connect trace, providing records to simplify

the analysis.

11.2.6 Active session utility

IMS Connect Extensions provides the active session utility by APAR PQ97669. IMS Connect

Extensions V1R2 further enhances this by providing an online ISPF-based viewer of active

sessions. Refer to 11.8, “Highlights of IMS Connect Extensions Version 1 Release 2” on

page 216.

The IMS Connect Extensions active session utility analyzes an IMS Connect Extensions

Journal data set to determine the status of all active sessions. This is useful during problem

determination of sessions that have been active for a long period of time.

A session is active after a Read Prepare event for a port/socket has occurred and before the

trigger event following a close socket event has occurred. Sessions that are using persistent

sockets will be active following the trigger event.

The IMS Connect Extensions active session utility accepts input from one Active Journal or

Archive Journal data set. You have to provide to the utility the journals produced since the

beginning of the session.

It produces a report output of formatted IMS Connect Extensions event records useful in

identifying active sessions as part of problem determination. The report helps to identify the

socket and the event key of the active transaction.

Example 11-12 on page 176 shows a sample JCL to use the active session utility.

176 IMS Connectivity in an On Demand Environment: A Practical Guide to IMS Connectivity

Example 11-12 JCL to run active session utility

//userid JOB (ACCOUNT),'NAME'

//*

//* DESCRIPTION: IMS CONNECT EXTENSIONS ACTIVE SESSION UTILITY

//*

//STEP01 EXEC PGM=FUNEXEC,PARM='CEXJASKT,Y,U',REGION=0M

//STEPLIB DD DSN=FUN.V1R1M0.SFUNLINK,DISP=SHR

// DD DSN=CEX.V1R1M0.SCEXLINK,DISP=SHR

//SYSUDUMP DD SYSOUT=*

//MSGOUT DD SYSOUT=*

//EVNTIN DD DISP=SHR,DSN=journal.data.set

CEXJASKT has the following parameters:

 Help indicator

Specifies whether help description lines are to be printed. The values are:

– Y: Help description lines are printed in the report.

– N: Help description lines are suppressed in the report.

 Case indicator

Specifies whether the report lines are printed in uppercase or lowercase. The values are:

– L: Report is printed in lowercase.

– U: Report is printed in mixed case.

For an example, we send a commit mode 1 transaction that is not sending the ACK after the

IMS response. Example 11-13 shows the report obtained from the active session utility.

Example 11-13 Active session utility report

IMS CONNECT EXTENSION ACTIVE SESSION REPORT VERSION 01:01:001

FIRST RECORD DATE=2005.06.17, TIME=23.49.41.713152

EOF ON INPUT DATASET

LIST OF ACTIVE SESSIONS

PORT Ñ= 7003, SOCKET Ñ= 9, KEY=BD2D5EEFF42C9200

EVENT HISTORY - KEY EVENTS PROCESSED FOR THIS MESSAGE

READ PREPARE SOCKET

READ EXIT RETURNED

MESSAGE SENT TO OTMA

MESSAGE RECEIVED FROM OTMA

WRITE EXIT RETURNED

WRITE SOCKET

STATE FLAGS AND STATUS INFORMATION AFTER RETURN FROM READ EXIT

SVT FLAG=14

ORIGINAL DESTID IS VALID

UNSUPPORTED EXIT

SVT SYNC FLAG=21

COMMIT MODE 1

SYNC LEVEL=1 (CONFIRM)

SVT SOCKET FLAG=00

TRANSACTION SOCKET

EVENT RECORD 62 READ EXIT RETURN DATA

EXIT RC=00000000, EXIT REASON=00000000, TXNAME=PART , UID=

EXIT NAME=HWSSMPL0, OLTERM= , CLIENT ID=22653060

ORIGINAL DSID=IMSG , TARGET DISID=