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

Reply via email to