This section describes the job control information required to run ADADCK with BS2000, z/OS, z/VM, and VSE systems and shows examples of each of the job streams.
This document covers the following topics:
| Data Set | Link Name | Storage | More Information |
|---|---|---|---|
| Associator | DDASSORn or DDASSOnn | disk | |
| Data Storage | DDDATARn or DDDATAnn | disk | |
| ADARUN parameters | SYSDTA/ DDCARD | Operations | |
| ADADCK parameters | SYSDTA/ DDKARTE | ||
| ADARUN messages | SYSOUT DDPRINT | Messages and Codes | |
| ADADCK messages | SYSLST DDDRUCK | Messages and Codes |
/.ADADCK LOGON /MODIFY-TEST-OPTIONS DUMP=YES /REMARK * /REMARK *A D A D C K DATA STORAGE CHECK /REMARK * /REMARK * /ASS-SYSLST L.DCK.DATA /ASS-SYSDTA *SYSCMD /SET-FILE-LINK DDLIB,ADAvrs.MOD /SET-FILE-LINK DDASSOR1,ADAyyyyy.ASSO,SHARE-UPD=YES /SET-FILE-LINK DDDATAR1,ADAyyyyy.DATA,SHARE-UPD=YES /START-PROGRAM *M(ADA.MOD,ADARUN),PR-MO=ANY ADARUN PROG=ADADCK,DB=yyyyy,IDTNAME=ADABAS5B ADADCK DSCHECK FILE=27 /LOGOFF SYS-OUTPUT=DEL
/.ADADCK LOGON /OPTION MSG=FH,DUMP=YES /REMARK * /REMARK *A D A D C K DATA STORAGE CHECK /REMARK * /REMARK * /SYSFILE SYSLST=L.DCK.DATA /FILE ADA.MOD,LINK=DDLIB /FILE ADAyyyyy.ASSO ,LINK=DDASSOR1,SHARUPD=YES /FILE ADAyyyyy.DATA ,LINK=DDDATAR1,SHARUPD=YES /EXEC (ADARUN,ADA.MOD) ADARUN PROG=ADADCK,DB=yyyyy,IDTNAME=ADABAS5B ADADCK DSCHECK FILE=27 /LOGOFF NOSPOOL
| Data Set | DD Name | Storage | More Information |
|---|---|---|---|
| Associator | DDASSORn or DDASSOnn | disk | |
| Data Storage | DDDATARn or DDDATAnn | disk | |
| ADARUN parameters | DDCARD | reader | Operations |
| ADADCK parameters | DDKARTE | reader | |
| ADARUN messages | DDPRINT | printer | Messages and Codes |
| ADADCK messages | DDDRUCK | printer | Messages and Codes |
Refer to ADADCK in the JOBS data set for this example.
//ADADCK JOB //* //* ADADCK: //* DATA STORAGE CHECK //* //DCK 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=ADADCK,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* //DDKARTE DD * ADADCK DSCHECK FILE=27 /*
| Data Set | DD Name | Storage | More Information |
|---|---|---|---|
| Associator | DDASSORn or DDASSOnn | disk | |
| Data Storage | DDDATARn or DDDATAnn | disk | |
| ADARUN parameters | DDCARD | disk/ terminal/ reader | Operations |
| ADADCK parameters | DDKARTE | disk/ terminal/ reader | |
| ADARUN messages | DDPRINT | disk/ terminal/ printer | Messages and Codes |
| ADADCK messages | DDDRUCK | disk/ terminal/ printer | Messages and Codes |
DATADEF DDASSOR1,DSN=ADABASVv.ASSO,VOL=ASSOV1 DATADEF DDDATAR1,DSN=ADABASVv.DATA,VOL=DATAV1 DATADEF DDPRINT,DSN=ADADCK.DDPRINT,MODE=A DATADEF DUMP,DUMMY DATADEF DDDRUCK,DSN=ADADCK.DDDRUCK,MODE=A DATADEF DDCARD,DSN=RUNDCK.CONTROL,MODE=A DATADEF DDKARTE,DSN=ADADCK.CONTROL,MODE=A ADARUN
Contents of RUNDCK CONTROL A1:
ADARUN PROG=ADADCK,DEVICE=dddd,DB=yyyyy
Contents of ADADCK CONTROL A1:
ADADCK DSCHECK FILE=27
| File | Symbolic Name | Storage | Logical Unit | More Information |
|---|---|---|---|---|
| Associator | ASSORn or ASSOnn | disk | * | |
| Data Storage | DATARn or DATAnn | disk | * | |
| ADARUN parameters | - CARD CARD |
reader tape disk |
SYSRDR SYS000 * |
|
| ADADCK parameters | reader | SYSIPT | ||
| ADARUN messages | printer | SYSLST | Messages and Codes | |
| ADADCK messages | printer | SYS009 | Messages and Codes |
* Any programmer logical unit may be used.
See Library and File Procedures for VSE Examples for descriptions of the VSE procedures (PROCs).
Refer to member ADADCK.X for this example.
* $$ JOB JNM=ADADCK,CLASS=A,DISP=D * $$ LST CLASS=A,DISP=D // JOB ADADCK * DATA STORAGE CHECK // EXEC PROC=ADAVvLIB // EXEC PROC=ADAVvFIL // EXEC ADARUN,SIZE=ADARUN ADARUN PROG=ADADCK,MODE=MULTI,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* ADADCK DSCHECK FILE=27 /* /& * $$ EOJ
