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

This document covers the following topics:

• Requirements to Run ADAPLP JCL

---

Requirements to Run ADAPLP JCL

Data Set	DD Name	Storage	More Information
Associator	DDASSORn	disk	Required for WORKPRI.
Work	DDWORKR1 DDWORKR4	disk	Required for WORKPRI.
Sequential protection log	DDPLOG	tape/ disk	Required for SPLOGPRI or IPLOGPRI.
Multiple protection log	DDPLOGR1	disk	Required for PLOGPRI if NUMBER=1 (the default).
Multiple protection log	DDPLOGRn	disk	Required for PLOGPRI if NUMBER=n.
ADAPLP messages	DDDRUCK	printer	Messages and Codes
ADARUN messages	DDPRINT	printer	Messages and Codes
ADARUN parameters	DDCARD	reader	Operations
ADAPLP parameters	DDKARTE	reader

ADAPLP JCL Examples

Refer to the JOBS data set for the following example jobs:

Job Member	Description
ADAPLP	Print protection log (from multiple data set PLOG)
ADAPLPS	Print protection log (from sequential PLOG)
ADAPLPW	Print Adabas Work

These jobs are listed in the following sections.

Print One of Multiple Protection Log Data Sets

//ADAPLP    JOB
//*
//*   ADAPLP: PROTECTION LOG PRINT (FROM MULTIPLE PLOG)
//*
//PLP       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
//DDPLOGR1  DD   DISP=SHR,DSN=EXAMPLE.DByyyyy.PLOGR1 <=== PLOG DATASET
//DDDRUCK   DD   SYSOUT=X
//DDPRINT   DD   SYSOUT=X
//SYSUDUMP  DD   SYSOUT=X
//DDCARD    DD   *
ADARUN PROG=ADAPLP,SVC=xxx,DEVICE=dddd,DBID=yyyyy
/*
//DDKARTE   DD   *
ADAPLP PLOGPRI
/*

Print Sequential Protection Log

//ADAPLPS    JOB
//*
//*   ADAPLP: PROTECTION LOG PRINT (FROM SEQUENTIAL PLOG)
//*
//PLP       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
//DDPLOG    DD   DISP=SHR,DSN=EXAMPLE.DByyyyy.PLOG,  <=== PLOG DATASET
//             UNIT=TAPE,VOL=SER=PLOG5
//DDDRUCK   DD   SYSOUT=X
//DDPRINT   DD   SYSOUT=X
//SYSUDUMP  DD   SYSOUT=X
//DDCARD    DD   *
ADARUN PROG=ADAPLP,SVC=xxx,DEVICE=dddd,DBID=yyyyy
/*
//DDKARTE   DD   *
ADAPLP SPLOGPRI
/*

Print Sequential Intermediate Protection Log

//ADAPLPS    JOB
//*
//*   ADAPLP: PROTECTION LOG PRINT (FROM SEQUENTIAL PLOG)
//*
//PLP       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
//DDPLOG    DD   DISP=SHR,DSN=EXAMPLE.DByyyyy.PLOG,  <=== PLOG DATASET
//             UNIT=TAPE,VOL=SER=PLOG5
//DDDRUCK   DD   SYSOUT=X
//DDPRINT   DD   SYSOUT=X
//SYSUDUMP  DD   SYSOUT=X
//DDCARD    DD   *
ADARUN PROG=ADAPLP,SVC=xxx,DEVICE=dddd,DBID=yyyyy
/*
//DDKARTE   DD   *
ADAPLP IPLOGPRI
/*

Print Adabas Work

//ADAPLPW    JOB
//*
//*   ADAPLP: PRINT ADABAS WORK
//*
//PLP       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=ADAPLP,SVC=xxx,DEVICE=dddd,DBID=yyyyy
/*
//DDKARTE   DD   *
ADAPLP WORKPRI PRINT
/*