Expanded Retention Option › Running SARPAC › Example 4: Consolidating Two Tapes of a Tape Storage Group

Example 4: Consolidating Two Tapes of a Tape Storage Group

The SYSIN DD consolidates tape numbers 1156 and 1157 for the tape storage group PAYROLL for database VIEW.SYSTEM1:

//EXAMPLE  JOB  ACCOUNT,PROGRAMMER
//SARPAC   EXEC PGM=SARPAC,PARM='VIEW.SYSTEM1',REGION=0M
//STEPLIB  DD   DSN=CAI.CVDELOAD,DISP=SHR
//SYSPRINT DD   SYSOUT=*
//SARDRLST DD   SYSOUT=*
//SYSUDUMP DD   SYSOUT=*
//SYSOUT   DD   SYSOUT=*
//SORTLIB  DD   DSN=SYS1.SORTLIB,DISP=SHR
//SORTWK01 DD   UNIT=SYSDA,SPACE=(CYL,(50))
//SORTWK02 DD   UNIT=SYSDA,SPACE=(CYL,(50))
//SORTWK03 DD   UNIT=SYSDA,SPACE=(CYL,(50))
//SYSIN    DD   *
STORGRP=PAYROLL
TAPESEQ=1156
TAPESEQ=1157
//*