Speaking of time: US Daylight Saving Time ends this Sunday November 3. We 
all get to relive one hour. Good for sleeping, but problematic for some 
software. 

.
.
JO.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
626-302-7535 Office
323-715-0595 Mobile
[email protected]



From:   Elardus Engelbrecht <[email protected]>
To:     [email protected], 
Date:   10/29/2013 04:23 AM
Subject:        Re: Getting the SMF time
Sent by:        IBM Mainframe Discussion List <[email protected]>



Barry Merrill  wrote:

>Some of us find SAS's
> INPUT @3 SMFTIME SMFSTAMP8.;
> FORMAT SMFTIME DATETIME21.2;
> PUT SMFTIME=;

>easier and it prints
> 27OCT2013:13:14:15.99

Indeed, it is very easy and there are many ways to skin this cat with the 
name SMFTIME. :-)
Or if you're a hunter, aim for the head, neck or heart. Same deadly 
results. ;-)

Or for those who are too poor or cheapskate to use SAS, you can try 
ICETOOL like this fun sample, SMF type 89:

//SMF89    EXEC  PGM=ICETOOL 
//TOOLMSG  DD  SYSOUT=* 
//DFSMSG   DD  SYSOUT=* 
//VLSHCNTL DD  * 
 OPTION COPY,VLSHRT 
 INCLUDE COND=(6,1,BI,EQ,X'59') 
/* 
//RAWSMF   DD  DISP=SHR,DSN=<SMF dsn>
//SORTSMF   DD DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(50,50,0))
//VREPT    DD  SYSOUT=* 
//TOOLIN   DD  *          CONTROL STATEMENTS 
  SORT FROM(RAWSMF) TO(SORTSMF) USING(VLSH) 
  DISPLAY FROM(SORTSMF) LIST(VREPT) - 
     HEADER('SMFTYPE')      ON(6,1,BI) - 
     HEADER('DATE')        ON(11,4,DT1,E'9999/99/99') - 
     HEADER('TIME')        ON(7,4,TM1,E'99:99:99') - 
     HEADER('SYSTEM')      ON(15,4,CH) 

Credits to Frank Yaeger for this one! ;-)

Groete / Greetings
Elardus Engelbrecht

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to