If the chain of a single file multi-volumes is broken, how can it be re-built ?
:
We can have 2 cases:
1) if the volumes can be scratched then clear a volume with invalid multivolume pointers to make available for scratch processing running a TMSUPDTE with the following SYSIN:
VOL nnnnnn,NOCHAIN,NODSN
REP DSN=HEXZEROS
REP 1STVOL=HEXZEROS
REP NEXTVOL=HEXZEROS
REP PREVVOL=HEXZEROS
REP VOLSEQ=1
REP EXPDT=current-date
2) Repair a broken multivolume chain if it has not scratched and reused:
VOL nnnnnn,NOCHAIN,NODSN
REP DSN=valid-data-set-name
REP 1STVOL=valid-VOLSER
REP NEXTVOL=valid-VOLSER
REP PREVVOL=valid-VOLSER
REP VOLSEQ=valid-volseq
Sample in this case
TMSUPDTE Control Statements - Correcting Multivolume Pointers
The samples below assume that PARM=NODSN was coded.
Either
- Clear a volume with invalid multivolume pointers to make available for scratch processing:
VOL nnnnnn,NOCHAIN
REP DSN=HEXZEROS
REP 1STVOL=HEXZEROS
REP NEXTVOL=HEXZEROS
REP PREVVOL=HEXZEROS
REP VOLSEQ=1
REP EXPDT=current-date
or
- repair a broken multivolume chain:
VOL nnnnnn,NOCHAIN
REP DSN=valid-data-set-name
REP 1STVOL=valid-VOLSER
REP NEXTVOL=valid-VOLSER
REP PREVVOL=valid-VOLSER
REP VOLSEQ=valid-volseq
For example a chain of 6 volumes is broken and need to be rebuilt :
VOL 500152
VER DSN= TAPE41.SYS3.SMFDUMP.M1017
REP VOLSEQ=1
REP 1STVOL=500152,NEXTVOL=503500,PREVVOL=HEXZEROS
VOL 503500,NOCHAIN
VER DSN= TAPE41.SYS3.SMFDUMP.M1017
REP VOLSEQ=2
REP 1STVOL=500152,NEXTVOL=503906,PREVVOL=500152
VOL 503906,NOCHAIN
VER DSN= TAPE41.SYS3.SMFDUMP.M1017
REP VOLSEQ=3
REP 1STVOL=5001521,NEXTVOL=510591,PREVVOL=503500
VOL 510591,NOCHAIN
VER DSN= TAPE41.SYS3.SMFDUMP.M1017
REP VOLSEQ=4
REP 1STVOL=500152,NEXTVOL=508956,PREVVOL=503906
VOL 508956,NOCHAIN
VER DSN= TAPE41.SYS3.SMFDUMP.M1017
REP VOLSEQ=5
REP 1STVOL=500152,NEXTVOL=505910,PREVVOL=510591
VOL 505910,NOCHAIN
VER DSN= TAPE41.SYS3.SMFDUMP.M1017
REP VOLSEQ=6
REP 1STVOL=500152,NEXTVOL= HEXZEROS,PREVVOL=508956
Once the chain has been rebuilt, a TMSPTRS should be run and check if there are the chaining problems.