This section describes the job control information required to run ADAREP on the z/OS operating system and shows examples of job streams.

This document covers the following topics:

• Requirements to Run ADAREP JCL

---

Requirements to Run ADAREP JCL

Data Set	DD Name	Storage	More Information
Associator	DDASSORn	disk
Data Storage	DDDATARn	disk
Work Storage	DDWORKR1	disk	Optional, required only when ADARUN parameter ENCRYPTION=YES is in use
Save tape	DDSAVE	tape/ disk	Only with SAVETAPE
Protection log	DDPLOG	tape/ disk	Option with online save tape
ADARUN parameters	DDCARD	reader	Operations
ADAREP parameters	DDKARTE	reader
ADARUN messages	DDPRINT	printer	Messages and Codes
Time zone file	TZINFO	disk	Required when database has default time zone
ADAREP messages	DDDRUCK	printer	Messages and Codes
ADAREP XML summary report	DDXMLR1	tape/disk	Only necessary when the OUTPUT or ACODE parameters are specified. This data must be defined with DCB parameters RECFM=VB,LRECL=512.
ADAREP XML detailed report	DDXMLR2	tape/disk	Only necessary when the OUTPUT or ACODE parameters are specified in the same run as the CPLIST or CPEXLIST parameters. This data must be defined with DCB parameters RECFM=VB,LRECL=512.

ADAREP JCL Example

All Functions

//ADAREP    JOB
//*
//*   ADAREP: ALL FUNCTIONS
//*
//REP      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=ADAREP,MODE=MULTI,SVC=xxx,DEVICE=dddd,DBID=yyyyy
/*
//DDKARTE   DD   *
ADAREP    CPEXLIST
/*

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

Report from a Save Tape

//ADAREPS   JOB
//*
//*   ADAREP: REPORT FROM A SAVE TAPE
//*
//REP      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
//DDSAVE    DD   DISP=SHR,DSN=EXAMPLE.DByyyyy.SAVE   <=== SAVE DATASET
//DDDRUCK   DD   SYSOUT=X
//DDPRINT   DD   SYSOUT=X
//SYSUDUMP  DD   SYSOUT=X
//DDCARD    DD   *
ADARUN PROG=ADAREP,MODE=MULTI,SVC=xxx,DEVICE=dddd,DBID=yyyyy
/*
//DDKARTE   DD   *
ADAREP    REPORT SAVETAPE,NOCOUNT
/*

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

Report with OUTPUT='XML,UTF8'

//ADAREPX   JOB                                                        
//*                                                                    
//*   ADAREP: Report from a save tape, XML in UTF8 Format              
//*                                                                    
//REP      EXEC  PGM=ADARUN                                            
//STEPLIB   DD   DISP=SHR,DSN=ADABAS.ADAvrs.LOAD     <=== ADABAS LOAD  
//          DD   DISP=SHR,DSN=SAG.ICSvrs.L0nn        <=== Code pages   
//*                                                                    
//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         
//DDSAVE    DD   DISP=SHR,DSN=EXAMPLE.DBYYYYY.SAVE   <=== SAVE DATASET 
//DDDRUCK   DD   SYSOUT=X                                              
//DDPRINT   DD   SYSOUT=X                                              
//DDXMLR1   DD   SYSOUT=X,DCB=(LRECL=512,RECFM=VB)                     
//DDXMLR2   DD   SYSOUT=X,DCB=(LRECL=512,RECFM=VB)                     
//SYSUDUMP  DD   SYSOUT=X                                              
//DDCARD    DD   *                                                     
ADARUN PROG=ADAREP,MODE=MULTI,SVC=XXX,DEVICE=DDDD,DBID=YYYYY           
/*                                                                     
//DDKARTE   DD   *                                                     
ADAREP    REPORT CPEXLIST,OUTPUT='XML,UTF8'                            
/*

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