This section describes the job control information required to run ADAICK with BS2000, z/OS, and z/VSE systems and shows examples of each of the job streams.
This document covers the following topics:
If a collation user exit is to be used during ADAICK execution, the ADARUN CDXnn parameter must be specified for the utility run.
Used in conjunction with the universal encoding subsystem (UES), the format of the collation descriptor user exit parameter is
where
| nn | is the number of the collation descriptor exit, a two-digit decimal integer in the range 01-08 inclusive. |
| exit-name | is the name of the user routine that gets control at the collation descriptor exit; the name can be up to 8 characters long. |
Only one program may be specified for each collation descriptor exit. Up to 8 collation descriptor exits may be specified (in any order). See the Adabas DBA Reference documentation for more information.
| Data Set | Link Name | Storage | More Information |
|---|---|---|---|
| Associator | DDASSORn | disk | |
| Data Storage | DDDATARn | disk | |
| ADARUN parameters | SYSDTA/ DDCARD | Operations | |
| ADAICK parameters | SYSDTA/ DDKARTE | ||
| ADARUN messages | SYSOUT DDPRINT | Messages and Codes | |
| ADAICK messages | SYSLST DDDRUCK | Messages and Codes |
/.ADAICK LOGON /MODIFY-TEST-OPTIONS DUMP=YES /REMARK * /REMARK *A D A I C K INDEX CHECK /REMARK * /REMARK * /ASS-SYSLST L.ICK.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=ADAICK,DB=yyyyy,IDTNAME=ADABAS5B ADAICK ICHECK FILE=27 /LOGOFF SYS-OUTPUT=DEL
/.ADAICK LOGON /OPTION MSG=FH,DUMP=YES /REMARK * /REMARK *A D A I C K INDEX CHECK /REMARK * /REMARK * /SYSFILE SYSLST=L.ICK.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=ADAICK,DB=yyyyy,IDTNAME=ADABAS5B ADAICK ICHECK FILE=27 /LOGOFF NOSPOOL
| Data Set | DD Name | Storage | More Information |
|---|---|---|---|
| Associator | DDASSORn | disk | |
| Data Storage | DDDATARn | disk | |
| ADARUN parameters | DDCARD | reader | Operations |
| ADAICK parameters | DDKARTE | reader | |
| ADARUN messages | DDPRINT | printer | Messages and Codes |
| ADAICK messages | DDDRUCK | printer | Messages and Codes |
Refer to ADAICK in the JOBS data set for this example.
//ADAICK JOB //* //* ADAICK: //* INDEX AND ADDRESS CONVERTER CHECK //* //ICK 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=ADAICK,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* //DDKARTE DD * ADAICK ICHECK FILE=1-3 /*
| File | Symbolic Name | Storage | Logical Unit | More Information |
|---|---|---|---|---|
| Associator | ASSORn | disk | * | |
| Data Storage | DATARn | disk | * | |
| ADARUN parameters | - CARD CARD |
reader tape disk |
SYSRDR SYS000 * |
|
| ADAICK parameters | reader | SYSIPT | ||
| ADARUN messages | printer | SYSLST | Messages and Codes | |
| ADAICK messages | printer | SYS009 | Messages and Codes |
* Any programmer logical unit may be used.
See Library and File Procedures for z/VSE Examples for descriptions of the z/VSE procedures (PROCs).
Refer to member ADAICK.X for this example.
* $$ JOB JNM=ADAICK,CLASS=A,DISP=D * $$ LST CLASS=A,DISP=D // JOB ADAICK * INDEX AND ADDRESS CONVERTER CHECK // EXEC PROC=ADAVvLIB // EXEC PROC=ADAVvFIL // EXEC ADARUN,SIZE=ADARUN ADARUN PROG=ADAICK,MODE=SINGLE,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* ADAICK ICHECK FILE=1-3 /* /& * $$ EOJ
