Operations › z/VSE Operations › z/VSE JCL › 2. Running CA IDMS/DB Audit

2. Running CA IDMS/DB Audit

Sample z/VSE JCL to audit and simulate fixing the database described by your subschema is shown in Figures 5.11a and 5.11b. A key to the variables (shown in bold) is shown in Figures 5.12a and 5.12b. Similar JCL is contained in TOOLJCL library member USAEXEC.

 // JOB DBAUDIT
 // OPTION LOG,PARTDUMP
 *
 *  ────────── VSAM WORK FILE'S FOR AUDIT DISK OPTION ───────
 *
 // DLBL   DBKHASH,'vsam.dbkhash',0,VSAM
 // EXTENT SYS014,volser,,,rel-trk-blk,amount
 // ASSGN  SYS014,DISK,VOL=volser,SHR
 // DLBL   DBKSAVE,'vsam.dbksave',0,VSAM
 // EXTENT SYS015,volser,,,rel-trk-blk,amount
 // ASSGN  SYS015,DISK,VOL=volser,SHR
 // EXEC  IDCAMS,SIZE=AUTO
 *
 *   See source library member USADEFN for IDCAMS control statements
 *
 /*
 *       ───────────── SORT FILES ─────────────────────
 *
 // DLBL SORTWK1,'SORT.WORK1',0,SD       SORT WORK #1
 // EXTENT SYS001,volser,,,rel-trk-blk,amount
 // ASSGN  SYS001,DISK,VOL=volser,SHR
 // DLBL SORTWK2,'SORT.WORK2',0,SD       SORT WORK #2
 // EXTENT SYS002,volser,,,rel-trk-blk,amount
 // ASSGN  SYS002,DISK,VOL=volser,SHR
 // DLBL SORTWK3,'SORT.WORK3',0,SD       SORT WORK #3
 // EXTENT SYS003,volser,,,rel-trk-blk,amount
 // ASSGN  SYS003,DISK,VOL=volser,SHR
 // DLBL SORTWK4,'SORT.WORK4',0,SD       SORT WORK #4
 // EXTENT SYS004,volser,,,rel-trk-blk,amount
 // ASSGN  SYS004,DISK,VOL=volser,SHR
 *
 *       ───────────── USER DATABASE FILES ──────────
 *
 // DLBL   dbfil01,'user.dbfil01',,DA    USER DATADASE FILE #01
 // EXTENT SYSnnn,volser
 // ASSGN  SYSnnn,DISK,VOL=volser,SHR
    .
    .
    .
 // DLBL   dbfilnn,'user.dbfilnn',,DA    USER DATADASE FILE #nn
 // EXTENT SYSnnn,volser
 // ASSGN  SYSnnn,DISK,VOL=volser,SHR
 *
 *  ────────── VSAM WORK FILE'S FOR AUDIT DISK OPTION ───────
 *
 // DLBL   DBKHASH,'vsam.dbkhash',0,VSAM
 // EXTENT SYS010,volser
 // ASSGN  SYS010,DISK,VOL=volser,SHR
 // DLBL   DBKSAVE,'vsam.dbksave',0,VSAM
 // EXTENT SYS011,volser
 // ASSGN  SYS011,DISK,VOL=volser,SHR
 *

Figure 5.11a: z/VSE JCL to Run CA IDMS/DB Audit

 *   ──────────── DBAUDIT WORK FILES ────────────────────
 *
 // ASSGN  SYS020,DISK,VOL=volser,SHR
 // DLBL   AFILE04,'AUDIT.extract',0,SD       EXTRACT OUTPUT FILE
 // EXTENT SYS020,volser,1,0,rel-trk-blk,amount
 // DLBL   AFILE05,'AUDIT.extract',0,SD       EXTRACT INPUT FILE
 // EXTENT SYS020,volser,1,0,rel-trk-blk,amount
 // ASSGN  SYS021,DISK,VOL=volser,SHR
 // DLBL   AFILE06,'AUDIT.workfile',0,SD      WORK OUTPUT FILE
 // EXTENT SYS021,volser,1,0,rel-trk-blk,amount
 // DLBL   AFILE07,'AUDIT.workfile',0,SD      WORK INPUT FILE
 // EXTENT SYS021,volser,1,0,rel-trk-blk,amount
 // ASSGN  SYS022,DISK,VOL=volser,SHR
 // DLBL   AFILE08,'AUDIT.indxwork',0,SD      INDEX WORK INPUT FILE
 // EXTENT SYS022,volser,1,0,rel-trk-blk,amount
 // DLBL   AFILE09,'AUDIT.indxwork',0,SD      INDEX WORK OUTPUT  FILE
 // EXTENT SYS022,volser,1,0,rel-trk-blk,amount
 // ASSGN  SYS023,DISK,VOL=volser,SHR
 // DLBL   AFILE10,'AUDIT.indxextr',0,SD      INDEX EXTR INPUT FILE
 // EXTENT SYS023,volser,1,0,rel-trk-blk,amount
 // DLBL   AFILE11,'AUDIT.indxextr',0,SD      INDEX EXTR OUTPUT  FILE
 // EXTENT SYS023,volser,1,0,rel-trk-blk,amount
 // ASSGN  SYS024,DISK,VOL=volser,SHR
 // DLBL   AFILE12,'AUDIT.dbkywork',0,SD      DBKEY INPUT FILE
 // EXTENT SYS024,volser,1,0,rel-trk-blk,amount
 // DLBL   AFILE13,'AUDIT.dbkywork',0,SD      DBKEY OUTPUT FILE
 // EXTENT SYS024,volser,1,0,rel-trk-blk,amount
 // ASSGN  SYSIPT,SYSRDR                       INPUT PARAMETER FILE
 // ASSGN  SYS006,SYSLST                       AUDIT REPORT
 // ASSGN  SYS007,uuu                          INTEGRITY ANALYSIS REPORT
 *
 *   ───────────────   LIBRARY DEF'S ────────────────
 *
 // DLBL TOOL,'tool.loadlib'
 // EXTENT ,volser
 // DLBL IDMS,'idms.loadlib'
 // EXTENT ,volser
 // LIBDEF PHASE,SEARCH=(TOOL.sublib,IDMS.sublib)
 *
 // DLBL SYSIDMS,'#SYSIPT',0,SD
 // EXEC   USADRVR,SIZE=(AUTO,#K),PARM='NOSPIE/'
 *
 *  R14.1 OPTIONAL SYSIDMS PARAMETERS
 *
 /*
   PROCESS,SUBSCHEMA=subschema-name,....
   AUDIT,.......
   FIX=SIMULATE,.........
 /&
 * $$ EOJ

Figure 5.11b: z/VSE JCL to Run CA IDMS/DB Audit