You can map record type 82 by using the CSFSMF82 macro.
Each of these events causes ICSF to record information in a separate subtype in the SMF record.
⁄⁄CSFSMFJ JOB <JOB CARD PARAMETERS>
⁄⁄********************************************************************
⁄⁄* LICENSED MATERIALS - PROPERTY OF IBM *
⁄⁄* (C) COPYRIGHT IBM CORP. 2002 *
⁄⁄* *
⁄⁄* This JCL reads Type 82 SMF records and formats them in a report.*
⁄⁄* *
⁄⁄* CAUTION: This is neither a JCL procedure nor a complete JOB. *
⁄⁄* Before using this JOB step, you will have to make the following *
⁄⁄* modifications: *
⁄⁄* *
⁄⁄* 1) Add the job parameters to meet your system requirements. *
⁄⁄* 2) Change the DUMPIN DSN=hlq.smfdata.input to be the name of *
⁄⁄* the dataset where you currently have SMF data being *
⁄⁄* recorded. *
⁄⁄* 3) Change the STEPLIB VOL=SER=ttttt1 and VOL=SER=ttttt2 to *
⁄⁄* be the volumes where these sort datasets reside. *
⁄⁄* 4) Change the SYSPROC DSN=hlq.rexx.dataset to be the name of *
⁄⁄* the dataset where you have placed the CSFSMFR REXX sample. *
⁄⁄* *
⁄⁄* Prior to executing this job, you need to terminate SMF *
⁄⁄* recording of the currently active dump dataset for allow the *
⁄⁄* unload of SMF records. *
⁄⁄* *
⁄⁄********************************************************************
⁄⁄*
⁄⁄*------------------------------------------------------------------*
⁄⁄* UNLOAD SMF 82 RECORDS FROM VSAM TO VBS *
⁄⁄*------------------------------------------------------------------*
⁄⁄SMFDMP EXEC PGM=IFASMFDP
⁄⁄DUMPIN DD DISP=SHR,DSN=hlq.smfdata.input
⁄⁄DUMPOUT DD DISP=(NEW,PASS),DSN=&&VBS,UNIT=3390,
⁄⁄ SPACE=(CYL,(1,1)),DCB=(LRECL=32760,RECFM=VBS,BLKSIZE=4096)
⁄⁄SYSPRINT DD SYSOUT=*
⁄⁄SYSIN DD *
INDD(DUMPIN,OPTIONS(DUMP))
OUTDD(DUMPOUT,TYPE(82))
⁄⁄*
⁄⁄*------------------------------------------------------------------*
⁄⁄* COPY VBS TO SHORTER VB AND SORT ON DATE⁄TIME *
⁄⁄*------------------------------------------------------------------*
⁄⁄COPYSORT EXEC PGM=SORT,REGION=6000K
⁄⁄STEPLIB DD DISP=SHR,DSN=SYS1.SORTLPA,VOL=SER=ttttt1,UNIT=3390
⁄⁄ DD DISP=SHR,DSN=SYS1.SICELINK,VOL=SER=ttttt2,UNIT=3390
⁄⁄SYSOUT DD SYSOUT=*
⁄⁄SORTWK01 DD UNIT=3390,SPACE=(CYL,10)
⁄⁄SORTIN DD DISP=(OLD,DELETE),DSN=&&VBS
⁄⁄SORTOUT DD DISP=(NEW,PASS),DSN=&&VB,UNIT=3390,
⁄⁄ SPACE=(CYL,(1,1)),DCB=(LRECL=3000,RECFM=VB)
⁄⁄SYSIN DD *
SORT FIELDS=(11,4,A,7,4,A),FORMAT=BI,SIZE=E4000
⁄⁄*
⁄⁄*------------------------------------------------------------------*
⁄⁄* FORMAT TYPE 82 RECORDS *
⁄⁄*------------------------------------------------------------------*
⁄⁄FMT EXEC PGM=IKJEFT01,REGION=5128K,DYNAMNBR=100
⁄⁄SYSPROC DD DISP=SHR,DSN=hlq.rexx.dataset
⁄⁄SYSTSPRT DD SYSOUT=*
⁄⁄INDD DD DISP=(OLD,DELETE),DSN=&&VB
⁄⁄OUTDD DD SYSOUT=*
⁄⁄SYSTSIN DD *
%CSFSMFR