Report to determine which program or transaction is causing CICS storage shortage

Products

• Explore Performance Management for z/VSE

Issue/Introduction

Below are sample reports that can help detect the cause of SOS in CICS

 

Resolution

This will display all the transaction ids, transaction number, and, the maximum amount of DSA storage. Select the transactions during the half-hour (or less) interval before and after the SOS occurred.

Select by CICS jobname.

// EXEC EXPRPT,SIZE=EXPRPT
* may use expcfbk or tape as input
INPUT(DISKIN)
SELECT TRANID('5F'TCP,'5F'EXPC)
FROM mm/dd/yy hh:mm:ss
TO mm/dd/yy hh:mm:ss
FLASHBACK LIST DATETIME JOBNAME TRANID TRANNUM AND,
TRAN WORKSET AND TRAN LIFE
END
RUN

The variable TRAN WORKSET is the maximum amount of DSA allocated to the transaction at any point during its life. Look for transactions that have an unusually large TRAN WORKSET value and run a detailed report on these transactions using the report below.

// EXEC EXPRPT,SIZE=EXPRPT
INPUT(DISKIN)
SELECT JOBNAME(CICSPROD)
FROM mm/dd/yy hh:mm:ss
TO mm/dd/yy hh:mm:ss SELECT TRANID(tranid1,tranid2,...)
FLASHBACK DETAIL
END
RUN