This section describes the job control information required to run ADADBS on the z/OS operating system and shows an example job stream.

This document covers the following topics:

• Collation with User Exit

• Requirements to Run ADADBS JCL

---

Collation with User Exit

If a collation user exit is to be used during ADADBS ONLINVERT execution, the ADARUN CDXnn parameter must be specified for the utility run.

Used in conjunction with the universal encoding support (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.

Requirements to Run ADADBS JCL

Data Set	DD Name	Storage	More Information
Associator	DDASSORn	disk	Required only for OPERCOM DDIB or RESETDIB functions with inactive nucleus
ADADBS messages	DDDRUCK	printer	Messages and Codes
ADARUN messages	DDPRINT	printer	Messages and Codes
ADARUN parameters	DDCARD	reader	Operations
ADADBS parameters	DDKARTE	reader

ADADBS JCL Example

Refer to ADADBS in the JOBS data set for this example.

//ADADBS    JOB
//*
//*     ADADBS:
//*        DATA BASE SERVICES (BATCH)
//*
//DBS       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
//DDWORKR1  DD   DISP=SHR,DSN=EXAMPLE.DByyyyy.WORKR1 <=== WORK
//DDDRUCK   DD   SYSOUT=X
//DDPRINT   DD   SYSOUT=X
//SYSUDUMP  DD   SYSOUT=X
//DDCARD    DD   *
ADARUN PROG=ADADBS,MODE=MULTI,SVC=xxx,DEVICE=dddd,DBID=yyyyy
/*
//DDKARTE   DD   *
ADADBS      REFRESH FILE=1
/*