Sample z/OS or JCL to audit and simulate fixing the database described by your subschema is shown in Figures 5.9a and 5.9b. A key to the variables (shown in bold) and file use is shown in Figures 5.10a and 5.10b. Similar JCL is contained in Target or Distribution source library member USAEXEC.
//* //* THIS JCL IS FOR AUDIT AND SIMULATED FIXING //* //DBAUDIT EXEC PGM=USADRVR, // REGION=#K, // PARM='NOSPIE/' //STEPLIB DD DSN=your.loadlib, // DISP=SHR // DD DSN=idms.loadlib, // DISP=SHR //SORTLIB DD DSN=sort.loadlib, // DISP=SHR //SORTWK01 DD UNIT=disk, // SPACE=(CYL,(ps,ss)) //SORTWK02 DD UNIT=disk, // SPACE=(CYL,(ps,ss)) //SORTWK03 DD UNIT=disk, // SPACE=(CYL,(ps,ss)) //SORTWK04 DD UNIT=disk, // SPACE=(CYL,(ps,ss)) //* //dbfil01 DD DSN=user.dbfil01, // DISP=SHR // . // . // . //dbfilnn DD DSN=user.dbfilnn, // DISP=SHR
Figure 5.9a: z/OS JCL to Run CA IDMS/DB Audit
//*GENERAL FILES NEEDED FOR ALL RUNS.
//*
//EXTRACTS DD DSN=dbaudit.extract,
// DISP=OLD
//WORKFILE DD DSN=dbaudit.workfile,
// DISP=OLD
//*
//sortmsg DD SYSOUT=a
//SYSLST DD SYSOUT=a AUDIT REPORT
//SYSOUT DD SYSOUT=a INTEGRITY ANALYSIS REPORT
//SNAPIT DD SYSOUT=a
//SYSUDUMP DD SYSOUT=a
//*
//*FILES NEEDED FOR AUDITING OR FIXING
//*INTEGRATED INDEX SETS.
//*
//DBKYWORK DD DSN=dbaudit.dbkywork,
// DISP=OLD
//INDXEXTR DD DSN=dbaudit.indxextr,
// DISP=OLD
//INDXWORK DD DSN=dbaudit.indxwork,
// DISP=OLD
//*
//*FILES NEEDED ONLY IF DISK OPTION IS SPECIFIED
//*AND VSAM IS CHOSEN
//*
//DBKHASH DD DSN=vsam.dbkhash,
// DISP=SHR
//DBKSAVE DD DSN=vsam.dbksave,
// DISP=SHR
//*
//*THE INPUT STATEMENTS SHOWN HERE ARE EXAMPLES
//*FOR AUDIT AND SIMULATED FIX
//*
//SYSIPT DD *
PROCESS,SUBSCHEMA=subschema-name,
READYMODE=RETRIEVAL,SORTMSGS=CRITICAL
AUDIT,PAGES,USERSETS,CALCSETS,INDEX,
CORE,SETLIMIT=3000,DBKEYTBL
FIX=SIMULATE,PAGES,USERSETS,CALCSETS,INDEXORPHANS
REPORTS=YES,RECDATA=HEX,SETMBRS=ALL
/*
//SYSIDMS DD *
SYSIDMS PARAMETERS...
Figure 5.9b: z/OS JCL to Run CA IDMS/DB Audit
/* //* FILES NEEDED ONLY IF DISK OPTION IS SPECIFIED //* AND BDAM IS CHOSEN //* //DBKHASH DD DSN=dbaudit.dbkhash, // DISP=SHR // DCB=DSORG=DA //DBKHA@@ DD DSN*.DBKHASH,VOL=REF=*.DBKHASH, // DISP=SHR // DCB=DSORG=DA //DBKSAVE DD DSN=dbaudit.dbksave, // DISP=SHR // DCB=DSORG=DA //DBKSA@@ DD DSN*.DBKSAVE,VOL=REF=*.DBKSAVE, // DISP=SHR // DCB=DSORG=DA
Figure 5.9c: z/OS JCL to Run CA IDMS/DB Audit
|
Copyright © 2013 CA.
All rights reserved.
|
|