David, I am trying out the suggestions made by you and Mary Anne . Thanks.
________________________________ From: David Betten <bet...@us.ibm.com> To: IBM-MAIN@bama.ua.edu Sent: Friday, 4 May 2012 7:42 AM Subject: Re: SELECTING SMF RECORDS FOR 1 DAY Try this in your SYSIN //SYSIN DD * INDD(INDD1,OPTIONS(DUMP)) OUTDD(OUTDD1,TYPE(14:15)) DATE(2012125,2012125) /* In my example, the job would select only records from today. Change the 125 to the day you need to select. Have a nice day, Dave Betten DFSORT Development, Performance Lead IBM Corporation email: bet...@us.ibm.com 1-301-240-3809 DFSORT/MVSontheweb at http://www.ibm.com/storage/dfsort/ IBM Mainframe Discussion List <IBM-MAIN@bama.ua.edu> wrote on 05/04/2012 07:13:28 AM: > From: John Dawes <jhn_da...@yahoo.com.au> > To: IBM-MAIN@bama.ua.edu, > Date: 05/04/2012 07:13 AM > Subject: SELECTING SMF RECORDS FOR 1 DAY > Sent by: IBM Mainframe Discussion List <IBM-MAIN@bama.ua.edu> > > G'Day, > > I am following up on a problem regarding the corruption of a dsn. I > have the SMF records for the day, however since the daily tapes are > merged into a weekly tape I am having a problem (space issues) > trying to extract only the type 14 & 15 records for that particular > date. I looked at - OSMVS System Management Facilities - the doc > for an example but I didn't find any. Can someone suggest what I > can try. Below is my job which I am trying to run. > //STEP1 EXEC PGM=IFASMFDP > //INDD1 DD DSN=SYS2.SMFDATA.WEEK.G1584V00,DISP=SHR > //OUTDD1 DD DSN=&&SM11, > // DISP=(,PASS),UNIT=SYSDA,SPACE=(CYL,(150,150),RLSE), > // DCB=(RECFM=VBS,LRECL=32760,BLKSIZE=4096) > //SYSPRINT DD SYSOUT=* > //SYSIN DD * > INDD(INDD1,OPTIONS(DUMP)) > OUTDD(OUTDD1,TYPE(14:15)) > /* > //STEP2 EXEC PGM=IDCAMS,TIME=1440 > //DD1 DD DSN=&&SM11, > // DISP=(OLD,DELETE), > // DCB=(RECFM=VBS,LRECL=32760,BLKSIZE=4096) > //SYSOUT DD SYSOUT=* > //SYSPRINT DD SYSOUT=* > //SYSIN DD * > PRINT INFILE(DD1) DUMP > /* > // > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN