Where these tapes created by an external data manager? (EDM) In a ca1 display of the tape (I like using the ISPF CA1 function) See if this field is set
> EDMID = HPDM Lizette > -----Original Message----- > From: IBM Mainframe Discussion List [mailto:[email protected]] On > Behalf Of Tony Thigpen > Sent: Friday, February 19, 2016 6:09 PM > To: [email protected] > Subject: Question on CA-1 > > It's clean-up time. > > I have about 400 old 3380 tapes I need to get out of the tape library and > distroy. These are all over 7 years old for systems that are long gone. They > were originally put into the catalog with multiple generations, but since no > new generations are being created, they have not been scratching. > > I found the following old jcl in a library and wanted to ask if this is the > best way to handle this: > > //TMSEXPD EXEC PGM=TMSEXPDT,PARM='TEST' > //TMSRPT DD SYSOUT=* > //SYSPRINT DD SYSOUT=* > //SYSIN DD * > DSN=MPXSS1.UPSTREAM.DAILY.BACKUP1.G0189V00,LABEL=RETPD=2600 > .. a bunch more .. > /* > > Then, just let the next day scratch process scratch the tapes. > > I plan on using REXX to build the SYSIN, including all DSNs (full GEN > number) found on every tape volume I need to scratch out of the tape library. > > Also, Do I need to run TMSOSCAT after the alters, after the scratch process, > or not at all? > > Thoughts? > > -- > Tony Thigpen > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
