/**********************************************************************/
/*             Start of FILTLIST Statements                           */
/**********************************************************************/
FILTLIST VALID_DEVICE        INCLUDE('3380','3390','3420',3480','3490',
                                     'SYSDA',','3480X',TAPE*,'3494',
                                     '3495','9345')
FILTLIST TMM_DATA_CLASS      INCLUDE('TMMACTV','TMMBKUP')
FILTLIST TAPE_DATA_CLASS     INCLUDE('TAPACTV','TAPBKUP',TAPTEMP',
                                    'TAPOSITE','NONTMM')
FILTLIST VALID_STORAGE_CLASS INCLUDE('BACKUP','CRITICAL','DBCRIT','FAST',
                                    'FASTREAD','FASTWRIT','GSPACE',
                                    'MEDIUM','NONVIO','STANDARD')
/**********************************************************************/
/*             End of FILTLIST Statements                             */
/**********************************************************************/
SELECT
 WHEN (&UNIT ^= &VALID_DEVICE && &UNIT ^= 'STK=SMSD')
                                          /*  Unit must be valid DASD*/
   DO                                     /*  or tape device or not  */
     SET &STORCLAS = ''                   /*  externally specified   */
     EXIT
   END
 WHEN (&HLQ = &HSM_HLQ &&                 /*  Do not manage data sets*/
       &DSN(2) = &HSM_2LQ)                /*  on ML1, ML2            */
   DO
     SET &STORCLAS = ''
     EXIT
   END
 WHEN (&DATACLAS = &TAPE_DATA_CLASS)      /*  Do not manage "large"  */
   DO                                     /*  or offsite tape data   */
     SET &STORCLAS = ''                   /*  sets                   */
     EXIT
   END
 WHEN (&GROUP = &SPECIAL_USERS &&         /*   Permit storage admin. */
        &STORCLAS = 'NONSMS')             /*   or data base admin.   */
   DO                                     /*   to create             */
     SET &STORCLAS = ''                   /*   non-system-managed    */
     EXIT                                 /*   data sets             */
   END
 WHEN (&DATACLAS = &TMM_DATA_CLASS)       /*   Manage active, backup,*/
   DO                                     /*   temporary data sets   */
     SET &STORCLAS = 'STANDARD'           /*   that are tape mount   */
     EXIT                                 /*   management candidates */
   END