PRESTAGE virtual volumes into VTS

//*  THIS JOB USES THE BVIR VOLUME MAP AND CACHE CONTENTS FILES TO      00070000
//*  GENERATE RECALL JOBS FOR A LIST OF USER VIRTUAL VOLUMES.           00080000
//*  YOU CAN CONTROL THE NUMBER OF VIRTUAL AND PHYSICAL DRIVES USED.    00090008
//*  THE GETVOLS JOB CAN BE USED TO GENERATE A LIST OF VOLSERS FROM     00100019
//*  THE TAPE MANAGEMENT CATALOG USING INCDSN FILTERS.                  00110019
//*                                                                     00120015
//* IF YOU WILL BE USING THE STORECLASS PARAMETER TO RESET LOGICAL      00130015
//*  VOLUMES FROM PG0 TO PG1, THEN THE IBMTOOLS.LOAD MEMBERS, BVIRMCH   00140015
//*  AND COMPARSE MUST BE COPIED TO AN APF LIBRARY WHICH IS POINTED     00150015
//*  TO BY THE STEPLIB OF THIS JOB.                                     00160015
//*  THIS PROGRAM WILL ISSUE THE LIBRARY LMPOLICY COMMAND TO RESET      00170016
//*  THE STORCLAS FROM PG0 TO PG1 WHICH WILL GIVE THE VOLUMES A         00180016
//*  BETTER CHANCE OF REMAINING IN CACHE FOR THE PRODUCTION JOBS.       00190016
//* END;                                                                00200015
//* STEPS:                                                              00210000
//* 1. IF PTP, SET LOCAL VTS TO PRIMARY MODE                            00220012
//* 2. RUN BVIRVTS JOB.                                                 00230003
//* 3. SUPPLY A SAMPLE JOB CARD IN THE JOBCARD DD STATEMENT BELOW.      00240005
//*  A. CONSIDER USING A UNIQUE INITIATOR CLASS TO AVOID CONFLICTS.     00250006
//* 4. THE USER ON THIS JOB CARD MUST HAVE LABEL=(1,BLP) AUTHORITY.     00260000
//* 5. REVIEW CONTROL PARMS IN SYSCNTL DD STATAMENT OF THIS JOB.        00270008
//*  A. IF VTS CODE IS 7.2, USE 1 VIRTUAL DRIVE PER JOB.                00280004
//*  B. IF VTS CODE IS 7.3 OR GREATER, USE MULTIPLE VIRTUALS PER JOB.   00290004
//*  C. FOR ANY CODE RELEASE, USE MULTIPLE PHYSICAL DRIVES.             00300004
//* 6. SUPPLY THE LIST OF VIRTUAL VOLUMES TO BE RECALLED.               00310002
//* 7. SUBMIT THIS JOB AND WAIT FOR RECALL JOBS TO COMPLETE.            00320002
//* 8. IF PTP, RETURN TO NORMAL MODE IF PREVIOUSLY SET TO PRIMARY.      00330010
//* 9. RUN PRODUCTION JOBS THAT REQUIRE THE RECALLED VOLUMES.           00340003
//*                                                                     00350013
//*  IF YOU ARE PRE-STAGING INTO A PTP RUNNING BALANCED MODE, THERE IS  00360013
//*   NO WAY TO DIRECT THE RECALLS TO A SPECIFIC VTS.  THIS PROCESS     00370013
//*   WILL, HOWEVER, RECALL THEM QUICKER THAN WAITING FOR THE ACTUAL    00380013
//*   APPLICATION TO RUN AND RECALL THEM RANDOMLY.  WHEN YOU RUN THE    00390013
//*   BVIRVTS JOB, YOU SHOULD ASK FOR THE CACHE CONTENTS OF EACH VTS.   00400013
//*   THEN, IN THIS JOB, CONCATINATE THE SECOND CACHFILE DATA SET.      00410013