View previous topic :: View next topic |
Author |
Message |
binoy Beginner
Joined: 03 Oct 2003 Posts: 17 Topics: 7
|
Posted: Fri Feb 06, 2004 1:06 pm Post subject: Rexx code to find out SDSF job is running or not |
|
|
Hi,
I have a requirment to run a macro say check to find
if a job brn0000 & rxr0000 are running in SDSF spool
If running it should display the ID i.e.; say brn0000 is active
then display " brn0000 is active "
can any one help me with the code.
Thanks & Regards,
Brij |
|
Back to top |
|
 |
Bithead Advanced

Joined: 03 Jan 2003 Posts: 550 Topics: 23 Location: Michigan, USA
|
Posted: Fri Feb 06, 2004 2:15 pm Post subject: |
|
|
This is what I use to check for a job:
[code:1:eae876b4fd]
JOB_FND = "N";
ADDRESS "OPER";
"$DJ'BRN0000'";
/* PARSE THE OUTPUT */
DO WHILE QUEUED() |
|
Back to top |
|
 |
Manas Biswal Intermediate

Joined: 29 Nov 2002 Posts: 382 Topics: 27 Location: Chennai, India
|
Posted: Fri Feb 06, 2004 2:15 pm Post subject: |
|
|
Try this - Hope this works...I have not tested it.....
Code: |
/***** rexx *****/
ADDRESS TSO
x = outtrap("line.","*")
address tso "status" u457527
/* Specify your jobname instead of U457527 */
x = outtrap("OFF")
say line.1
exit
|
This will display something like "Job is executing" for an active job and "Job not found" for an inactive job. Run it through for the exact statements.
Regards,
manas |
|
Back to top |
|
 |
|
|