IBM 5655-DB2 Server User Manual


 
Test Cases for DB2 Table Space Data Sets 167
Figure 90. Test Case 3 - Storage Class Routine Extract
A.4.2 Management Class
This exercise requires multiple management attributes for the Table spaces
according to the space name specified in the data set name. Therefore, using
ISMF, option 3.3, three Management Classes,
MCDB20, MCDB21, and MCDB22
were defined accordingly. Figure 91 on page 168 shows an example of page 2 of
the associated panel required to achieve this:
/*************************************************/
/* STORAGE CLASS */
/* FILTLIST DEFINITIONS */
/*************************************************/
FILTLIST SCDBMED INCLUDE(DB2P.DSNDB%.**)
EXCLUDE(DB2P.DSNDB%.BCUSTOMR.**,
DB2P.DSNDB%.BSERVICE.**,
DB2P.DSNDB%.BTRANS.**,
DB2P.DSNDB%.BACCTS.**)
FILTLIST SCDBCRIT INCLUDE(DB2P.DSNDB%.BACCTS.**)
FILTLIST SCDBFAST INCLUDE(DB2P.DSNDB%.BCUSTOMR.**,
DB2P.DSNDB%.BSERVICE.**,
DB2P.DSNDB%.BTRANS.**)
FILTLIST SCDBTEST INCLUDE(DB2D.DSNDB%.**)
/*************************************************/
/* SELECTION ROUTINE FOR DB2 TABLE SPACES */
/*************************************************/
SELECT
WHEN (&DSN = &SCDBTEST)
SET &STORCLAS = 'SCDBTEST'
WHEN (&DSN = &SCDBFAST)
SET &STORCLAS = 'SCDBFAST'
WHEN (&DSN = &SCDBMED)
SET &STORCLAS = 'SCDBMED'
WHEN (&DSN = &SCDBCRIT)
SET &STORCLAS = ’SCDBCRIT’
OTHERWISE SET &STORCLAS = ''
END