When we tried to recall the job from tape, we have received a SARTPI43 I/O error.
13:04:20 SARTPI43 I/O error positioning tape
13:04:20 SARTPI44 DUPLEX Tape does not exist or does not contain file - TSQ=9
Release : 14.0
Component : View
As the first 2/3 of the reports on the tape in question were salvagable, the client was instructed to:
. Run SARTCP, to create another version of the tape, which only contains the salvagable (11749) reports:
//XXXXXXXX JOB ...
//SARTCP EXEC PGM=SARTCP
//STEPLIB DD DISP=SHR,DSN=VIEW.CVDELOAD <=== MODIFY, IF USED
//SYSPRINT DD SYSOUT=*
//TAPEIN DD DISP=(OLD,UNCATLG),DSN=view_hlq.SARTAPE.T0009509
//TAPEOUT DD DISP=(,CATLG),
// DSN=view_hlq.SARTAPE.T0009509,
// UNIT=xxxx,LABEL=(,SL,EXPDT=99000)
//SYSIN DD *
SKIP 11750-99999999
/*
//
. Run SARTSLST, against the tape in question, creating a //CTLCARDS file of SARBCH /DELETE transactions:
//XXXXXXXX JOB ...
//SARTSLST EXEC PGM=SARTSLST,PARM='VIEW_HLQ,9509' <=== MODIFY DB NAME
//STEPLIB DD DISP=SHR,DSN=VIEW.CVDELOAD <=== MODIFY, IF USED
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//CTLCARDS DD DSN=XXXXXX.XXXXXX.CTLCARDS,
// DISP=(,CATLG,DELETE),
// SPACE=(TRK,(NN,NN),RLSE),
// UNIT=XXXX,VOL=SER=YYYYYY,
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//
. Run SARBCH, with input of the //CTLCARDS file, to delete the reports that cannot be accessed on the tape:
//XXXXXXXX JOB ...
//SARBCH EXEC PGM=SARBCH,PARM='VIEW_HLQ' <=== MODIFY DB NAME
//STEPLIB DD DISP=SHR,DSN=VIEW.CVDELOAD <=== MODIFY, IF USED
//SYSPRINT DD SYSOUT=*
//REPORT DD SYSOUT=*
//SYSIN DD DISP=SHR,DSN=XXXXXX.XXXXXX.CTLCARDS
//