Also, you will need this for SMF compression.
ISRBROBA PINIONR.BAS.PARMLIB(SMFPRM00) - 01.12 Line 0000000000 Col 00
Command ===> Scroll ===>
******************************** Top of Data ****************************
INTVAL(30) /* SMF GLOBAL RECORDING INTERVAL */
ACTIVE /* ACTIVE SMF RECORDING */
RECORDING(LOGSTREAM)
LSNAME(IFASMF.&SYSNAME..CICS,TYPE(110),COMPRESS)
LSNAME(IFASMF.&SYSNAME..DB2,TYPE(100:102),COMPRESS)
LSNAME(IFASMF.&SYSNAME..SCRT,TYPE(70,89),COMPRESS)
LSNAME(IFASMF.&SYSNAME..DEFAULT,TYPE(0:99,103:109,111:2047),
COMPRESS)
Sent with Proton Mail secure email.
On Wednesday, April 17th, 2024 at 8:08 AM, Jousma, David
<[email protected]> wrote:
> Thank-you very much for this! I suspect this is the route we will have to
> take. To answer your other question, yes, ZEDC is a chargeable feature
> (although very inexpensive) and is turned on in IFAPRD00.
>
> Dave Jousma
> Vice President | Director, Technology Engineering
>
>
>
> From: IBM Mainframe Discussion List [email protected] on behalf of
> rpinion865 [email protected]
>
> Date: Tuesday, April 16, 2024 at 3:41 PM
> To: [email protected] [email protected]
>
> Subject: Re: Anyone exploiting ZEDC?
> FWIW, here is a snippet of the SMS ACS DC code that we were using for zEDC.
> /* DEFINE extra data sets to receive zEDC compression /
> /--------------------------------------------------------------------/
> FILTLIST COMP_DSN INCLUDE(CCM. CCM%%%%. FDR. *,
>
>
> FWIW, here is a snippet of the SMS ACS DC code that we were using for zEDC.
>
>
>
> / DEFINE extra data sets to receive zEDC compression /
>
>
>
> /--------------------------------------------------------------------/
>
>
>
>
>
>
>
> FILTLIST COMP_DSN INCLUDE(CCM.CCM%%%%.FDR.,
>
> RMS.PROD.MSA.BKUP.,
>
> LOGR.IFASMF.,
>
> DB2%.ARCHLOG%.)
>
>
>
> - - - - - - - - - - - - - - - - - - 46 Line(s) not Displ
>
>
>
> /* RULES FOR DISK zEDC HW data compression /
>
>
>
> /--------------------------------------------------------------------*/
>
>
>
> WHEN (&DSN = &COMP_DSN) SET &DATACLAS='COMP'
>
> WHEN (&DSTYPE = 'GDS' && &SIZE > 270MB)
>
>
> SET &DATACLAS='COMP'
>
> WHEN (&PGM = 'ADRDSSU' && &SIZE > 55MB)
>
>
> SET &DATACLAS='COMP'
>
>
>
>
>
>
>
>
>
> This e-mail transmission contains information that is confidential and may be
> privileged. It is intended only for the addressee(s) named above. If you
> receive this e-mail in error, please do not read, copy or disseminate it in
> any manner. If you are not the intended recipient, any disclosure, copying,
> distribution or use of the contents of this information is prohibited. Please
> reply to the message immediately by informing the sender that the message was
> misdirected. After replying, please erase it from your computer system. Your
> assistance in correcting this error is appreciated.
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
