Step 2: Update ACS routine

Update your ACS routine to use an appropriate filter list and logic to assign management classes to data sets on tape. When a volume is opened, DFSMSrmm records the management class name you assign to new tape data sets using your ACS routine.

Figure 1 shows a management class ACS routine that maps the expiration date 99000 to a management class name M99000, and the expiration dates 99001 through 99009 to the management class name M99009.

Figure 1. Assigning management class to data sets on tape

PROC 1 &MGMTCLAS
/********************************************************/
/*  DEFINE FILTER FOR KEEP WHILE CATALOGED  EXPDT=99000 */
/********************************************************/
  FILTLIST SPECIAL_DATE9 INCLUDE('1999000')
/********************************************************/
/*  DEFINE FILTER FOR UP TO 9 CYCLES                    */
/********************************************************/
  FILTLIST SPECIAL_DATEC9 INCLUDE(199900*)
/********************************************************/
/*  DEFINE FILTER FOR TAPE UNITS                        */
/********************************************************/
  FILTLIST TAPEUNITS INCLUDE(TAPE*,T3420*,T3480*,T3490*,
                                   '3420','3480','3490',
                                   T3590*,'3590')
/********************************************************/
/*  SELECT VALID MANAGEMENT CLASS                       */
/********************************************************/
  SELECT
    WHEN (&EXPDT = &SPECIAL_DATE9 && &UNIT = &TAPEUNITS)
      SET &MGMTCLAS = 'M99000'
    WHEN (&EXPDT = &SPECIAL_DATEC9 && &UNIT = &TAPEUNITS)
      SET &MGMTCLAS = 'M99009'
    OTHERWISE
      SET &MGMTCLAS = 'NORMAL'
  END
END