Rename your extra (TAP001). Have it begin with a Z so that it's always
last.
Assume you're starting from scratch...
RTVSYSVAL QDAYOFWEEK &QDAYOFWEEK
CHGVAR &DAYOFWEEK (%SST(QDAYOFWEEK,2,3)) /* strip off leading asterisk */
ADDTAPCTG DEV(TAPMLB02) CTG(&DAYOFWEEK Zsomething)
SETTAPCGY DEV(TAPMLB02) OPTION(*MOUNTED)
SAV...
SETTAPCGY DEV(TAPMLB02) OPTION(*DEMOUNTED)
RMVTAPCTG DEV(TAPMLB02) CGY(*NOSHARE)
However, if you have a single slot I/O station that RMVTAPCTG may have
issues.
Do you ever remove your tapes and move them offsite?
Rob Berendt
This mailing list archive is Copyright 1997-2026 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact
[javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
midrange.com
