ADASAV JCL/JCS Requirements and Examples

This section describes the job control information required to run the ADASAV functions for the Delta Save Facility with BS2000/OSD, z/OS, z/VM, VSE/ESA and z/VSE systems, and shows examples of each of the job streams.

Note:
When running with the optional Recovery Aid (RLOG), all temporary data sets must also be cataloged in the job control.

This document covers the following topics:


z/OS

Data Set DD Name Storage More Information
Full save input(s) DDRESTn tape/disk for RESTORE DELTA
Full save input DDFULL tape/disk for MERGE
Delta save input(s) DDDELn tape/disk for MERGE/RESTORE DELTA
Delta Save images (DSIM) DDDSIMR1 disk required for online saves
Associator DDASSORn disk  
Data Storage DDDATARn disk required for SAVE/RESTORE
Work DDWORKR1 disk required for SAVE/RESTORE if nucleus is inactive
Dual/multiple PLOG DDPLOGRn disk optional for RESTORE DELTA
Dual/multiple CLOG DDCLOGRn disk optional for RESTORE DELTA
Recovery log DDRLOGR1 disk required for recovery log
Full or delta save outputs DDSAVEn tape/disk required for SAVE/SAVE DELTA /MERGE functions
Dual full or delta save
outputs
DDDUALn tape/disk required for TWOCOPIES
ADARUN parameters DDCARD   Adabas Operations documentation
ADASAV parameters DDKARTE    
ADARUN messages DDPRINT   Adabas Messages and Codes
ADASAV messages DDDRUCK   Adabas Messages and Codes

Merge Delta Save Output (ADASAV MERGE)


//MERGE    EXEC  PGM=ADARUN

//DDASSOR1 DD  DSN=ADABAS.DB010.ASSOR1,DISP=SHR

//DDDSIMR1 DD  DSN=ADABAS.DB010.DSIM,DISP=SHR

//DDFULL   DD  DSN=ADABAS.DB010.SAVE039.PART1,DISP=SHR

//         DD  DSN=ADABAS.DB010.SAVE039.PART2,DISP=SHR

//         DD  DSN=ADABAS.DB010.SAVE039.PART3,DISP=SHR

//         DD  DSN=ADABAS.DB010.SAVE039.PART4,DISP=SHR

//DDDEL1   DD  DSN=ADABAS.DB010.MASTER.DELTA.OLD,DISP=SHR



//DDSAVE1  DD 

DSN=ADABAS.DB010.SAVE040.PART1,DISP=(NEW,CATLG),

//             UNIT=CASS,...

//DDSAVE2  DD  DSN=ADABAS.DB010.SAVE040.PART2,DISP=(NEW,CATLG),

//             UNIT=CASS,...

//DDSAVE3  DD  DSN=ADABAS.DB010.SAVE040.PART3,DISP=(NEW,CATLG),

//             UNIT=CASS,...

//DDSAVE4  DD  DSN=ADABAS.DB010.SAVE040.PART4,DISP=(NEW,CATLG),

//             UNIT=CASS,...

//DDDUAL1  DD  DSN=ADABAS.DB010.COPY040.PART1,DISP=(NEW,CATLG),

//             UNIT=CASS,...

//DDDUAL2  DD  DSN=ADABAS.DB010.COPY040.PART2,DISP=(NEW,CATLG),

//             UNIT=CASS,...

//DDDUAL3  DD  DSN=ADABAS.DB010.COPY040.PART3,DISP=(NEW,CATLG),

//             UNIT=CASS,...

//DDDUAL4  DD  DSN=ADABAS.DB010.COPY040.PART4,DISP=(NEW,CATLG),

//             UNIT=CASS,...

//DDCARD   DD  *

 ADARUN  PROG=ADASAV,DSF=YES,...

//DDKARTE  DD  *

 ADASAV MERGE PATTERN=FD

 ADASAV       DRIVES=4

 ADASAV       TWOCOPIES

//DDPRINT  DD  SYSOUT=*

//DDDRUCK  DD  SYSOUT=*

Merge and Restore Database (ADASAV RESTORE DELTA)


//RESTORE  EXEC  PGM=ADARUN

//DDASSOR1 DD  DSN=ADABAS.DB010.ASSOR1,DISP=SHR

//DDDATAR1 DD  DSN=ADABAS.DB010.DATAR1,DISP=SHR

//DDWORKR1 DD  DSN=ADABAS.DB010.WORKR1,DISP=SHR

//DDPLOGR1 DD  DSN=ADABAS.DB010.PLOGR1,DISP=SHR

//DDPLOGR2 DD  DSN=ADABAS.DB010.PLOGR2,DISP=SHR

//DDCLOGR1 DD  DSN=ADABAS.DB010.CLOGR1,DISP=SHR

//DDCLOGR2 DD  DSN=ADABAS.DB010.CLOGR2,DISP=SHR

//DDDSIMR1 DD  DSN=ADABAS.DB010.DSIM,DISP=SHR

//DDREST1  DD  DSN=ADABAS.DB010.SAVE040.PART1,DISP=SHR

//DDREST2  DD  DSN=ADABAS.DB010.SAVE040.PART2,DISP=SHR

//DDREST3  DD  DSN=ADABAS.DB010.SAVE040.PART3,DISP=SHR

//DDREST4  DD  DSN=ADABAS.DB010.SAVE040.PART4,DISP=SHR

//DDDEL1   DD  DSN=ADABAS.DB010.MASTER.DELTA.OLD,DISP=SHR

//DDDEL2   DD  DSN=ADABAS.DB010.MASTER.DELTA1,DISP=SHR

//         DD  DSN=ADABAS.DB010.MASTER.DELTA2,DISP=SHR

//         DD  DSN=ADABAS.DB010.MASTER.DELTA3,DISP=SHR



//DDCARD   DD  *

 ADARUN PROG=ADASAV,DSF=YES,...

//DDKARTE  DD  *

 ADASAV RESTORE DELTA,OVERWRITE

 ADASAV         PATTERN='FDD'

 ADASAV         DRIVES=4

 ADASAV         DSIMDEV=8381

 ADASAV         PLOGDEV=3390,CLOGDEV=3390

//DDPRINT  DD  SYSOUT=*

//DDDRUCK  DD  SYSOUT=*

Restore Files (ADASAV RESTORE DELTA,FMOVE...)


//RESTORE  EXEC  PGM=ADARUN

//DDASSOR1 DD  DSN=ADABAS.DB010.ASSOR1,DISP=SHR

//DDDATAR1 DD  DSN=ADABAS.DB010.DATAR1,DISP=SHR

//DDWORKR1 DD  DSN=ADABAS.DB010.WORKR1,DISP=SHR

//DDREST1  DD  DSN=ADABAS.DB010.SAVE040.PART1,DISP=SHR

//         DD  DSN=ADABAS.DB010.SAVE040.PART2,DISP=SHR

//         DD  DSN=ADABAS.DB010.SAVE040.PART3,DISP=SHR

//         DD  DSN=ADABAS.DB010.SAVE040.PART4,DISP=SHR

//DDDEL1   DD  DSN=ADABAS.DB010.MASTER.DELTA.OLD,DISP=SHR

//DDDEL2   DD  DSN=ADABAS.DB010.MASTER.DELTA1,DISP=SHR

//DDCARD   DD  *

 ADARUN  . . .

//DDKARTE  DD  *

 ADASAV RESTORE DELTA,OVERWRITE

 ADASAV         FMOVE=10,20,30,...

//DDPRINT  DD  SYSOUT=*

//DDDRUCK  DD  SYSOUT=*

Save Database (ADASAV SAVE)


//SAVE     EXEC  PGM=ADARUN

//DDASSOR1 DD  DSN=ADABAS.DB010.ASSOR1,DISP=SHR

//DDDATAR1 DD  DSN=ADABAS.DB010.DATAR1,DISP=SHR

//DDWORKR1 DD  DSN=ADABAS.DB010.WORKR1,DISP=SHR

//DDDSIMR1 DD  DSN=ADABAS.DB010.DSIM,DISP=SHR

//DDSAVE1  DD  DSN=ADABAS.DB010.SAVE039.PART1,DISP=(NEW,CATLG)

//             UNIT=CASS,...

//DDSAVE2  DD  DSN=ADABAS.DB010.SAVE039.PART2,DISP=(NEW,CATLG)

//             UNIT=CASS,...

//DDSAVE3  DD  DSN=ADABAS.DB010.SAVE039.PART3,DISP=(NEW,CATLG)

//             UNIT=CASS,...

//DDSAVE4  DD  DSN=ADABAS.DB010.SAVE039.PART4,DISP=(NEW,CATLG)

//             UNIT=CASS,...

//DDCARD   DD  *

 ADARUN PROG=ADASAV,DSF=YES,...

//DDKARTE  DD  *

 ADASAV SAVE

 ADASAV         DRIVES=4

 ADASAV         TTSYN=10

//DDPRINT  DD  SYSOUT=*

//DDDRUCK  DD  SYSOUT=*

Save Database (ADASAV SAVE DELTA)


//SAVE     EXEC  PGM=ADARUN

//DDASSOR1 DD  DSN=ADABAS.DB010.ASSOR1,DISP=SHR

//DDDATAR1 DD  DSN=ADABAS.DB010.DATAR1,DISP=SHR

//DDWORKR1 DD  DSN=ADABAS.DB010.WORKR1,DISP=SHR

//DDDSIMR1 DD  DSN=ADABAS.DB010.DSIM,DISP=SHR

//DDSAVE1  DD  DSN=ADABAS.DB010.DELTA,DISP=OLD

//DDCARD   DD  *

 ADARUN PROG=ADASAV,DSF=YES,...

//DDKARTE  DD  *

 ADASAV SAVE   DELTA

 ADASAV        TTSYN=10

 ADASAV        DSIMDEV=8381

//DDPRINT  DD  SYSOUT=*

//DDDRUCK  DD  SYSOUT=*