From 5802931c20acf241119a38b2754221c5769d1649 Mon Sep 17 00:00:00 2001
From: moshix <moshix@gmail.com>
Date: Tue, 7 Aug 2018 13:43:43 -0500
Subject: [PATCH] List catalog modifications from SMF

---
 catalogrep.jcl | 109 +++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 109 insertions(+)
 create mode 100644 catalogrep.jcl

diff --git a/catalogrep.jcl b/catalogrep.jcl
new file mode 100644
index 0000000..43f1548
--- /dev/null
+++ b/catalogrep.jcl
@@ -0,0 +1,109 @@
+//jobname JOB your job information
+//*
+/*JOBPARM LINES=9999
+//*
+//STEPØØ1Ø EXEC PGM=ICETOOL
+//STEPLIB DD DISP=SHR,DSN=only.if.needed
+//SYMNAMES DD DISP=SHR,DSN=local.symbol.library(SMFHEADR)
+// DD DISP=SHR,DSN=local.symbol.library(SMF65)
+// DD DISP=SHR,DSN=local.symbol.library(SMF66)
+//INPUT DD DISP=SHR,DSN=local.smf.data.set
+//SAVEFILE DD DISP=(NEW,DELETE),DSN=&&SAVEFILE,
+// UNIT=SYSALLDA,SPACE=(CYL,(5Ø,1Ø)),
+// DSORG=PS,RECFM=VBS,BLKSIZE=Ø
+//TOOLMSG DD SYSOUT=* ICETOOL MESSAGES
+//DFSMSG DD SYSOUT=* DFSORT MESSAGES
+//SYMNOUT DD SYSOUT=*
+//REPORT65 DD SYSOUT=*
+//REPORT66 DD SYSOUT=*
+//TOOLIN DD *
+ COPY FROM(INPUT) USING(CPY1)
+/*
+//CPY1CNTL DD *
+ OPTION SPANINC=RC4,VLSHRT
+ OUTFIL FNAMES=SAVEFILE,
+ INCLUDE=(SMFXRTY,EQ,65,OR,SMFXRTY,EQ,SMFØ66)
+ OUTFIL FNAMES=REPORT65,CONVERT,
+ INCLUDE=(SMFXRTY,EQ,SMFØ65),
+ OUTREC=(1:SMFXDTE,EDIT=(TTTT/TT/TT),12:SMFXTME,TM1,
+ EDIT=(TT:TT:TT),22:SMF65JNM,
+ 34:SMF65SUB,CHANGE=(6,C'IN',C'INSERT',
+ C'DE',C'DELETE',
+ C'UP',C'UPDATE'),
+ NOMATCH=(C'??????'),
+ 43:SMF65ENM,89:SMF65TYP,
+ CHANGE=(37,C'A',C'NON-VSAM DATA SET ',
+ C'B',C'GENERATION DATA GROUP BASE ',
+ C'C',C'CLUSTER ',
+ C'D',C'DATA SET ',
+ C'E',C'VSAM EXTENSION RECORD ',
+ C'F',C'FREE SPACE ',
+ C'G',C'ALTERNATE INDEX ',
+ C'H',C'ACTIVE GENERATION DATA SET (GDS) ',
+ C'I',C'INDEX ',
+ C'J',C'GDG EXTENSION RECORD ',
+ C'K',C'VSAM VOLUME RECORD (VVR) ',
+ C'L',C'LIBRARY CONTROL SYSTEM LIBRARY RECORD',
+ C'M',C'MASTER CATALOG ',
+ C'N',C'NON-VSAM HEADER RECORD ',
+ C'O',C'OBJECT ACCESS METHOD (OAM) NON-VSAM ',
+ C'P',C'PAGE SPACE ',
+ C'Q',C'VVR HEADER ',
+ C'R',C'PATH ',
+ C'T',C'TRUE NAME RECORD ',
+ C'U',C'USER CATALOG ',
+ C'V',C'VOLUME ',
+ C'W',C'LIBRARY CONTROL SYSTEM VOLUME ',
+ C'X',C'ALIAS ',
+ C'Y',C'UPGRADE ',
+ C'Z',C'VVR HEADER PRIMARY ',
+ X'ØØ',C'NORMAL NON-VSAM RECORD ',
+ X'Ø1',C'JES3 RECORD '),
+ NOMATCH=(C'?????? UNKNOWN RECORD TYPE ??????')),
+ HEADER2=(1:DATE,35:'OUR COMPANY NAME GOES HERE',79:TIME,/,
+ 39:'ICF CATALOG ACTVITY RPT',/,/,
+ 4:'DATE',14:'TIME',22:'JOBNAME',34:'ACTION',
+ 49:'DATA SET NAME')
+ OUTFIL FNAMES=REPORT66,CONVERT,
+ INCLUDE=(SMFXRTY,EQ,SMFØ66),
+ OUTREC=(1:SMFXDTE,EDIT=(TTTT/TT/TT),12:SMFXTME,TM1,
+ EDIT=(TT:TT:TT),22:SMF66JNM,
+ 34:SMF65SUB,CHANGE=(6,C'IN',C'INSERT',
+ C'DE',C'DELETE',
+ C'UP',C'UPDATE'),
+ NOMATCH=(C'??????'),
+ 43:SMF66ENM,89:SMF66TYP,
+ CHANGE=(37,C'A',C'NON-VSAM DATA SET ',
+ C'B',C'GENERATION DATA GROUP BASE ',
+ C'C',C'CLUSTER ',
+ C'D',C'DATA SET ',
+ C'E',C'VSAM EXTENSION RECORD ',
+ C'F',C'FREE SPACE ',
+ C'G',C'ALTERNATE INDEX ',
+ C'H',C'ACTIVE GENERATION DATA SET (GDS) ',
+ C'I',C'INDEX ',
+ C'J',C'GDG EXTENSION RECORD ',
+ C'K',C'VSAM VOLUME RECORD (VVR) ',
+ C'L',C'LIBRARY CONTROL SYSTEM LIBRARY RECORD',
+ C'M',C'MASTER CATALOG ',
+  C'N',C'NON-VSAM HEADER RECORD ',
+ C'O',C'OBJECT ACCESS METHOD (OAM) NON-VSAM ',
+ C'P',C'PAGE SPACE ',
+ C'Q',C'VVR HEADER ',
+ C'R',C'PATH ',
+ C'T',C'TRUE NAME RECORD ',
+ C'U',C'USER CATALOG ',
+ C'V',C'VOLUME ',
+ C'W',C'LIBRARY CONTROL SYSTEM VOLUME ',
+ C'X',C'ALIAS ',
+ C'Y',C'UPGRADE ',
+ C'Z',C'VVR HEADER PRIMARY ',
+ X'ØØ',C'NORMAL NON-VSAM RECORD ',
+ X'Ø1',C'JES3 RECORD '),
+ NOMATCH=(C'?????? UNKNOWN RECORD TYPE ??????')),
+ HEADER2=(1:DATE,35:'OUR COMPANY NAME GOES HERE',79:TIME,/,
+ 39:'ICF CATALOG ACTVITY RPT',/,/,
+ 4:'DATE',14:'TIME',22:'JOBNAME',34:'ACTION',
+ 49:'DATA SET NAME')
+/*
+//
\ No newline at end of file