IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Fetch execution time of a job using REXX.


IBM Mainframe Forums -> CLIST & REXX
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
ashirwad

New User


Joined: 03 Apr 2012
Posts: 5
Location: chennai

PostPosted: Wed Apr 08, 2015 6:32 pm
Reply with quote

Hi,

I am creating a Rexx tool that will submit some jobs and give a report with output datasets, total execution time taken and other details. I am using ISFCALLS to read the spool and get MAX RC detail of a job using RETCODE. I am refering IBM Redbook - Implementing REXX
Support in SDSF that says that we can get

1. Time that execution began using TIMEE.
2. Time that execution end using TIMEN.

However using these keywords I am not able to get the times.
Please find below code snippet:
Code:

  RC_ISF = ISFCALLS("ON")                       
  IF RC_ISF = 00 THEN                           
     DO                                         
       ISFPREFIX = "'"MEMBER"'"                 
       ADDRESS SDSF "ISFEXEC ST"                 
       DO IJ = 1 TO JNAME.0                     
          IF JOBID.IJ = JID  THEN               
          DO                                     
             IF RETCODE.IJ <> '' THEN           
             DO                                 
                RTCODE = RETCODE.IJ             
                RCODE = SUBSTR(RETCODE.IJ,4,4)   
                SAY 'START TIME ' TIMEE.IJ       
                SAY 'END TIME ' TIMEN.IJ     


Any help is really appreciated.


Thanks in advance,
Ashirwad Kumar

Code'd
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10872
Location: italy

PostPosted: Wed Apr 08, 2015 7:26 pm
Reply with quote

wouldn' t it be simpler to use the SMF data ???
Back to top
View user's profile Send private message
don.leahy

Active Member


Joined: 06 Jul 2010
Posts: 765
Location: Whitby, ON, Canada

PostPosted: Wed Apr 08, 2015 7:45 pm
Reply with quote

Have you tried:
Code:
address SDSF "isfexec st (ALTERNATE DELAYED)"
Back to top
View user's profile Send private message
ashirwad

New User


Joined: 03 Apr 2012
Posts: 5
Location: chennai

PostPosted: Thu Apr 09, 2015 10:44 am
Reply with quote

Thanks don,

It worked icon_smile.gif
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CLIST & REXX

 


Similar Topics
Topic Forum Replies
No new posts Running REXX through JOB CLIST & REXX 13
No new posts Error to read log with rexx CLIST & REXX 11
No new posts isfline didnt work in rexx at z/OS ve... CLIST & REXX 7
No new posts run rexx code with jcl CLIST & REXX 15
No new posts Execute secondary panel of sdsf with ... CLIST & REXX 1
Search our Forums:

Back to Top