|
Note: The maximum size supported for a SORTED .TRS file is 20GB. If your file is bigger, please reduce the amount of intervals and/or LPARs collected.
|
|
Note: The JCL in the examples in each step can be copied to an editor and then updated to fit your solution.
1. Select the JCL inside the screenshot.
2. Right-click and select Copy.
3. Paste into an editor.
4. Update the JCL.
|
|
//*
//* ====================
//* DUMP SMF DATATSET(S)
//* ====================
//SMFDUMP EXEC PGM=IFASMFDP
//IDD1 DD DISP=SHR,DSN=<input_smfdata_system1>
//IDD2 DD DISP=SHR,DSN=<input_smfdata_system2>
// :
//IDDN DD DISP=SHR,DSN=<input_smfdata_systemN>
//SMFDATA DD DISP=(NEW,PASS),DSNTYPE=LARGE,
// SPACE=(CYL,(100,100),RLSE),UNIT=SYSDA,
// DCB=(RECFM=VBS,LRECL=32760,BLKSIZE=0)
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
INDD(IDD1,OPTIONS(DUMP))
INDD(IDD2,OPTIONS(DUMP))
:
INDD(IDDN,OPTIONS(DUMP))
OUTDD(SMFDATA,TYPE(74(1,5,8)))
DATE(2022060,2022066)
/*
//*
|
|
Activities
|
SMF Record Type
(Long-term Monitor I)
|
|---|---|
|
Direct Access Activity
|
74-1
|
|
Cache Subsystem Activity
|
74-5
|
|
Enterprise Server Storage Statistics
|
74-8
|
|
Note: If a large amount of data is being dumped, it might be necessary to significantly increase the SPACE allocation on line 10 of the SMFDATA output
data set. The JCL example assumes that this output is passed to a subsequent step. The disposition should be changed as needed.
|
|
//*
//* =================
//* UPDATE GMT OFFSET
//* =================
//CHGGMT EXEC PGM=ERBCHGMT,PARM='-300'
//SMFDATA DD DISP=(OLD,DELETE),DSN=*.SMFDUMP.SMFDATA
//SMFCHGMT DD DISP=(NEW,PASS),DSNTYPE=LARGE,
// SPACE=(CYL,(100,100),RLSE),UNIT=SYSDA,
// DCB=(RECFM=VBS,LRECL=32760,BLKSIZE=0)
//SYSPRINT DD SYSOUT=*
//*
|
|
Note: If a large amount of data is being processed, it might be necessary to significantly increase the SPACE allocation of
the SMFCHGMT output data set. The JCL example assumes that the output is passed to a subsequent step. The disposition should be changed as needed.
|
|
//*
//* ====================
//* SORT THE SMF RECORDS
//* ====================
//RMFSORT EXEC PGM=ICEMAN
//SORTIN DD DISP=(OLD,DELETE),DSN=*.CHGGMT.SMFCHGMT
//* DD DISP=(OLD,KEEP),DSN=<addtnl_data_set>
//* DD ...uncomment and fill in DSNs...
//* DD DISK=(OLD,KEEP),DSN=<addtnl_data_set>
//SORTOUT DD DISP=(NEW,PASS),DSNTYPE=LARGE,
// SPACE=(CYL,(100,100),RLSE),UNIT=SYSDA,
// DCB=(RECFM=VBS,LRECL=32760,BLKSIZE=0)
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=(11,4,CH,A,7,4,CH,A,15,4,CH,A),EQUALS
MODS E15=(ERBPPE15,36000,,N),E35=(ERBPPE35,3000,,N)
OPTION HIPRMAX=OPTIMAL,DYNALLOC=(SYSDA,6)
/*
//*
|
|
//*
//* ====================
//* SORT THE SMF RECORDS
//* ====================
//RMFSORT EXEC PGM=SORT
//SORTIN DD DISP=(OLD,DELETE),DSN=*.CHGGMT.SMFCHGMT
//* DD DISP=(OLD,KEEP),DSN=<addtnl_data_set>
//* DD ...uncomment and fill in DSNs...
//* DD DISK=(OLD,KEEP),DSN=<addtnl_data_set>
//SORTOUT DD DISP=(NEW,PASS),DSNTYPE=LARGE,
// SPACE=(CYL,(100,100),RLSE),UNIT=SYSDA,
// DCB=(RECFM=VBS,LRECL=32760,BLKSIZE=0)
//SORTWK01 DD DISP=(NEW,DELETE),UNIT=SYSDA,SPACE=(CYL,(100,100))
//SORTWK02 DD DISP=(NEW,DELETE),UNIT=SYSDA,SPACE=(CYL,(100,100))
//SORTWK03 DD DISP=(NEW,DELETE),UNIT=SYSDA,SPACE=(CYL,(100,100))
//SORTWK04 DD DISP=(NEW,DELETE),UNIT=SYSDA,SPACE=(CYL,(100,100))
//SORTWK05 DD DISP=(NEW,DELETE),UNIT=SYSDA,SPACE=(CYL,(100,100))
//SORTWK06 DD DISP=(NEW,DELETE),UNIT=SYSDA,SPACE=(CYL,(100,100))
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=(11,4,CH,A,7,4,CH,A,15,4,CH,A),EQUALS
MODS E15=(ERBPPE15,36000,,N),E35=(ERBPPE35,3000,,N)
/*
|
|
Note: If a large amount of data is being sorted, it might be necessary to significantly increase the SPACE allocation of the
SORTOUT output data set. The JCL examples assume that the output is passed to a subsequent step. The disposition should be changed as needed.
|
|
//*
//* =====================
//* TERSE THE SMF RECORDS
//* =====================
//RMFTERSE EXEC PGM=AMATERSE,PARM=SPACK
//SYSUT1 DD DISP=(OLD,DELETE),DSN=*.RMFSORT.SORTOUT
//SYSUT2 DD DISP=(NEW,CATLG),DSN=<output_tersed_smfdata>,
// DSNTYPE=LARGE,SPACE=(CYL,(100,100),RLSE)
//SYSPRINT DD SYSOUT=*
//*
|
|
Note: If a large amount of data is being tersed, it might be necessary to significantly increase the SPACE allocation of the SYSUT2 output data set.
|
|
Important: it is critical for the compressed file to be transferred as binary, not as text (ASCII or EBCDIC). Failing to do so will cause the data to be
corrupted and to become unusable.
|
|
//*
//* ===================
//* FTP THE TERSED DATA
//* ===================
//RMFFTP EXEC PGM=FTP,REGION=4096K,
// PARM='11.11.11.11 (EXIT'
//SYSPRINT DD SYSOUT=*
//SRCFILE DD DISP=(OLD,KEEP),DSN=*.RMFTERSE.SYSUT2
//OUTPUT DD SYSOUT=*
//INPUT DD *
<userid> <password>
BINARY
CD <remote_directory>
PUT //DD:SRCFILE <remote_file>
QUIT
/*
//*
|