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

This document covers the following topics:

• Requirements to Run ADASEL JCL

---

Requirements to Run ADASEL JCL

Data Set	DD Name	Storage	More Information
Protection log	DDSIIN	tape/ disk	Sequential log
Optional FDT input	DDEBAND	tape/ disk	Either DDEBAND or DDSAVE can be specified, but not both.
Optional save tape with FDT input	DDSAVE	tape/ disk	Either DDEBAND or DDSAVE can be specified, but not both. This DD is required if a save tape is used in the ADASEL run.
Selected data	DDEXPAn	tape/ disk	Output by ADASEL
Associator	DDASSORn	disk
ADARUN parameters	DDCARD	reader	Operations
ADASEL parameters	DDKARTE	reader
ADARUN messages	DDPRINT	printer	Messages and Codes
ADASEL messages	DDDRUCK	printer	Messages and Codes

ADASEL JCL Example

//ADASEL    JOB
//*
//*   ADASEL:
//*      SELECT PROTECTION DATA
//*
//SEL       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
//DDSIIN    DD   DISP=OLD,DSN=EXAMPLE.DByyyyy.PLOG5     <=== OUTPUT ADARES
//*                                                                PLCOPY
//DDEXPA1   DD   DISP=(,CATLG),DSN=EXAMPLE.DByyyyy.EXPA1, <= OUTPUT ADASEL
//               SPACE=(TRK,(10,5),RLSE),VOL=SER=vvvvvv,UNIT=uuuu
//DDDRUCK   DD   SYSOUT=X
//DDPRINT   DD   SYSOUT=X
//SYSUDUMP  DD   SYSOUT=X
//DDCARD    DD   *
ADARUN PROG=ADASEL,SVC=xxx,DEVICE=dddd,DBID=yyyyy
/*
//DDKARTE   DD   *
*
*    SELECT UPDATES FOR FILE NUMBER 1
*
SELECT ALL FROM FILE 1
  OUTPUT TO EXPA1
END
/*

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