Limited supportBMC provides limited support for this version of the product. As a result, BMC no longer accepts comments in this space. If you encounter problems with the product version or the space, contact BMC Support.BMC recommends upgrading to the latest version of the product. To see documentation for that version, see BMC AMI Ops Monitor for Db2 13.1 
.
.
Sample DPPSMF procedure
The following BBSAMP members contain sample job control statements:
- DPPSMFA (IBM LOAD method)
- DPPSMFN (BMC AMI Load method)
The following figure shows the sample statements from the BBSAMP member DPPSMFA for the IBM LOAD method. For the BMC AMI Load, see DPPSMFN.
//DPPSMFA PROC HIDP='HILVL.RUN.LIB', <-- UPDATE
// HIDB2=DSN1210, <-- VERIFY
// UNIT=SYSDA, <-- VERIFY
//* THE FOLLOWING IS FOR REPORTS FROM SMF
//* RPTHI SETS THE HIGH LEVEL QUALIFIER FOR THE DATASETS. THIS
//* PARAMETER SHOULD BE SET TO SAME VALUE IN DPRSMFA
// RPTHI=HILVL, <-- UPDATE
//* THE FOLLOWING CAN DISABLE SUM / LOAD
// SUMPGM=DPSUMLD,
// LOADPGM=DSNUTILB
//*
//*------------------------------------------------------------*
//* THIS PROC IS USED BY THE DPRSMF JOB TO SUMMARIZE AND LOAD *
//* THE SMF RECORDS IN TO THE DB2 TABLES. THE DPRSMF JOB HAS *
//* FOUR JCLS WHICH MAKES USE OF THIS PROC. ALL THE 4 JCLS *
//* CALLS THIS PROC WITH THEIR OWN SET OF INPUT AND OUTPUT *
//* FILES. *
//*------------------------------------------------------------*
//*------------------------------------------------------------*
//* BUILD DB2 LOAD CONTROL STATEMENTS, *
//* SUMMARIZE ACCOUNTING AND DDF ACCOUNTING RECORDS,*
//* PURGE OLD RECORDS *
//*------------------------------------------------------------*
//*
//STEP4 EXEC PGM=&SUMPGM,REGION=4096K DPSUMLD
//STEPLIB DD DISP=SHR,DSN=&HIDB2..SDSNLOAD
// DD DISP=SHR,DSN=&HIDB2..SDSNEXIT
// DD DISP=SHR,DSN=&HIDP..BBLINK
//DPSYSOUT DD SYSOUT=* PROGRAM MESSAGES
//SYSOUT DD SYSOUT=* SORT MESSAGE
//SORTMSG DD SYSOUT=* SORT MESSAGES
//SYSUDUMP DD SYSOUT=*
//DPSYSIN DD DUMMY CONTROL STATEMENTS
//DPLOAD DD UNIT=&UNIT,DISP=(,PASS),SPACE=(TRK,(1,1),RLSE),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=3200)
//*
//DPREPAIR DD UNIT=&UNIT,DISP=(,PASS),SPACE=(CYL,(1,1),RLSE),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=3200)
//*
//DB2LOAD IF RC < 8 THEN
//*
//*------------------------------------------------------------*
//* LOAD INTO DB2 TABLES *
//*------------------------------------------------------------*
//*
//STEP5 EXEC PGM=&LOADPGM,REGION=4096K DSNUTILB
//STEPLIB DD DSN=&HIDB2..SDSNLOAD,DISP=SHR
// DD DSN=&HIDB2..SDSNEXIT,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SORTMSG DD SYSOUT=* SORT MESSAGES
//UTPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SORTOUT DD UNIT=&UNIT,SPACE=(CYL,(10,2))
//SYSUT1 DD UNIT=&UNIT,SPACE=(CYL,(5,2))
//SYSIN DD DISP=(OLD,DELETE),DSN=*.STEP4.DPLOAD
//*
//*
//REPAIR IF RC < 8 THEN
//*
//*------------------------------------------------------------*
//* THE BELOW STEP REPAIRS THE TABLESPACES
//*------------------------------------------------------------*
//*
//STEP6 EXEC PGM=&LOADPGM,REGION=4096K
//STEPLIB DD DSN=&HIDB2..SDSNLOAD,DISP=SHR
// DD DSN=&HIDB2..SDSNEXIT,DISP=SHR
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//*SYSUDUMP DD SYSOUT=*
//SYSUT1 DD UNIT=&UNIT,SPACE=(CYL,(5,2))
//*
//SYSIN DD DISP=(OLD,DELETE),DSN=*.STEP4.DPREPAIR
//*
//DELETE IF RC < 8 THEN
//*
//*------------------------------------------------------------*
//* DELETE THE INTERMEDIATE FILES *
//*------------------------------------------------------------*
//*
//STEP7 EXEC PGM=IEFBR14
//SYSPRINT DD SYSOUT=*
//*
//DELETE ENDIF
//*
//REPAIR ENDIF
//*
//DB2LOAD ENDIF
//*
// HIDB2=DSN1210, <-- VERIFY
// UNIT=SYSDA, <-- VERIFY
//* THE FOLLOWING IS FOR REPORTS FROM SMF
//* RPTHI SETS THE HIGH LEVEL QUALIFIER FOR THE DATASETS. THIS
//* PARAMETER SHOULD BE SET TO SAME VALUE IN DPRSMFA
// RPTHI=HILVL, <-- UPDATE
//* THE FOLLOWING CAN DISABLE SUM / LOAD
// SUMPGM=DPSUMLD,
// LOADPGM=DSNUTILB
//*
//*------------------------------------------------------------*
//* THIS PROC IS USED BY THE DPRSMF JOB TO SUMMARIZE AND LOAD *
//* THE SMF RECORDS IN TO THE DB2 TABLES. THE DPRSMF JOB HAS *
//* FOUR JCLS WHICH MAKES USE OF THIS PROC. ALL THE 4 JCLS *
//* CALLS THIS PROC WITH THEIR OWN SET OF INPUT AND OUTPUT *
//* FILES. *
//*------------------------------------------------------------*
//*------------------------------------------------------------*
//* BUILD DB2 LOAD CONTROL STATEMENTS, *
//* SUMMARIZE ACCOUNTING AND DDF ACCOUNTING RECORDS,*
//* PURGE OLD RECORDS *
//*------------------------------------------------------------*
//*
//STEP4 EXEC PGM=&SUMPGM,REGION=4096K DPSUMLD
//STEPLIB DD DISP=SHR,DSN=&HIDB2..SDSNLOAD
// DD DISP=SHR,DSN=&HIDB2..SDSNEXIT
// DD DISP=SHR,DSN=&HIDP..BBLINK
//DPSYSOUT DD SYSOUT=* PROGRAM MESSAGES
//SYSOUT DD SYSOUT=* SORT MESSAGE
//SORTMSG DD SYSOUT=* SORT MESSAGES
//SYSUDUMP DD SYSOUT=*
//DPSYSIN DD DUMMY CONTROL STATEMENTS
//DPLOAD DD UNIT=&UNIT,DISP=(,PASS),SPACE=(TRK,(1,1),RLSE),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=3200)
//*
//DPREPAIR DD UNIT=&UNIT,DISP=(,PASS),SPACE=(CYL,(1,1),RLSE),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=3200)
//*
//DB2LOAD IF RC < 8 THEN
//*
//*------------------------------------------------------------*
//* LOAD INTO DB2 TABLES *
//*------------------------------------------------------------*
//*
//STEP5 EXEC PGM=&LOADPGM,REGION=4096K DSNUTILB
//STEPLIB DD DSN=&HIDB2..SDSNLOAD,DISP=SHR
// DD DSN=&HIDB2..SDSNEXIT,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SORTMSG DD SYSOUT=* SORT MESSAGES
//UTPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SORTOUT DD UNIT=&UNIT,SPACE=(CYL,(10,2))
//SYSUT1 DD UNIT=&UNIT,SPACE=(CYL,(5,2))
//SYSIN DD DISP=(OLD,DELETE),DSN=*.STEP4.DPLOAD
//*
//*
//REPAIR IF RC < 8 THEN
//*
//*------------------------------------------------------------*
//* THE BELOW STEP REPAIRS THE TABLESPACES
//*------------------------------------------------------------*
//*
//STEP6 EXEC PGM=&LOADPGM,REGION=4096K
//STEPLIB DD DSN=&HIDB2..SDSNLOAD,DISP=SHR
// DD DSN=&HIDB2..SDSNEXIT,DISP=SHR
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//*SYSUDUMP DD SYSOUT=*
//SYSUT1 DD UNIT=&UNIT,SPACE=(CYL,(5,2))
//*
//SYSIN DD DISP=(OLD,DELETE),DSN=*.STEP4.DPREPAIR
//*
//DELETE IF RC < 8 THEN
//*
//*------------------------------------------------------------*
//* DELETE THE INTERMEDIATE FILES *
//*------------------------------------------------------------*
//*
//STEP7 EXEC PGM=IEFBR14
//SYSPRINT DD SYSOUT=*
//*
//DELETE ENDIF
//*
//REPAIR ENDIF
//*
//DB2LOAD ENDIF
//*
Related topic
Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*