DSNTEJDS
THIS JCL PREPARES AND RUNS THE SMF DECOMPRESSION PROGRAM DSNTSMFD.
//**********************************************************************
//* NAME = DSNTEJDS *
//* *
//* DESCRIPTIVE NAME = SMF Decompression *
//* ASSEMBLER *
//* *
//* Licensed Materials - Property of IBM *
//* 5605-DB2 *
//* (C) COPYRIGHT 1982, 2010 IBM Corp. All Rights Reserved. *
//* *
//* STATUS = Version 10 *
//* *
//* FUNCTION = THIS JCL PREPARES AND RUNS THE SMF DECOMPRESSION *
//* PROGRAM DSNTSMFD. *
//* *
//* Pseudocode = *
//* TEJDSS01 Step Assemble DSNTSMFD *
//* TEJDSS02 Step Delete existing DSNTSMFD output data set *
//* TEJDSS03 Step Execute DSNTSMFD *
//* *
//* Notes = *
//* - The following manual tailoring is required: *
//* 1. Add a valid job card *
//* 2. Locate and change all occurrences of the following strings *
//* as indicated: *
//* A. 'DSN!!0.!DSN!.SMFDATA' to the name of the input data set *
//* containing the SMF records to be processed *
//* B. 'DSN!!0.!DSN!.SMFOUT' to the name of the output SMF *
//* data set *
//* C. 'DSN!!0' to the 'prefix.SDSN' of DB2's target *
//* libraries. *
//* 3. SPACE allocations for output data sets may need to be *
//* adjusted depending on the input data set from SMF. *
//* *
//* Change Activity = *
//* *
//**********************************************************************
//*
//JOBLIB DD DSN=DSN!!0.RUNLIB.LOAD,DISP=SHR
//*
//SMFIN SET SMFIN=DSN!!0.!DSN!.SMFDATA
//SMFOUT SET SMFOUT=DSN!!0.!DSN!.SMFOUT
//*
//**********************************************************************
//* ASSEMBLE AND LINK EDIT THE SMF DECOMPRESS PROGRAM
//**********************************************************************
//ASM EXEC PGM=ASMA90,PARM='RENT,OBJECT,NODECK'
//SYSIN DD DSN=DSN!!0.SDSNSAMP(DSNTSMFD),DISP=SHR
//SYSLIB DD DSN=SYS1.MACLIB,DISP=SHR
// DD DSN=DSN!!0.SDSNMACS,DISP=SHR
// DD DSN=DSN!!0.SDSNSAMP,DISP=SHR
//SYSLIN DD DSN=&&LOADSET,DISP=(MOD,PASS),UNIT=SYSDA,
// SPACE=(800,(500,500)),DCB=(BLKSIZE=800)
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSUT1 DD SPACE=(800,(500,500),,,ROUND),UNIT=SYSDA
//*
//LKED EXEC PGM=IEWL,PARM='RENT,XREF,AMODE=31,RMODE=24',
// COND=(4,LT)
//SYSLIB DD DSN=SYS1.CSSLIB,DISP=SHR
//SYSLIN DD DSN=&&LOADSET,DISP=(OLD,DELETE)
// DD DDNAME=SYSIN
//SYSIN DD *
NAME DSNTSMFD(R)
//SYSLMOD DD DISP=SHR,DSN=DSN!!0.RUNLIB.LOAD(DSNTSMFD)
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSUT1 DD SPACE=(1024,(50,50)),UNIT=SYSDA
//*
//**********************************************************************
//* DELETE DATA SETS TO ALLOW RERUNS
//**********************************************************************
//TEJDSS02 EXEC PGM=IEFBR14,COND=(4,LT)
//SYSREC DD DSN=&SMFOUT,
// DISP=(MOD,DELETE),
// UNIT=SYSDA,SPACE=(TRK,0)
//*
//**********************************************************************
//* RUN SMF DECOMPRESSION PROGRAM
//**********************************************************************
//TEJDSS03 EXEC PGM=DSNTSMFD,COND=(4,LT)
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SMFINDD DD DSN=&SMFIN,
// DISP=SHR
//SMFOUTDD DD DSN=&SMFOUT,
// LIKE=&SMFIN,
// DISP=(,CATLG),
// UNIT=SYSDA,
// SPACE=(TRK,(1200,200))