This section describes the job control information required to run ADACHK with BS2000, z/OS, and z/VSE systems and shows examples of each of the job streams.
This document covers the following topics:
| File | Link Name | Storage | More Information |
|---|---|---|---|
| Data set containing blocks to print. If you are running an ADACHK print function (such as ADACHK PLOGPRINT, ADACHK SORTPRINT, or ADACHK ASSOPRINT), include the corresponding data set specification in the job for the run. For information about which data sets to specify for each ADACHK function, read Disk Accesses by Utility and Function | DDASSORn DDDATARn DDWORKR1 DDWORKR4 DDTEMPR1 DDSORTRn DDCLOGRn DDPLOGRn DDDSIMR1 |
disk disk disk disk disk disk disk disk disk |
Associator Data Storage Work Temp Sort Multiple command log Multiple protection log DSIM data set |
| Associator | DDASSORn or DDASSOnn | disk | |
| Data Storage | DDDATARn or DDDATAnn | disk | |
| Sort work data sets | DDSORTR1 or DDSORTR2 | Used by the ACCHECK, CHECK, DSCHECK, and VALIDATE utility functions only when SORTTYPE=INTERNAL (the default) is specified and when the amount of data to be sorted exceeds the space declared by the LWP parameter in these utility function runs. | |
| ADARUN parameters | SYSDTA/ DDCARD | Operations | |
| ADACHK parameters | SYSDTA/ DDKARTE | ||
| ADARUN messages | SYSOUT DDPRINT | Messages and Codes | |
| ADACHK messages | SYSLST DDDRUCK | Messages and Codes |
This section provides samples of BS2000 ADACHK jobs.
/BEGIN-PROC C /MOD-TEST DUMP=YES /REMA /REMA ADACHK: Execute multiple print and check functions /REMA /ASS-SYSLST L.CHK /ASS-SYSDTA *SYSCMD /SET-FILE-LINK DDLIB,ADABAS.MOD /SET-FILE-LINK DDASSOR1,ADA99.ASSO,SUP=DISK(SHARE-UPD=YES) /SET-FILE-LINK DDDATAR1,ADA99.DATA,SUP=DISK(SHARE-UPD=YES) /START-PROG *M(E=ADARUN,L=ADABAS.MOD),RUN-MODE=ADV(A-L=YES) ADARUN PROG=ADACHK,DB=99 ADACHK ICHECK ICHECK of all files ADACHK DSCHECK FILE=1,2 DSCHECK of files 1 and 2 ADACHK DSCHECK FILE=17 DSCHECK of file 17 ADACHK VALIDATE FILE=3 VALIDATE of file 3 ADACHK ACCHECK ACCHECK of all files ADACHK CHECK FILE=21 CHECK of file 21 ADACHK FSTPRINT FSTPRINT ADACHK FCBPRINT FILE=1 FCBPRINT file=1 /ASS-SYSDTA *PRIM /ASS-SYSLST *PRIM /END-PROC
/BEGIN-PROC C /MOD-TEST DUMP=YES /REMA /REMA ADACHK: Execute ADACHK CHECK specifying sort datasets /REMA to be used in the event that LWP is insufficient. /REMA /ASS-SYSLST L.CHK /ASS-SYSDTA *SYSCMD /DELETE-FILE ADA99.CHK.SORTR1 /SET-JOB-STEP /CREATE-FILE ADA99.CHK.SORTR1,PUB(SPACE=(10000,1000)) /SET-FILE-LINK DDLIB,ADABAS.MOD /SET-FILE-LINK DDASSOR1,ADA99.ASSO,SUP=DISK(SHARE-UPD=YES) /SET-FILE-LINK DDDATAR1,ADA99.DATA,SUP=DISK(SHARE-UPD=YES) /SET-FILE-LINK DDSORTR1,ADA99.CHK.SORTR1 /START-PROG *M(E=ADARUN,L=ADABAS.MOD),RUN-MODE=ADV(A-L=YES) ADARUN PROG=ADACHK,DB=99 ADACHK CHECK LWP=256000 /ASS-SYSDTA *PRIM /ASS-SYSLST *PRIM /END-PROC
| Data Set | DD Name | Storage | More Information |
|---|---|---|---|
| Data set containing blocks to print. If you are running an ADACHK print function (such as ADACHK PLOGPRINT, ADACHK SORTPRINT, or ADACHK ASSOPRINT), include the corresponding data set specification in the job for the run. For information about which data sets to specify for each ADACHK function, read Disk Accesses by Utility and Function | DDASSORn DDDATARn DDWORKR1 DDWORKR4 DDTEMPR1 DDSORTRn DDCLOGRn DDPLOGRn DDDSIMR1 |
disk disk disk disk disk disk disk disk disk |
Associator Data Storage Work Temp Sort Multiple command log Multiple protection log DSIM data set |
| Associator | DDASSORn or DDASSOnn | disk | |
| Data Storage | DDDATARn or DDDATAnn | disk | |
| Sort work data sets | DDSORTR1 or DDSORTR2 | Used by the ACCHECK, CHECK, DSCHECK, and VALIDATE utility functions only when SORTTYPE=INTERNAL (the default) is specified and when the amount of data to be sorted exceeds the space declared by the LWP parameter in these utility function runs. | |
| ADARUN parameters | DDCARD | reader | Operations |
| ADACHK parameters | DDKARTE | reader | |
| ADARUN messages | DDPRINT | printer | Messages and Codes |
| ADACHK messages | DDDRUCK | printer | Messages and Codes |
This section provides samples of z/OS ADACHK JCL:
//ADACHKC JOB //* //* ADACHK: CHECK //* Check of entire database //* //CHK EXEC PGM=ADARUN //STEPLIB DD DISP=SHR,DSN=ADABAS.ADAvrs.LOAD <=== ADABAS LOAD //* //DDASSOR1 DD DISP=SHR,DSN=EXAMPLE.DBYYYYY.ASSOR1 <=== ASSO //DDDATAR1 DD DISP=SHR,DSN=EXAMPLE.DBYYYYY.DATAR1 <=== DATA //DDDRUCK DD SYSOUT=X //DDPRINT DD SYSOUT=X //SYSUDUMP DD SYSOUT=X //DDCARD DD * ADARUN PROG=ADACHK,SVC=XXX,DEVICE=3390,DBID=YYYYY /* //DDKARTE DD * ADACHK CHECK /* //
//ADACHKS JOB //* //* ADACHK: Execute ADACHK CHECK specifying sort datasets //* to be used in the event that LWP is insufficient. //* //CHK EXEC PGM=ADARUN //STEPLIB DD DISP=SHR,DSN=ADABAS.ADAvrs.LOAD <=== ADABAS LOAD //* //DDASSOR1 DD DISP=SHR,DSN=EXAMPLE.DBYYYYY.ASSOR1 <=== ASSO //DDDATAR1 DD DISP=SHR,DSN=EXAMPLE.DBYYYYY.DATAR1 <=== DATA //DDSORTR1 DD DISP=NEW,DSN=EXAMPLE.SORTR1,SPACE=(CYL,(100,500)) //DDSORTR2 DD DISP=NEW,DSN=EXAMPLE.SORTR2,SPACE=(CYL,(100,500)) //DDDRUCK DD SYSOUT=X //DDPRINT DD SYSOUT=X //SYSUDUMP DD SYSOUT=X //DDCARD DD * ADARUN PROG=ADACHK,SVC=XXX,DEVICE=3390,DBID=YYYYY /* //DDKARTE DD * ADACHK CHECK LWP=256000 /* //
//ADACHKP JOB //* //* ADACHK: PRINT GCB followed by PPTPRINT and ASSO and DATA //* prints of various RABNs //* //CHK EXEC PGM=ADARUN //STEPLIB DD DISP=SHR,DSN=ADABAS.ADAvrs.LOAD <=== ADABAS LOAD //* //DDASSOR1 DD DISP=SHR,DSN=EXAMPLE.DBYYYYY.ASSOR1 <=== ASSO //DDDATAR1 DD DISP=SHR,DSN=EXAMPLE.DBYYYYY.DATAR1 <=== DATA //DDDRUCK DD SYSOUT=X //DDPRINT DD SYSOUT=X //SYSUDUMP DD SYSOUT=X //DDCARD DD * ADARUN PROG=ADACHK,SVC=XXX,DEVICE=3390,DBID=YYYYY /* //DDKARTE DD * ADACHK GCBPRINT ADACHK PPTPRINT ADACHK ASSOPRINT RABN=1000-1002 ADACHK ASSOPRINT RABN=2006 ADACHK DATAPRINT RABN=25006-25007 ADACHK DATAPRINT RABN=17000-17999 /* //
//ADACHKV JOB //* //* ADACHK: Execute multiple print and check functions //* //* //CHK EXEC PGM=ADARUN //STEPLIB DD DISP=SHR,DSN=ADABAS.ADAvrs.LOAD <=== ADABAS LOAD //* //DDASSOR1 DD DISP=SHR,DSN=EXAMPLE.DBYYYYY.ASSOR1 <=== ASSO //DDDATAR1 DD DISP=SHR,DSN=EXAMPLE.DBYYYYY.DATAR1 <=== DATA //DDDRUCK DD SYSOUT=X //DDPRINT DD SYSOUT=X //SYSUDUMP DD SYSOUT=X //DDCARD DD * ADARUN PROG=ADACHK,SVC=XXX,DEVICE=3390,DBID=YYYYY /* //DDKARTE DD * ADACHK ICHECK ADACHK DSCHECK FILE=1,2 ADACHK DSCHECK FILE=17 ADACHK VALIDATE FILE=3 ADACHK ACCHECK ADACHK CHECK FILE=21 ADACHK FSTPRINT ADACHK FCBPRINT FILE=1 /* //
| File | Symbolic Name | Storage | Logical Unit | More Information |
|---|---|---|---|---|
| Data set containing blocks to print. If you are running an ADACHK print function (such as ADACHK PLOGPRINT, ADACHK SORTPRINT, or ADACHK ASSOPRINT), include the corresponding data set specification in the job for the run. For information about which data sets to specify for each ADACHK function, read Disk Accesses by Utility and Function. | ASSORn DATARn WORKR1 TEMPR1 SORTRn CLOGRn PLOGRn SIMR1 |
disk disk disk disk disk disk disk disk |
Associator Data Storage Work Temp Sort Multiple command log Multiple protection log DSIM data set |
|
| Associator | ASSORn or ASSOnn | disk | * | |
| Data Storage | DATARn or DATAnn | disk | * | |
| Sort work data sets | SORTR1 or SORTR2 | Used by the ACCHECK, CHECK, DSCHECK, and VALIDATE utility functions only when SORTTYPE=INTERNAL (the default) is specified and when the amount of data to be sorted exceeds the space declared by the LWP parameter in these utility function runs. | ||
| ADARUN parameters | - CARD CARD |
reader tape disk |
SYSRDR SYS000 * |
|
| ADACHK parameters | reader | SYSIPT | ||
| ADARUN messages | printer | SYSLST | Messages and Codes | |
| ADACHK messages | printer | SYS009 | Messages and Codes |
* Any programmer logical unit may be used.
This section provides samples of z/VSE ADACHK JCS:
See Library and File Procedures for z/VSE Examples for descriptions of the z/VSE procedures (PROCs).
X $$ JOB JNM=ADACHKV,CLASS=A,DISP=D X $$ LST CLASS=A,DISP=D // JOB ADACHKV EXECUTE THE ADABAS UTILITY ***CHK*** // OPTION LOG,PARTDUMP * * ADACHK: Execute multiple print and check functions * * // EXEC PROC=ADAVVLIB // EXEC PROC=ADAVVFIL * * ****************************************************************** * DON'T FORGET TO CUSTOMIZE PARAMETERS OF ADABAS UTILITY * ****************************************************************** // EXEC ADARUN,SIZE=ADARUN ADARUN PROG=ADACHK,SVC=XXX,DEVICE=3390,DBID=YYYYY $* ADACHK ICHECK ADACHK DSCHECK FILE=1,2 ADACHK DSCHECK FILE=17 ADACHK VALIDATE FILE=3 ADACHK ACCHECK ADACHK CHECK FILE=21 ADACHK FSTPRINT ADACHK FCBPRINT FILE=1 $* $& X $$ EOJ
X $$ JOB JNM=ADACHKP,CLASS=A,DISP=D X $$ LST CLASS=A,DISP=D // JOB ADACHKP EXECUTE THE ADABAS UTILITY ***CHK*** // OPTION LOG,PARTDUMP * * ADACHK: PRINT GCB followed by PPTPRINT and ASSO and DATA * prints of various RABNs * // EXEC PROC=ADAVVLIB // EXEC PROC=ADAVVFIL * * ****************************************************************** * DON'T FORGET TO CUSTOMIZE PARAMETERS OF ADABAS UTILITY * ****************************************************************** // EXEC ADARUN,SIZE=ADARUN ADARUN PROG=ADACHK,SVC=XXX,DEVICE=3390,DBID=YYYYY $* ADACHK GCBPRINT ADACHK PPTPRINT ADACHK ASSOPRINT RABN=1000-1002 ADACHK ASSOPRINT RABN=2006 ADACHK DATAPRINT RABN=25006-25007 ADACHK DATAPRINT RABN=17000-17999 $* $& X $$ EOJ
X $$ JOB JNM=ADACHKC,CLASS=A,DISP=D X $$ LST CLASS=A,DISP=D // JOB ADACHKC EXECUTE THE ADABAS UTILITY ***CHK*** // OPTION LOG,PARTDUMP * * ADACHK: CHECK * Check of entire database * // EXEC PROC=ADAVVLIB // EXEC PROC=ADAVVFIL < * * ****************************************************************** * DON'T FORGET TO CUSTOMIZE PARAMETERS OF ADABAS UTILITY * ****************************************************************** // EXEC ADARUN,SIZE=ADARUN ADARUN PROG=ADACHK,SVC=XXX,DEVICE=3390,DBID=YYYYY $* ADACHK CHECK $* $& X $$ EOJ