How to schedule jobs in rexx

shr_amar · New User Joined: 02 May 2005 Posts: 39 Location: DELHI

I want to schedule 10 jobs using rexx . The job should be dependent on each other maxx cc . For example JOB1, JOB2 , JOB3 , JOB4 ........

JoB2 should run after sucessfull completion of JOB1 , JOB3 after job2 and so on .

Please write the rexx example (CODE)

Thanks in advance

ofer71 · Posted: Mon Jan 21, 2008 12:28 pm Post subject:

No problem, I can do the job for you.

My rate is $100 per hour + tax. You will get a tested code.

When do you want me to start?

O.

acevedo · Posted: Mon Jan 21, 2008 12:42 pm Post subject:

IMNHO... Rexx is not the proper 'utility' to schedule jobs but the worst thing, as ofer insinuate, is that you only want the CODE, remember this site has a SEARCH facility...and that you can get lot of examples here, there (other forums) and everywhere (google).

UmeySan · Posted: Mon Jan 21, 2008 3:27 pm Post subject:

Hi Ofer71 !

$100 per hour + tax ???

Please don't destroy the pricing for external support by agggressive dumping the fee per hour here in Europe.

Have a look at the exchange rate USD/EUR ;-)

Regards, UmeySan

ofer71 · Posted: Mon Jan 21, 2008 3:32 pm Post subject:

I jst wanted to make a point....

O.

shr_amar · New User Joined: 02 May 2005 Posts: 39 Location: DELHI

Hello Ofer ,

Tell me your contact address i will send you the check.

Now i am looking to get Return code of completed JOB in rexx ? Can anyone help me here .

Regards

ofer71 · Posted: Mon Jan 21, 2008 4:34 pm Post subject:

You can get a return code of job by:
1. Batch SDSF command.
2. Navigating through MVS Data Areas.
3. Extracting Broadcast messages dataset.

O.

shr_amar · New User Joined: 02 May 2005 Posts: 39 Location: DELHI

Looking for some more input
Can we execute BATCH SDSF command in REXX ? If yes please gie me a example .
By exteacting Broadcast message dataset i assume you are talking about TSO output command which stored in the dataset , This will again involve searching of particular string.

Can you elaborate more .

Regards

ofer71 · Posted: Mon Jan 21, 2008 4:58 pm Post subject:

SDSF Batch commands were discussed a lot in this forum (yes, with examples). You might want to search the forum.

Also, the SDSF fine manual contains all the information you need(yes, with examples).

O.

shr_amar · New User Joined: 02 May 2005 Posts: 39 Location: DELHI

Thanks Ofer -

I have searched the Forum and tried one way. But the problem is no output is coming in the Dataset .

Given below is the code -----

/* REXX */
ADDRESS TSO
"ALLOC F(ISFIN) TRACKS SPACE(1) REU" /* USED BY SDSF */
"ALLOC F(ISFOUT) NEW DELETE REU " , /* USED BY SDSF */
"TRACKS SPACE(100,100) LRECL(133) RECFM(F,B,A) DSORG(PS)"
"ALLOC F(TEMPPRT) DA('BKGHDY.DEV.REPORT') SHR"
JOBNAME = "BLYGGGG1"
QUEUE "PRE *" /* SDSF COMMANDS IN BATCH*/
QUEUE "ST"
QUEUE "FILTER JOBID =" JOBFFF81
QUEUE "++S "
QUEUE "PRINT FILE "BKGHDY.DEV.REPORT" "
QUEUE "PRINT 1 999999"
QUEUE "PRINT CLOSE"
QUEUE "END"
QUEUE "EXIT"
SAY QUEUE
"EXECIO" QUEUED()" DISKW ISFIN (FINIS" /* INPUT TO SDSF BATCH */
ADDRESS ISPEXEC "SELECT PGM(ISFAFD) PARM('++25,80')"/* INVOKE SDSF */
EXIT

Please tellme if there is any other solution ....

Regards

ofer71 · Posted: Tue Jan 22, 2008 1:21 pm Post subject:

You can look into ISFOUT to see SDSF messages.

O.

shr_amar · New User Joined: 02 May 2005 Posts: 39 Location: DELHI

I can see in the ISFOUT that all of the jobs present in spool is listed but output dataset does not contain that job.Is there any problem with the filter .

ofer71 · Posted: Tue Jan 22, 2008 1:45 pm Post subject:

This is for you to tell...

O.

UmeySan · Posted: Wed Jan 23, 2008 3:52 pm Post subject:

Hi !

You could simply shedule your separate jobs by adding a last Step in every job, where you submit your next job via internal reader. Make this step depending on the RC of the previous step. Then you have a little job-chain of sepatate jobs.

Regards, UmeySan

enrico-sorichetti

unless you are running under jes3 and You are authorized to use
the dependent job scheduling facility ( //*NET cards )