1
0
mirror of https://github.com/moshix/mvs.git synced 2026-04-12 14:52:50 +00:00

List catalog modifications from SMF

This commit is contained in:
moshix
2018-08-07 13:43:43 -05:00
committed by GitHub
parent 0f5ee4dcc6
commit 5802931c20

109
catalogrep.jcl Normal file
View File

@@ -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')
/*
//