This section describes the job control information required to run ADASAV with BS2000, z/OS, and z/VSE systems and shows examples of each of the job streams.
This document covers the following topics:
Data Set | Link Name | Storage | More Information |
---|---|---|---|
Associator | DDASSORn | disk | |
Data Storage | DDDATARn | disk | |
Work |
DDWORKR1 DDWORKRn (1-9) to DDWORKnn (10-32) in cluster environments |
disk | A Work data set is not required for:
A Work data set is recommended for:
In these cases, if a Work data set is specified, the ADASAV function resets it; if a Work data set is not specified, no Work data sets are reset. Note: If a database is restored and the Work data set has not been reset, nucleus error 72 (PARM ERROR 72) may occur. To resolve this, you can reset any Work data sets using the ADAFRM utility. |
Recovery log (RLOG) | DDRLOGR1 | disk | Required for ADARAI |
Backup copy | DDSAVE1-8 | tape/ disk | Required for SAVE |
Dual copy | DDDUAL1-8 | tape/ disk | Required for SAVE with two backup copies |
Backup copy (input to the RESTORE function) | DDREST1-8 | tape/ disk | Required for RESTORE and RESTONL |
Sequential protection log | DDPLOG | tape/ disk | Required for RESTONL and RESTPLOG |
ADARUN parameters | SYSDTA/ DDCARD | Operations | |
ADASAV parameters | SYSDTA/ DDKARTE | ||
ADARUN messages | SYSOUT/ DDPRINT | Messages and Codes | |
ADASAV messages | SYSLST/ DDDRUCK | Messages and Codes |
Note:
For RESTONL, the input SAVE tapes and the sequential protection log
can be concatenated, using the name DDREST1.
/.ADASAV LOGON /MODIFY-TEST-OPTIONS DUMP=YES /REMARK * /REMARK * A D A S A V SAVE FILES, SAVE DATABASE /REMARK * /DELETE-FILE ADAyyyyy.SAVE1 /SET-JOB-STEP /CREATE-FILE ADAyyyyy.SAVE1,SUP=TAPE(DEVICE=TAPE-C1,VOL=SAV101),- / PROT=(USER-ACCESS=ALL-USERS) /SET-JOB-STEP /DELETE-FILE ADAyyyyy.DUAL1 /SET-JOB-STEP /CREATE-FILE ADAyyyyy.DUAL1,SUP=TAPE(DEVICE=TAPE-C1,VOL=SAV101),- / PROT=(USER-ACCESS=ALL-USERS) /SET-JOB-STEP /ASS-SYSLST L.SAV.SAVE /ASS-SYSDTA *SYSCMD /SET-FILE-LINK DDLIB,ADAvrs.MOD /SET-FILE-LINK DDASSOR1,ADAyyyyy.ASSO,SHARE-UPD=YES /SET-FILE-LINK DDDATAR1,ADAyyyyy.DATA,SHARE-UPD=YES /SET-FILE-LINK DDSAVE1,ADAyyyyy.SAVE1,TAPE(FILE-SEQ=1) /SET-FILE-LINK DDDUAL1,ADAyyyyy.DUAL1,TAPE(FILE-SEQ=1) /START-PROGRAM *M(ADA.MOD,ADARUN),PR-MO=ANY ADARUN PROG=ADASAV,DB=yyyyy,IDTNAME=ADABAS5B ADASAV SAVE TWOCOPIES /LOGOFF SYS-OUTPUT=DEL
/.ADASAV LOGON /OPTION MSG=FH,DUMP=YES /REMARK * /REMARK * A D A S A V SAVE FILES, SAVE DATABASE /REMARK * /SYSFILE SYSLST=L.SAV.SAVE /FILE ADA.MOD,LINK=DDLIB /FILE ADAyyyyy.ASSO ,LINK=DDASSOR1,SHARUPD=YES /FILE ADAyyyyy.DATA ,LINK=DDDATAR1,SHARUPD=YES /FILE ADAyyyyy.SAVE1 ,LINK=DDSAVE1 ,DEVICE=TAPE-C1,VOLUME=SAV101 /FILE ADAyyyyy.DUAL1 ,LINK=DDDUAL1 ,DEVICE=TAPE-C1,VOLUME=SAV201 /EXEC (ADARUN,ADA.MOD) ADARUN PROG=ADASAV,DB=yyyyy,IDTNAME=ADABAS5B ADASAV SAVE TWOCOPIES /LOGOFF NOSPOOL
/.ADASAV LOGON /MODIFY-TEST-OPTIONS DUMP=YES /REMARK * /REMARK * A D A S A V RESTORE FILES, RESTORE DATABASE /REMARK * FROM ONLINE CREATED SAVE DATASETS /REMARK * /ASS-SYSLST L.SAV.REON /ASS-SYSDTA *SYSCMD /SET-FILE-LINK DDLIB,ADAvrs.MOD /SET-FILE-LINK DDASSOR1,ADAyyyyy.ASSO,SHARE-UPD=YES /SET-FILE-LINK DDDATAR1,ADAyyyyy.DATA,SHARE-UPD=YES /SET-FILE-LINK DDREST1,ADAyyyyy.SAVE1 /SET-FILE-LINK DDPLOG,ADAyyyyy.PLOG /START-PROGRAM *M(ADA.MOD,ADARUN),PR-MO=ANY ADARUN PROG=ADASAV,DB=yyyyy,IDTNAME=ADABAS5B ADASAV RESTONL FILES=2,PLOGNUM=ppp,SYN1=43 /LOGOFF SYS-OUTPUT=DEL
/.ADASAV LOGON /OPTION MSG=FH,DUMP=YES /REMARK * /REMARK * A D A S A V RESTORE FILES, RESTORE DATABASE /REMARK * FROM ONLINE CREATED SAVE DATASETS /REMARK * /SYSFILE SYSLST=L.SAV.REON /FILE ADA.MOD,LINK=DDLIB /FILE ADAyyyyy.ASSO ,LINK=DDASSOR1,SHARUPD=YES /FILE ADAyyyyy.DATA ,LINK=DDDATAR1,SHARUPD=YES /FILE ADAyyyyy.SAVE1 ,LINK=DDREST1 /FILE ADAyyyyy.PLOG ,LINK=DDPLOG /EXEC (ADARUN,ADA.MOD) ADARUN PROG=ADASAV,DB=yyyyy,IDTNAME=ADABAS5B ADASAV RESTONL FILES=2,PLOGNUM=ppp,SYN1=43 /LOGOFF NOSPOOL
/.ADASAV LOGON /MODIFY-TEST-OPTIONS DUMP=YES /REMARK * /REMARK * ADASAV: /REMARK * EXAMPLE HOW TO USE ADASAV TO RESTORE THE /REMARK * ENTIRE DATABASE /REMARK * /REMARK * /DELETE-FILE ADAyyyyy.SAVE1 /SET-JOB-STEP /IMPORT-FILE SUP=TAPE(F-NAME=ADAyyyyy.SAVE1,DEV-TYPE=TAPE-C1,VOL=SAV101) /SET-JOB-STEP /ASS-SYSLST L.SAV.REST /ASS-SYSDTA *SYSCMD /SET-FILE-LINK DDLIB,ADAvrs.MOD /SET-FILE-LINK DDASSOR1,ADAyyyyy.ASSO,SHARE-UPD=YES /SET-FILE-LINK DDDATAR1,ADAyyyyy.DATA,SHARE-UPD=YES /SET-FILE-LINK DDWORKR1,ADAyyyyy.WORK,SHARE-UPD=YES /SET-FILE-LINK DDREST1,ADAyyyyy.SAVE1,TAPE(FILE-SEQ=1),ACC-METH=SAM,- / BUFF-LEN=32768,REC-FORM=V /START-PROGRAM *M(ADA.MOD,ADARUN),PR-MO=ANY ADARUN PROG=ADASAV,DB=yyyyy,IDTNAME=ADABAS5B ADASAV RESTORE OVERWRITE /LOGOFF SYS-OUTPUT=DEL
/.ADASAV LOGON /OPTION MSG=FH,DUMP=YES /REMARK * /REMARK * ADASAV: /REMARK * EXAMPLE HOW TO USE ADASAV TO RESTORE THE /REMARK * ENTIRE DATABASE /REMARK * /SYSFILE SYSLST=L.SAV.REST /FILE ADA.MOD,LINK=DDLIB /FILE ADAyyyyy.ASSO ,LINK=DDASSOR1,SHARUPD=YES /FILE ADAyyyyy.DATA ,LINK=DDDATAR1,SHARUPD=YES /FILE ADAyyyyy.WORK ,LINK=DDWORKR1,SHARUPD=YES /FILE ADAyyyyy.SAVE1 ,LINK=DDREST1,DEVICE=TAPE-C1,VOLUME=ADA001,- / STATE=FOREIGN.- / FCBTYPE=SAM,RECFORM=V,RECSIZE=,BLKSIZE=32768,LABEL=STD /EXEC (ADARUN,ADA.MOD) ADARUN PROG=ADASAV,DB=yyyyy,IDTNAME=ADABAS5B ADASAV RESTORE OVERWRITE /LOGOFF NOSPOOL
/.ADASAV LOGON /MODIFY-TEST-OPTIONS DUMP=YES /REMARK * /REMARK * A D A S A V RESTORE PROTECTION LOG /REMARK * /ASS-SYSLST L.SAV.REPL /ASS-SYSDTA *SYSCMD /SET-FILE-LINK DDLIB,ADAvrs.MOD /SET-FILE-LINK DDASSOR1,ADAyyyyy.ASSO,SHARE-UPD=YES /SET-FILE-LINK DDDATAR1,ADAyyyyy.DATA,SHARE-UPD=YES /SET-FILE-LINK DDPLOG,ADAyyyyy.PLOG /START-PROGRAM *M(ADA.MOD,ADARUN),PR-MO=ANY ADARUN PROG=ADASAV,DB=yyyyy,IDTNAME=ADABAS5B ADASAV RESTPLOG FILES=2,PLOGNUM=ppp,SYN1=43 /LOGOFF SYS-OUTPUT=DEL
/.ADASAV LOGON /OPTION MSG=FH,DUMP=YES /REMARK * /REMARK * A D A S A V RESTORE PROTECTION LOG /REMARK * /SYSFILE SYSLST=L.SAV.REPL /FILE ADA.MOD,LINK=DDLIB /FILE ADAyyyyy.ASSO ,LINK=DDASSOR1,SHARUPD=YES /FILE ADAyyyyy.DATA ,LINK=DDDATAR1,SHARUPD=YES /FILE ADAyyyyy.PLOG ,LINK=DDPLOG /EXEC (ADARUN,ADA.MOD) ADARUN PROG=ADASAV,DB=yyyyy,IDTNAME=ADABAS5B ADASAV RESTPLOG FILES=2,PLOGNUM=ppp,SYN1=43 /LOGOFF NOSPOOL
/.ADASAV LOGON /MODIFY-TEST-OPTIONS DUMP=YES /REMARK * /REMARK * A D A S A V RESTORE FILES, RESTORE DATABASE /REMARK * FROM OFFLINE CREATED SAVE DATASETS /REMARK * /ASS-SYSLST L.SAV.REFM /ASS-SYSDTA *SYSCMD /SET-FILE-LINK DDLIB,ADAvrs.MOD /SET-FILE-LINK DDASSOR1,ADAyyyyy.ASSO,SHARE-UPD=YES /SET-FILE-LINK DDDATAR1,ADAyyyyy.DATA,SHARE-UPD=YES /SET-FILE-LINK DDREST1,ADAyyyyy.SAVE1 /START-PROGRAM *M(ADA.MOD,ADARUN),PR-MO=ANY ADARUN PROG=ADASAV,DB=yyyyy,IDTNAME=ADABAS5B ADASAV RESTORE FMOVE=2 /LOGOFF SYS-OUTPUT=DEL
/.ADASAV LOGON /OPTION MSG=FH,DUMP=YES /REMARK * /REMARK * A D A S A V RESTORE FILES, RESTORE DATABASE /REMARK * FROM OFFLINE CREATED SAVE DATASETS /REMARK * /SYSFILE SYSLST=L.SAV.REFM /FILE ADA.MOD ,LINK=DDLIB /FILE ADAyyyyy.ASSO ,LINK=DDASSOR1,SHARUPD=YES /FILE ADAyyyyy.DATA ,LINK=DDDATAR1,SHARUPD=YES /FILE ADAyyyyy.SAVE1 ,LINK=DDREST1 /EXEC (ADARUN,ADA.MOD) ADARUN PROG=ADASAV,DB=yyyyy,IDTNAME=ADABAS5B ADASAV RESTORE FMOVE=2 /LOGOFF NOSPOOL
Data Set | DD Name | Storage | More Information |
---|---|---|---|
Associator | DDASSORn | disk | |
Data Storage | DDDATARn | disk | |
Work |
DDWORKR1 DDWORKRn (1-9) to DDWORKnn (10-32) in cluster environments |
disk | A Work data set is not required for:
A Work data set is recommended for:
In these cases, if a Work data set is specified, the ADASAV function resets it; if a Work data set is not specified, no Work data sets are reset. Note: If a database is restored and the Work data set has not been reset, nucleus error 72 (PARM ERROR 72) may occur. To resolve this, you can reset any Work data sets using the ADAFRM utility. |
Recovery log (RLOG) | DDRLOGR1 | disk | Required for ADARAI |
Backup copy | DDSAVE1-8 | tape/ disk | Required for SAVE |
Dual copy | DDDUAL1-8 | tape/ disk | Required for SAVE with two backup copies |
Backup copy (input for RESTORE function) | DDREST1-8 | tape/ disk | Required for RESTORE and RESTONL |
Sequential protection log | DDPLOG | tape/ disk | Required for RESTONL and RESTPLOG |
ADARUN parameters | DDCARD | reader | Operations |
ADASAV parameters | DDKARTE | reader | |
ADARUN messages | DDPRINT | printer | Messages and Codes |
ADASAV messages | DDDRUCK | printer | Messages and Codes |
Note:
For RESTONL, the input SAVE tapes and the sequential protection log
can be concatenated, using the name DDREST1.
//ADASAV JOB //* //* ADASAV: //* EXAMPLE HOW TO USE ADASAV TO SAVE THE //* ENTIRE DATABASE //* //SAVE 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 //DDSAVE1 DD DSN=EXAMPLE.DByyyyy.DDSAVE1,UNIT=TAPE, <=== OUTPUT // DISP=(,CATLG),VOL=SER=ADABCK //DDDRUCK DD SYSOUT=X //DDPRINT DD SYSOUT=X //SYSUDUMP DD SYSOUT=X //DDCARD DD * ADARUN PROG=ADASAV,SVC=xxx,DE=dddd,DBID=yyyyy /* //DDKARTE DD * ADASAV SAVE /*
Refer to ADASAV in the JOBS data set for this example.
//ADASAVT JOB //* //* ADASAV: //* EXAMPLE HOW TO USE ADASAV TO SAVE THE //* ENTIRE DATABASE CREATING TWO COPIES OF THE OUTPUT //* //SAVE 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 //DDSAVE1 DD DSN=EXAMPLE.DByyyyy.DDSAVE1,UNIT=TAPE, <=== OUTPUT // DISP=(,CATLG),VOL=SER=ADABCK //DDDUAL1 DD DSN=EXAMPLE.DByyyyy.DDSAVD1,UNIT=TAPE, <=== OUTPUT // DISP=(,CATLG),VOL=SER=ADABCK1 //DDDRUCK DD SYSOUT=X //DDPRINT DD SYSOUT=X //SYSUDUMP DD SYSOUT=X //DDCARD DD * ADARUN PROG=ADASAV,SVC=xxx,DE=dddd,DBID=yyyyy /* //DDKARTE DD * ADASAV SAVE TWOCOPIES /*
Refer to ADASAVT in the JOBS data set for this example.
//ADASAVR JOB //* //* ADASAV: //* EXAMPLE HOW TO USE ADASAV TO RESTORE THE //* ENTIRE DATABASE //* //RESTORE 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 //DDREST1 DD DSN=EXAMPLE.DByyyyy.SAVE, <=== SAVE OUTPUT // DISP=OLD,UNIT=TAPE,VOL=SER=ADABCK //DDDRUCK DD SYSOUT=X //DDPRINT DD SYSOUT=X //SYSUDUMP DD SYSOUT=X //DDCARD DD * ADARUN PROG=ADASAV,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* //DDKARTE DD * ADASAV RESTORE OVERWRITE /*
Refer to ADASAVR in the JOBS data set for this example.
//ADASAVRF JOB //* //* ADASAV: //* EXAMPLE HOW TO USE ADASAV TO RESTORE A FILE //* TO ANY RABNS FROM AN OFFLINE SAVE //* //RESTORE EXEC PGM=ADARUN //STEPLIB DD DISP=SHR,DSN=ADABAS.ADAvrs.LOAD <=== ADABASLOAD //* //DDASSOR1 DD DISP=SHR,DSN=EXAMPLE.DByyyyy.ASSOR1 <=== ASSO //DDDATAR1 DD DISP=SHR,DSN=EXAMPLE.DByyyyy.DATAR1 <=== DATA //DDREST1 DD DSN=EXAMPLE.DByyyyy.SAVE, <=== SAVE OUTPUT // DISP=OLD,UNIT=TAPE,VOL=SER=ADABCK //DDDRUCK DD SYSOUT=X //DDPRINT DD SYSOUT=X //SYSUDUMP DD SYSOUT=X //DDCARD DD * ADARUN PROG=ADASAV,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* //DDKARTE DD * ADASAV RESTORE FMOVE=2 /*
Refer to ADASAVRF in the JOBS data set for this example.
//ADASAVRO JOB //* //* ADASAV: //* EXAMPLE HOW TO USE ADASAV TO RESTORE FILES //* FROM SAVE DATA SETS CREATED ONLINE //* //RESTORE 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 //DDREST1 DD DSN=EXAMPLE.DByyyyy.SAVE, <=== SAVE OUTPUT // DISP=OLD,UNIT=TAPE,VOL=SER=ADABCK //DDPLOG DD DSN=EXAMPLE.DByyyyy.PLOG, <=== PLOG OUTPUT // DISP=OLD,UNIT=TAPE,VOL=SER=PLOGD1 //DDDRUCK DD SYSOUT=X //DDPRINT DD SYSOUT=X //SYSUDUMP DD SYSOUT=X //DDCARD DD * ADARUN PROG=ADASAV,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* //DDKARTE DD * ADASAV RESTONL FILES=2,PLOGNUM=ppp,SYN1=1 /*
Refer to ADASAVRO in the JOBS data set for this example.
//ADASAVRP JOB //* //* ADASAV: //* EXAMPLE HOW TO USE ADASAV TO RESTORE THE //* PROTECTION LOG AFTER AN INTERRUPTED RESTONL //* //RESTORE 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 //DDPLOG DD DSN=EXAMPLE.DByyyyy.PLOG, <=== PLOG INPUT // DISP=OLD,UNIT=TAPE,VOL=SER=PLOGD1 //DDDRUCK DD SYSOUT=X //DDPRINT DD SYSOUT=X //SYSUDUMP DD SYSOUT=X //DDCARD DD * ADARUN PROG=ADASAV,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* //DDKARTE DD * ADASAV RESTPLOG PLOGNUM=ppp,SYN1=1 /*
Refer to ADASAVRP in the JOBS data set for this example.
File | Symbolic Name | Storage | Logical Unit | Information |
---|---|---|---|---|
Associator | ASSORn | disk | see note 1 | |
Data Storage | DATARn | disk | see note 1 | |
Work |
WORKR1 WORKRn (1-9) to WORKnn (10-32) in cluster environments |
disk | see note 1 | A Work data set is not required for:
A Work data set is recommended for:
In these cases, if a Work data set is specified, the ADASAV function resets it; if a Work data set is not specified, no Work data sets are reset. Note: If a database is restored and the Work data set has not been reset, nucleus error 72 (PARM ERROR 72) may occur. To resolve this, you can reset any Work data sets using the ADAFRM utility. |
Recovery log (RLOG) | RLOGR1 | disk | Required for ADARAI | |
Backup copy | SAVE1-8 | tape disk |
SYS011- SYS018 see note 1 |
Required for SAVE |
Dual copy | DUAL1-8 | tape disk |
SYS021- SYS028 see note 1 |
Required for SAVE with two backup copies |
Backup copy (input for RESTORE) | REST1-8 | tape disk |
SYS011- SYS018 see note 1 |
Required for RESTORE and RESTONL |
Sequential protection log | PLOG | tape disk |
SYS010 see note 1 |
Required for RESTONL and RESTPLOG |
ADARUN parameters | SYSRDR CARD CARD |
reader tape disk |
SYSRDR SYS000 See note 1 |
|
ADASAV parameters | reader | SYSIPT | ||
ADARUN messages | printer | SYSLST | ||
ADASAV messages | printer | SYS009 |
Notes:
See Library and File Procedures for z/VSE Examples for descriptions of the z/VSE procedures (PROCs).
Refer to the following members for these examples:
Example | Member |
---|---|
Save database | ADASAV.X |
Save database with two copies of output | ADASAVT.X |
Restore database | ADASAVR.X |
Restore files from save data sets created online | ADASAVRO.X |
Restore protection log after an interrupted RESTONL function |
ADASAVRP.X |
Restore files from save data sets created offline | ADASAVRF.X |
* $$ JOB JNM=ADASAV,CLASS=A,DISP=D * $$ LST CLASS=A,DISP=D // JOB ADASAV * SAVE THE ENTIRE DATABASE // EXEC PROC=ADAVvLIB // EXEC PROC=ADAVvFIL // ASSGN SYS011,TAPE // PAUSE MOUNT LOAD SAVE FILE ON TAPE cuu // TLBL SAVE1,'EXAMPLE.DByyyyy.SAVE' // EXEC ADARUN,SIZE=ADARUN ADARUN PROG=ADASAV,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* ADASAV SAVE /* /& * $$ EOJ
* $$ JOB JNM=ADASAVT,CLASS=A,DISP=D * $$ LST CLASS=A,DISP=D // JOB ADASAVT * SAVE THE ENTIRE DATABASE CREATING TWO COPIES OF THE OUTPUT // EXEC PROC=ADAVvLIB // EXEC PROC=ADAVvFIL // PAUSE MOUNT LOAD SAVE TAPES ON cu1 AND cu2 // ASSGN SYS011,TAPE // TLBL SAVE1,'EXAMPLE.DByyyyy.SAVE' // ASSGN SYS021,TAPE // TLBL DUAL1,'EXAMPLE.DByyyyy.SAVE.COPY' // EXEC ADARUN,SIZE=ADARUN ADARUN PROG=ADASAV,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* ADASAV SAVE TWOCOPIES /* /& * $$ EOJ
* $$ JOB JNM=ADASAVR,CLASS=A,DISP=D * $$ LST CLASS=A,DISP=D // JOB ADASAVR * RESTORE THE ENTIRE DATABASE // EXEC PROC=ADAVvLIB // EXEC PROC=ADAVvFIL // ASSGN SYS011,TAPE // PAUSE MOUNT LOAD SAVE FILE ON TAPE cuu // TLBL REST1,'EXAMPLE.DByyyyy.SAVE' // EXEC ADARUN,SIZE=ADARUN ADARUN PROG=ADASAV,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* ADASAV RESTORE OVERWRITE /* /& * $$ EOJ
* $$ JOB JNM=ADASAVRO,CLASS=A,DISP=D * $$ LST CLASS=A,DISP=D // JOB ADASAVRO * RESTORE FILES FROM SAVE DATA SETS CREATED ONLINE // EXEC PROC=ADAVvLIB // EXEC PROC=ADAVvFIL // PAUSE MOUNT LOAD SAVE FILE ON TAPE cu1 AND PLOG ON TAPE cu2 // ASSGN SYS011,TAPE // TLBL REST1,'EXAMPLE.DByyyyy.SAVE' // ASSGN SYS010,TAPE // TLBL PLOG,'EXAMPLE.DByyyyy.PLOG5' // EXEC ADARUN,SIZE=ADARUN ADARUN PROG=ADASAV,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* ADASAV RESTONL FILES=2,PLOGNUM=ppp,SYN1=1 /* /& * $$ EOJ
* $$ JOB JNM=ADASAVRP,CLASS=A,DISP=D * $$ LST CLASS=A,DISP=D // JOB ADASAVRP * RESTORE THE PROTECTION LOG AFTER AN INTERRUPTED RESTONL // EXEC PROC=ADAVvLIB // EXEC PROC=ADAVvFIL // PAUSE MOUNT LOAD PLOG FILE ON TAPE cuu // ASSGN SYS010,TAPE // TLBL PLOG,'EXAMPLE.DByyyyy.PLOG5' // EXEC ADARUN,SIZE=ADARUN ADARUN PROG=ADASAV,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* ADASAV RESTPLOG PLOGNUM=ppp,SYN1=1 /* /& * $$ EOJ
* $$ JOB JNM=ADASAVRF,CLASS=A,DISP=D * $$ LST CLASS=A,DISP=D // JOB ADASAVRF * RESTORE A FILE TO ANY RABNS FROM AN OFFLINE SAVE // EXEC PROC=ADAVvLIB // EXEC PROC=ADAVvFIL // ASSGN SYS011,TAPE // PAUSE MOUNT LOAD SAVE FILE ON TAPE cuu // TLBL REST1,'EXAMPLE.DByyyyy.SAVE' // EXEC ADARUN,SIZE=ADARUN ADARUN PROG=ADASAV,SVC=xxx,DEVICE=dddd,DBID=yyyyy /* ADASAV RESTORE FMOVE=2 /* /& * $$ EOJ