Figure 1. Sample JCL
CPAPLSPC - Program Control//CPAPLSPC JOB ,CLASS=A,NOTIFY=&SYSUID
//CICSPA EXEC PGM=CPAMAIN,REGION=8M,PARM=NOSTAE
//STEPLIB DD DSN=CICSPA.V3R2M0.SCPALINK,DISP=SHR
//SYSPRINT DD SYSOUT=*
//*
//* SMF Input Files
//SMFIN001 DD DISP=SHR,DSN=<SMF.Input.DSN.applid1>
//*
//* Commands to request CICS PA reports
//SYSIN DD *
CICSPA IN(SMFIN001),
APPLID(<applid1>),
SELECT(PERFORMANCE(INCLUDE(PCLOADTM(TIME(1-999999999))))),
LIST(OUTPUT(PLST0001),
FIELDS(TRAN, Transaction identifier
PROGRAM, Program name
PCLINK, Program LINK requests
PCLOAD, Program LOAD requests
PCLOADTM(TIME), Program Library wait time
PCSTGHWM, Program Storage HWM above and below 16MB
PCXCTL, Program XCTL requests
PC24BHWM, Program Storage HWM below 16MB
PC24CHWM, Program Storage (CDSA) HWM below 16MB
PC24RHWM, Program Storage (RDSA) HWM below 16MB
PC24SHWM, Program Storage (SDSA) HWM below 16MB
PC31AHWM, Program Storage HWM above 16MB
PC31CHWM, Program Storage (ECDSA) HWM above 16MB
PC31RHWM, Program Storage (ERDSA) HWM above 16MB
PC31SHWM)), Program Storage (ESDSA) HWM above 16MB
SUMMARY(OUTPUT(PSUM0001),
FIELDS(TRAN, Transaction identifier
TASKCNT, Total Task count
PCLINK(AVE), Program LINK requests
PCLOAD(AVE), Program LOAD requests
PCLOADTM(TIME(AVE)), Program Library wait time
PCSTGHWM(AVE), Program Storage HWM above and below 16MB
* PCXCTL(AVE), Program XCTL requests
PC24BHWM(AVE), Program Storage HWM below 16MB
PC24CHWM(AVE), Program Storage (CDSA) HWM below 16MB
PC24RHWM(AVE), Program Storage (RDSA) HWM below 16MB
PC24SHWM(AVE), Program Storage (SDSA) HWM below 16MB
PC31AHWM(AVE), Program Storage HWM above 16MB
PC31CHWM(AVE), Program Storage (ECDSA) HWM above 16MB
PC31RHWM(AVE), Program Storage (ERDSA) HWM above 16MB
PC31SHWM(AVE))) Program Storage (ESDSA) HWM above 16MB
/*