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: 4648
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. Calling REXX code from ISPF panel sanchita dey TSO/ISPF 4 Mon Jan 02, 2017 5:13 pm
No new posts REXX DB2: Dynamic allocation of DB2.D... BHAS CLIST & REXX 3 Mon Dec 19, 2016 8:26 pm
No new posts find particular member name in PDS us... ravi243 CLIST & REXX 10 Mon Dec 19, 2016 6:44 pm
No new posts What is the command to check MODE of ... rohanthengal CLIST & REXX 7 Fri Nov 18, 2016 1:48 pm
This topic is locked: you cannot edit posts or make replies. Rexx to create GDG by scanning JJ result krish.deepu CLIST & REXX 5 Tue Oct 25, 2016 5:32 pm


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