Command procedure to get entry number of PENDING jobs

[ChaimBu]

Could someone please either point me to an example or give me an example of a command proceudre which will print out the entry number for any job which is in a PENDING status. I have been attempting at writing one, but the F$GETQUI lexical function is somewhat complicated, and I cannot seem to get what I want.

Thanks in advance,

Chaim

[Karl Rohwedder · Accepted solution]

The attached example is a slight modification of an example in HELP LEX F$GETQUI.

regards Kalle

[Ian Miller.]

and there are several examples of the use of F$GETQUI at
dcl.openvms.org

[David B Sneddon]

Depending on you exact requirements...

SHOW QUEUE/ALL/BY_JOB_STATUS=PENDING

Dave

[Robert_Boyd]

Chaim,

Please take a look at

http://dcl.openvms.org/stories.php?story=05/04/04/4429625

This command procedure can be used to locate jobs in any particular state.

For example

$ @findjob * sys*batch* * pending_entry pending_jobs

Robert

[Manny DeAssis]

If you want a command procedure, I agree with Robert, go to http://dcl.openvms.org

Otherwise if you just want something quick and dirty to spit out the number of pending jobs under the current queue manager you can try these:

The third line of the this example will generate 'xxx lines read...' That number will represent the amount of jobs pending:

$ show queue /all /by_job=pend /out=jobs.tmp
$ sear jobs.tmp "pend" /output=jobs.tmp2
$ edit/tpu/nodisp jobs.tmp2

This next example will display the pending count next to 'Records matched':

$ pipe show queue /all /by_job=pen | sear sys$pipe "pen" /noout /stat | sear sys$pipe "records matched"

Hope this helps.