book
Article ID: 199048
calendar_today
Updated On:
Issue/Introduction
The client, who is unable to run View's SARPAC, as they are not licensed for ERO, want to copy reports from one tape to another.
How can this be accomplished?
Resolution
If, due to not having the licensing to use View's ERO to be able to run SARPAC, if there are only a few tapes to be copied, then SARTCP (with the COPYASIS parm) can be considered.
If a duplex (SARDPLX) tape is available:
//TAPECOPY JOB ACCOUNT,PROGRAMMER
//STEP1 EXEC PGM=SARTCP,PARM='COPYASIS'
//STEPLIB DD DSN=CAI.CVDELOAD,DISP=SHR
//SYSPRINT DD SYSOUT=*
//TAPEIN DD DSN=VIEW.SARDPLX.T00nnnnn,
// DISP=OLD
//TAPEOUT DD DSN=VIEW.SARTAPE.T00nnnnn,
// DISP=(,CATLG),UNIT=TAPE,LABEL=EXPDT=99000
//SYSIN DD DUMMY
//
If a duplex tape is NOT available:
//TAPECOPY JOB ACCOUNT,PROGRAMMER
//STEP1 EXEC PGM=SARTCP,PARM='COPYASIS'
//STEPLIB DD DSN=CAI.CVDELOAD,DISP=SHR
//SYSPRINT DD SYSOUT=*
//TAPEIN DD DSN=VIEW.SARTAPE.T00nnnnn,
// DISP=(OLD,UNCATLG)
//TAPEOUT DD DSN=VIEW.SARTAPE.T00nnnnn,
// DISP=(,CATLG),UNIT=TAPE,LABEL=EXPDT=99000
//SYSIN DD DUMMY
//