BTS
(CICS® Business Transaction
Services) report.
Figure 1. Sample JCL CPAPCBTS - BTS Report//CPAPCBTS 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>
//*
//* External Work Data Sets
//CPAXW001 DD DISP=(NEW,DELETE),UNIT=SYSDA,SPACE=(CYL,(50,10))
//*
//* Sort Work Data Sets
//CPASWK01 DD DISP=(NEW,DELETE),UNIT=SYSDA,SPACE=(CYL,(20,5))
//CPASWK02 DD DISP=(NEW,DELETE),UNIT=SYSDA,SPACE=(CYL,(20,5))
//CPASWK03 DD DISP=(NEW,DELETE),UNIT=SYSDA,SPACE=(CYL,(20,5))
//CPASWK04 DD DISP=(NEW,DELETE),UNIT=SYSDA,SPACE=(CYL,(20,5))
//SYSOUT DD SYSOUT=*
//*
//* Commands to request CICS PA reports
//SYSIN DD *
CICSPA IN(SMFIN001),
APPLID(<applid1>),
BTS(OUTPUT(PBTS0001),
SELECT(PERF(EXCL(PRCSTYPE(' ')), <= this ensures only transactions
INCL(PRCSTYPE(*)))), <= using BTS are reported
EXTERNAL(CPAXW001))
/*