Jeff Gribbin, EDS
2006-03-04 17:04:56 UTC
We have a need to audit a few hundred 3490 tapes - we need to verify that
the internal VOL1 labels match with the external labels.
A fellow team-member wished that we could, "reverse engineer" the usual
technique where the system displays the volser of the tape that it WANTS
on the 3490 display and instead get it to display the volser of whatever
tape you happen to LOAD.
This triggered memories of utilities having been written to do such
things, and discussed on VMSHARE, long ago in a galaxy far far away.
So, on to http://vm.marist.edu/~vmshare/ to see what we can find. In next-
to no time, I find NOTE RXLD3480, from Mike Walter, dated 1996.
A few minutes of cut-and-pasting later (hey, Rob, ever considered putting
a DOWNLOAD function on the VMSHARE pages - or is it there and I missed
it?) and I have the file on MAINT's 191. A quick VMFHLASM against my zVM
5.2 MACLIBS and it's assembled without error and two minutes later I'm
flashing up messages on my tape drives.
Another half-hour to develop a suitable Rexx wrapper and, lo, I have my
tape-volser-audit utility up and running!
Thankyou Mike, thankyou Rob, thankyou MARIST, thankyou VMSHARE.
If you're enough of a newbie that you don't know what VMSHARE is then
my, "give back" to the community on this occasion is to invite you to
visit the archives (URL above). Yes, it's old stuff - but it's still good
stuff and anyone who has a living interest in VM will benefit from the
time that they spend there.