Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Task Reminder in REXX

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
maheshk84

New User


Joined: 04 Jan 2006
Posts: 22
Location: Chennai

PostPosted: Fri Feb 22, 2008 9:57 pm    Post subject: Task Reminder in REXX
Reply with quote

There is a daily task to performed by my team to monitor a few jobs at 12 pm. This task is not monitored properly since many are involved in multitasking. What I need is a Task reminder which should send a message to my team.

I have constructed a small REXX pgm which will do it but consumes more CPU time. I submit this job somewhere around 9.30 as soon I enter office and continue with my work.

REXX code :
Code:

/* REXX */                                                 
I = 0                                                     
DO UNTIL I = 1                                             
  CALL DISPLAY_ROUTINE                                       
END                                                       
EXIT                                                       

DISPLAY_ROUTINE :                                         
CURRENT_TIME    = TIME()                                   
IF CURRENT_TIME = '12:00:00' THEN DO                       
  " SEND 'TIME 12 PM - MIDDAY RUNS STARTED !!' U(USERID1) " 
  " SEND 'TIME 12 PM - MIDDAY RUNS STARTED !!' U(USERID2) " 
  I = I + 1                                                 
END                                                       
RETURN                                                     


JCL to run this REXX
Code:

//STEP0010 PROC                                               
//************************************************************
//*  THIS STEP EXECUTES THE REXX PROGRAM                     
//************************************************************
//PROC0010 EXEC PGM=IKJEFT1B,                                 
//         PARM=REMINDER,COND=(4,LT)                         
//SYSPROC  DD DISP=SHR,DSN=S32469.REXX.EXEC                   
//SYSTSIN  DD DUMMY                                           
//SYSTSPRT DD SYSOUT=*                                       
//SYSOUT   DD SYSOUT=*                                       
//*                                                           
//*                                                           
//STEP0010 PEND                                               
//STEP0015 EXEC STEP0010                                           


Any better way to do it?
Back to top
View user's profile Send private message

Craq Giegerich

Senior Member


Joined: 19 May 2007
Posts: 1512
Location: Virginia, USA

PostPosted: Fri Feb 22, 2008 10:00 pm    Post subject:
Reply with quote

If you have a SCHEDULING system installed you could use that.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Fri Feb 22, 2008 10:19 pm    Post subject:
Reply with quote

Hello,

Or simply schedule an "appointment" with your e-mail system. . . You cold include as many "invitees" as needed. . .

You do NOT want some process "looping" all morning. This is sometimes grounds for locking an account.
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4650
Location: Raleigh, NC, USA

PostPosted: Fri Feb 22, 2008 10:22 pm    Post subject: Reply to: Task Reminder in REXX
Reply with quote

Use Netview/An Automated Operator product/Connect:Direct.

Use the Unix CRON function to schedule a task to submit your job.
Use your Windows "Schedule Tasks" feature to schedule a task to submit your job.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. how to code for GDG in Rexx cvnlynn CLIST & REXX 13 Wed Aug 09, 2017 9:13 pm
This topic is locked: you cannot edit posts or make replies. rexx to create a tso command Bharath Vikraman CLIST & REXX 1 Tue Aug 08, 2017 3:32 pm
This topic is locked: you cannot edit posts or make replies. rexx code to create a ps file Bharath Vikraman CLIST & REXX 4 Mon Aug 07, 2017 10:30 am
No new posts Default Message in Rexx cvnlynn CLIST & REXX 9 Wed Aug 02, 2017 12:38 am
No new posts Calling CLIST through job and REXX Sahasra K CLIST & REXX 19 Tue Aug 01, 2017 10:25 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us