Example 113 - ADD&CATALOG |
VOLUME DELETE #MYMETACD(PACK,SERIALNO="CD0002"); MYSELF(FAMILY="DISK = " & MYCATALOGFAMILY & " ONLY"); CATALOG PURGE (METASOFT)COPYWRITE/LIBRARY; REMOVE (METASOFT)COPYWRITE/LIBRARY; MYSELF(FAMILY=#MYPATH); ADD&CATALOG (METASOFT)COPYWRITE/LIBRARY FROM #MYMETACD(CD,SERIALNO="CD0002",SAVEFACTOR=365) TO NULL(CD,HOSTNAME=LOCAL,FAMILYOWNER=#MYCATALOGFAMILY)[T]; |
![]() |
|