Greetings, I am in need of Data in Virtual (DIV) SMF Type 41 Records to Test DAF.
041 000 DIV Objects and VLF Statistics 041 001 - ACCESS 041 002 - UNACCESS 041 003 - VLF statistics Of specific interest are the ST001's and ST002's. This is a low volume SMF Record, so a weeks worth would be nice. Cheers, Michael http://www.geocities.com/michaeljosephcleary/ =========================== Instructions: 1) Creat the SMF file with IFASMFDP and XMIT the SMF file (JCL below) 2) do a binary transfer of the XMIT file to your PC 3) Zip the downloaded file 4) e-mail me the zipped file as an attachment ============================ Here is JCL to create the SMF file and XMIT it. //&SYSUID.SMF JOB (TECHY),'CLEARY',CLASS=U, // MSGCLASS=X,MSGLEVEL=(1,1),NOTIFY=&SYSUID. //DELETE EXEC PGM=IEFBR14 //DELETE1 DD DSN=ZTGP01.SMFTXXX,DISP=(MOD,DELETE,DELETE), // UNIT=SYSDA,SPACE=(CYL,(1,1)), // DCB=(RECFM=VBS,LRECL=32760,BLKSIZE=27998,BUFNO=64) //DELETE2 DD DSN=ZTGP01.SMFTXXX.XMI,DISP=(MOD,DELETE,DELETE), // UNIT=SYSDA,SPACE=(CYL,(1,1)), // DCB=(RECFM=VBS,LRECL=32760,BLKSIZE=27998,BUFNO=64) //IFASMFDP EXEC PGM=IFASMFDP //DUMPIN DD DISP=SHR,DSN=DCTR.SMFDUMP.ACCUM.BBC1(+0), // DCB=(BUFNO=64) //DUMPOUT DD DSN=ZTGP01.SMFTXXX,DISP=(NEW,CATLG,CATLG), // UNIT=SYSDA,SPACE=(CYL,(100,50),RLSE), // DCB=(RECFM=VBS,LRECL=32760,BLKSIZE=27998,BUFNO=64) //SYSIN DD * INDD(DUMPIN,OPTIONS(DUMP)) OUTDD(DUMPOUT,TYPE(XXX)) //SYSPRINT DD SYSOUT=* //IKJEFT01 EXEC PGM=IKJEFT01 //SYSTSPRT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //SYSTSIN DD * XMIT ANYNODE.ANYUSER + DATASET('ZTGP01.SMFTXXX') + OUTDATASET('ZTGP01.SMFTXXX.XMI') __________________________________________________ Do You Yahoo!? Tired of spam? Yahoo! Mail has the best spam protection around http://mail.yahoo.com ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html