I like the program DAF on CBTTAPE.ORG. It can select records by data set name 
and date. 
 

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of 
John Dawes
Sent: Friday, May 04, 2012 6:13 AM
To: [email protected]
Subject: SELECTING SMF RECORDS FOR 1 DAY

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 [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

Reply via email to