In SYSVIEW Performance Management, users may attempt to filter CICS Performance reports using the PCS_MPCNAME (Program Name for Program Link) field. However, the reporting engine does not currently support PCS_MPCNAME as a valid identifier for the SELECT statement. This results in the report either ignoring the filter or displaying unexpected program associations.
The field PCS_MPCNAME is available for display in reports but is not supported as a filtering criterion within the COPY GSVSMF27 or similar reporting tasks.
Because SYSVIEW reporting does not support direct filtering on PCS_MPCNAME, use the following procedure to export the data to a CSV file and apply filters in an external tool like Microsoft Excel.
LOADLIB: Your SYSVIEW .CNM4BLOD library.SAMPLIB: Your SYSVIEW .CNM4RSAM library.CTRANLOG: The Logstream containing your CICS transaction logs.OUTPTCSV: The destination data set for the CSV output.PCS_MPCNAME column in Excel to isolate the required program link data.//* <<<Set to SYSVIEW Load Library>>>// SET LOADLIB='EXAMPLE.SYSVIEW.CNM4BLOD'//* <<<Set to SYSVIEW Samp Library>>>// SET SAMPLIB='EXAMPLE.SYSVIEW.CNM4RSAM'//* <<<Set to CICS Transaction Log Stream>>>// SET CTRANLOG='YOUR.LOG.STREAM.DS'//* <<<Set to Desired Output Dataset>>>// SET OUTPTCSV='OUTPUT.CSV'//*//DELCSV EXEC PGM=IEFBR14//DFILE DD DSN=&OUTPTCSV,// DISP=(MOD,DELETE,DELETE),// SPACE=(TRK,0),// UNIT=SYSALLDA//*//REPORT EXEC PGM=XPFRMAIN,REGION=0M//STEPLIB DD DISP=SHR,DSN=&LOADLIB//ERPTPRM DD DISP=SHR,DSN=&SAMPLIB//SYSUDUMP DD SYSOUT=*//SYSPRINT DD DISP=(NEW,PASS,DELETE), // DCB=(RECFM=FB,LRECL=1024), // SPACE=(CYL,(10,5)) //*//TAPSMF DD DISP=SHR,DSN=&CTRANLOG,// SUBSYS=(LOGR,GSVXLGEX,// 'FROM=OLDEST,TO=YOUNGEST,LOCAL',// 'STATS,EXPAND,FORWARD,NORDW'),// DCB=(DSORG=PS,RECFM=VB,LRECL=32756,BLKSIZE=32760)//SYSIN DD * COPY GSVSMF27 OPTION(SUMMARY=NO) SELECT JOBNAME(DFHCICD1) EACH 1 RECORD DEFINE ID KEY JOBNAME ' ' TRANID ' ' TRANNUM ' ' USERID
TAB ENDDATETIME KEY PROGID
TAB2 PCS_MPCNAME , CICS PERF TRAN PCS_MPCUSE
END RUN /*//* //PARSE EXEC PGM=IKJEFT01 //SYSEXEC DD DISP=SHR,DSN=&SAMPLIB //SYSTSPRT DD SYSOUT=* //RWO DD SYSOUT=*,DCB=(RECFM=FB,LRECL=1024) //CSVIN DD DSN=*.REPORT.SYSPRINT,DISP=(OLD,DELETE) //CSVOUT DD DSN=&OUTPTCSV,// DISP=(NEW,CATLG,DELETE), // DCB=(RECFM=FB,LRECL=1024), // UNIT=SYSALLDA, // SPACE=(CYL,(10,5)) //SYSTSIN DD * CSVGEN CSVIN CSVOUT VS=, DS=. /* //