John, If you have CA-1 or CA-Dynam/TLMS on the system, you can run the CTSSYNC utility. That will allow for a statement of "EJECT,vvvvvv-vvvvvv" to be entered. It will then invoke LCS/OAM services for all the volumes individually. It will take a while of course, but if you haven't already coded a REXX or SORT to create the 10,000 commands you can use that.
Russell Witt CA-1 Level-2 Support Manager >From: "McKown, John" <[EMAIL PROTECTED]> >Date: 2006/10/02 Mon AM 08:31:21 CDT >To: [email protected] >Subject: IBM VTS question. >We have an IBM VTS. We only use MEDIA2 virtual tapes in the VTS. >However, by accident, the tape librarian did an insert of 10,000 (ten >thousand) volumes of MEDIA1. She now want to "range delete" these. From >what I can tell, although the INSERT is done via the VTS control panel >(web page), the DELETE must be done on the z/OS side via a LIBRARY >EJECT,volser,PURGE to remove the volumes from the TCDB. And the LIBRARY >EJECT does not have a "range" capability, so I need to issue 10,000 >individual LIBRARY EJECT commands. > >Am I correct, or is there an easier way? Oh, I will write a REXX routine >to create the LIBRARY EJECT commands. I don't plan to entering them "by >hand". > >-- >John McKown ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
