开云体育

ctrl + shift + ? for shortcuts
© 2025 开云体育

Can anyone please share a JCL file with program that takes more than 0 seconds to run?


 

Hello everyone!

I want to create a large queue of jobs, but I don't know how to do it. Currently, when I submit a job to the card reader, it completes instantly in 0 seconds. This is frustrating because I want to observe the job's progress.
I would like to learn how DOS/VS uses FG's to manage numerous jobs in different languages. Once again, I want to wait for each job to complete.

My plan is to pause all execution somehow, then create a substantial queue of jobs, and finally resume execution while monitoring the ongoing processes.
Could someone help me with this endeavor? Even if you can provide only one JCL file, I would greatly appreciate your help. Or if you can explain how I can create a job queue or monitor its progress, that would be very helpful.

Best wishes,
Andre


 

Andre,

You can put a JCL? ?PAUSE statement in your job

I forget the exact JCL syntax,? I haven't used dos/vs for awhile, and am just a casual / novice user.

One of the distributions of DOS/VS out there already has "pause" jobs "preloaded" in the rdr, after IPL or running the ...init.. job.

I forget which distro it is.

You can also enter a job "interactively" from the console (I think it was dos 34 ??),??

Mike

On Sat, Jun 10, 2023 at 9:19?AM Andre <procritic@...> wrote:
Hello everyone!

I want to create a large queue of jobs, but I don't know how to do it. Currently, when I submit a job to the card reader, it completes instantly in 0 seconds. This is frustrating because I want to observe the job's progress.
I would like to learn how DOS/VS uses FG's to manage numerous jobs in different languages. Once again, I want to wait for each job to complete.

My plan is to pause all execution somehow, then create a substantial queue of jobs, and finally resume execution while monitoring the ongoing processes.
Could someone help me with this endeavor? Even if you can provide only one JCL file, I would greatly appreciate your help. Or if you can explain how I can create a job queue or monitor its progress, that would be very helpful.

Best wishes,
Andre


 

As you know, DOS/VS is managed by POWER. It is POWER that you want to control, not DOS/VS.

You can put DISP=H on the POWER JECL ... * $$ JOB JNM=XXX,DISP=H

Then, you can use PRELEASE to release the jobs one at a time and watch them run. PRELEASE RDR,Jobname to release them one at a time.



Joe


On Sat, Jun 10, 2023 at 8:19?AM Andre <procritic@...> wrote:
Hello everyone!

I want to create a large queue of jobs, but I don't know how to do it. Currently, when I submit a job to the card reader, it completes instantly in 0 seconds. This is frustrating because I want to observe the job's progress.
I would like to learn how DOS/VS uses FG's to manage numerous jobs in different languages. Once again, I want to wait for each job to complete.

My plan is to pause all execution somehow, then create a substantial queue of jobs, and finally resume execution while monitoring the ongoing processes.
Could someone help me with this endeavor? Even if you can provide only one JCL file, I would greatly appreciate your help. Or if you can explain how I can create a job queue or monitor its progress, that would be very helpful.

Best wishes,
Andre


 

Hello Andre,
?
To my knowledge, on DOS/VS, jobs of different classes (running in different partitions) will execute concurrently. Within a class, POWER dispatches jobs according to their priority (0 to 9, 9 highest), proceeding FIFO if the priorities are the same. On George Shedlock 5-pack, the default priority (when it is not coded in the * $$ JOB statement) is 3 (hard coded in POWER).
?
Here's a suggestion for you. Create a series of jobs like these:
?
* $$ JOB JNM=JOBxx,CLASS=n,DISP=H,PRI=p
* $$ LST CLASS=A,DISP=D,JSEP=0
// JOB Jxx
// LISTIO SYS
// EXEC LSERV
/&
* $$ EOJ
?
For each job number xx, choose a class (n=0,2,3,4) and a priority (p=0,1,...,9), and then submit them. They will be all kept in the reader queue because of the DISP=H parameter. Then release all of them at the same time with the POWER command: PRELEASE RDR,*JOB and check how POWER will dispatch the execution.
?
Cheers,
?
Rene FERLAND, Montreal
?
P.S. -- If you want longer execution, repeat LISTIO and LSERV within the job. On my Mac, running these ten times (inside the same job) took about fifteen seconds real-time.
?


 

?Hello Rene!

Thank you so much for this explanation. I am going to try this right now.
Hope this would create some load for my personal mainframe. :)

Best wishes,
Andre


On Sat, Jun 10, 2023 at 09:56 PM, René Ferland wrote:
Hello Andre,
?
To my knowledge, on DOS/VS, jobs of different classes (running in different partitions) will execute concurrently. Within a class, POWER dispatches jobs according to their priority (0 to 9, 9 highest), proceeding FIFO if the priorities are the same. On George Shedlock 5-pack, the default priority (when it is not coded in the * $$ JOB statement) is 3 (hard coded in POWER).
?
Here's a suggestion for you. Create a series of jobs like these:
?
* $$ JOB JNM=JOBxx,CLASS=n,DISP=H,PRI=p
* $$ LST CLASS=A,DISP=D,JSEP=0
// JOB Jxx
// LISTIO SYS
// EXEC LSERV
/&
* $$ EOJ
?
For each job number xx, choose a class (n=0,2,3,4) and a priority (p=0,1,...,9), and then submit them. They will be all kept in the reader queue because of the DISP=H parameter. Then release all of them at the same time with the POWER command: PRELEASE RDR,*JOB and check how POWER will dispatch the execution.
?
Cheers,
?
Rene FERLAND, Montreal
?
P.S. -- If you want longer execution, repeat LISTIO and LSERV within the job. On my Mac, running these ten times (inside the same job) took about fifteen seconds real-time.
?