I just found that some of the oldest tapes have EDMID = 0000

Tony Thigpen

Tony Thigpen wrote on 02/19/2016 08:19 PM:
On the few I just checked, EDMID = blanks.

Tony Thigpen

Lizette Koehler wrote on 02/19/2016 08:15 PM:
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



----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN



----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to