IBM 5695-DF1 ユーザーズマニュアル
192
Storage Management with DB2 for OS/390
Figure 128. Storage Class Routine Incorporating Archive Logs
B.2.2 Management Class
Two Management Classes, MCDBICM and MCDBLV2, were added to the SMS
configuration to separate primary and secondary archive log data sets of the
three subsystems with different criteria.
configuration to separate primary and secondary archive log data sets of the
three subsystems with different criteria.
Figure 129 on page 192 shows an extract of the extended Management Class
ACS routine used in the previous test case, now incorporating the archive logs:
ACS routine used in the previous test case, now incorporating the archive logs:
Figure 129. Management Class Routine Incorporating Archive Logs
/************************************************/
/* STORAGE CLASS
/* STORAGE CLASS
*/
/* FILTLIST DEFINITIONS
*/
/************************************************/
FILTLIST DBSYS
INCLUDE(DB2*.BSDS*.**,
DB2*.LOGCOPY*.DS*)
FILTLIST DBARCH
INCLUDE(DB2*.ARCHLOG*.**)
/************************************************/
/* SELECTION ROUTINE FOR DB2 RECOVERY DATA SETS */
/************************************************/
/* SELECTION ROUTINE FOR DB2 RECOVERY DATA SETS */
/************************************************/
SELECT
WHEN (&DSN = &DBSYS)
SET &STORCLAS = 'SCDBACTL'
WHEN (&DSN = &DBARCH)
SET &STORCLAS = 'SCDBARCH'
OTHERWISE SET &STORCLAS = ''
SET &STORCLAS = 'SCDBACTL'
WHEN (&DSN = &DBARCH)
SET &STORCLAS = 'SCDBARCH'
OTHERWISE SET &STORCLAS = ''
END
/************************************************/
/* MANAGEMENT CLASS
/* MANAGEMENT CLASS
*/
/* FILTLIST DEFINITIONS
*/
/************************************************/
FILTLIST ACTLOG INCLUDE(DB2*.BSDS*.**,
DB2*.LOGCOPY*.DS*)
/************************************************/
/* SELECTION ROUTINE FOR DB2 RECOVERY DATA SETS */
/************************************************/
/* SELECTION ROUTINE FOR DB2 RECOVERY DATA SETS */
/************************************************/
IF &DSN EQ &ACTLOG
THEN DO
SET &MGMTCLAS = 'MCDBACTL'
EXIT
SET &MGMTCLAS = 'MCDBACTL'
EXIT
END
IF (&DSN(2) EQ 'ARCHLOG1')
THEN DO
SET &MGMTCLAS = 'MCDBICM'
SET &MGMTCLAS = 'MCDBICM'
END
ELSE DO
ELSE DO
SET &MGMTCLAS = 'MCDBLV2'
END