Performance
Alerts Summary extract. This example uses a Form to generate the FIELDS
operand. SEVERITY(ELIGIBLE) indicates that only transactions that
are eligible for alert processing are reported. Eligible transactions
are those that have field values that match the resource values defined
in the alert definition. All eligible transactions with and without
alerts are reported.
Figure 1. Sample JCL CPAPAXTS - Performance Alerts Summary extract//CPAPAXTS JOB ,CLASS=A,NOTIFY=&SYSUID
//CICSPA EXEC PGM=CPAMAIN,REGION=4M,PARM=NOSTAE
//STEPLIB DD DSN=CPA.V3R2M0.SCPALINK,DISP=SHR
//SYSPRINT DD SYSOUT=*
//* HDB Register
//CPAHDBRG DD DISP=SHR,DSN=<CICSPA.HDB.Register>
//* SMF Input Files
//SMFIN001 DD DISP=SHR,DSN=<SMF.Input.DSN.applid1>
//* Extract Data Sets
//CPAOEX01 DD DSN=<user.extract.output.file>,
// DISP=(NEW,CATLG),UNIT=SYSDA,SPACE=(CYL,(10,10))
//* External Work Data Sets
//CPAXW001 DD DSN=&&CPAXW001,DISP=(NEW,DELETE),
// UNIT=SYSDA,SPACE=(CYL,(10,10))
//CPAXW002 DD DSN=&&CPAXW002,DISP=(NEW,DELETE),
// UNIT=SYSDA,SPACE=(CYL,(10,10))
//CPAXW003 DD DSN=&&CPAXW003,DISP=(NEW,DELETE),
// UNIT=SYSDA,SPACE=(CYL,(10,10))
//* Sort Work Data Sets
//CPASWK01 DD DSN=&&CPASWK01,DISP=(NEW,DELETE),
// UNIT=SYSDA,SPACE=(CYL,(10,10))
//CPASWK02 DD DSN=&&CPASWK02,DISP=(NEW,DELETE),
// UNIT=SYSDA,SPACE=(CYL,(10,10))
//CPASWK03 DD DSN=&&CPASWK03,DISP=(NEW,DELETE),
// UNIT=SYSDA,SPACE=(CYL,(10,10))
//CPASWK04 DD DSN=&&CPASWK04,DISP=(NEW,DELETE),
// UNIT=SYSDA,SPACE=(CYL,(10,10))
//* Command Input
//SYSIN DD *
CICSPA IN(SMFIN001),
APPLID(<applid1>),
SUMMARY(OUTPUT(EXPT0001),
DDNAME(CPAOEX01),
DELIMIT(';'),
LABELS,
EXTERNAL(CPAXW001),
INTERVAL(00:01:00),
ALERTDEF(<alertdefinitionname>),
SEVERITY(ELIGIBLE),
FIELDS(TRAN(ASCEND),
TASKCNT,
RESPONSE(AVE),
RESPONSE(SEV(CRITICAL,PERCENT)),
RESPONSE(SEV(WARNING,PERCENT)),
RESPONSE(SEV(INFO,PERCENT)),
DISPATCH(TIME(AVE)),
CPU(TIME(AVE)),
CPU(TIME(SEV(CRITICAL,PERCENT))),
CPU(TIME(SEV(WARNING,PERCENT))),
CPU(TIME(SEV(INFO,PERCENT))),
SUSPEND(TIME(AVE)),
SUSPEND(TIME(SEV(CRITICAL,COUNT))),
SUSPEND(TIME(SEV(WARNING,COUNT))),
SUSPEND(TIME(SEV(INFO,COUNT))),
SUSPEND(COUNT(SEV(CRITICAL,PERCENT))),
SUSPEND(COUNT(SEV(WARNING,PERCENT))),
SUSPEND(COUNT(SEV(INFO,PERCENT))),
DISPWAIT(TIME(AVE)),
FCWAIT(TIME(AVE)),
FCAMCT(AVE),
IRWAIT(TIME(AVE)),
SC24UHWM(AVE),
SC31UHWM(AVE)))
/*