Operating System - OpenVMS
cancel
Showing results for 
Search instead for 
Did you mean: 

F$GETQUI problem

 
SOLVED
Go to solution
Highlighted

F$GETQUI problem

Hi - I'm trying to write a script thus:

@jobname batch$queue jobname

giving a result of the entry number and the batch queue it's in.
F$GETQUI is making me tear my hair out, can anyone please assist?
14 REPLIES 14
Highlighted
Trusted Contributor

Re: F$GETQUI problem

F$GETQUI is not an easy one.....

Have you looked at the examples in

http://h71000.www7.hp.com/doc/83final/9996/9996pro_101.html#green_20

Hakan
Don't make it worse by guessing.........
Highlighted

Re: F$GETQUI problem

Thanks Hakan,
Yes I've perused that but still unable to get satisfactory results.

Dave
Highlighted
Trusted Contributor

Re: F$GETQUI problem

I have just modified example #3 and got if to work.

$ TEMP = F$GETQUI("")
$ QLOOP:
$ QNAME = F$GETQUI("DISPLAY_QUEUE","QUEUE_NAME","*")
$ IF QNAME .EQS. "" THEN EXIT
$ JLOOP:
$ NOACCESS = F$GETQUI("DISPLAY_JOB","JOB_INACCESSIBLE",,"ALL_JOBS")
$ IF NOACCESS .EQS. "TRUE" THEN GOTO JLOOP
$ IF NOACCESS .EQS. "" THEN GOTO QLOOP
$ JNAME := 'F$GETQUI("DISPLAY_JOB","JOB_NAME",,"FREEZE_CONTEXT")
$ ENUM = F$GETQUI("DISPLAY_JOB","ENTRY_NUMBER",,"FREEZE_CONTEXT")
$ if JNAME .eqs. "''p1'"
$ then
$ WRITE SYS$OUTPUT " JOB: ", JNAME," QUEUE: ",QNAME," ENTRY: ",ENUM
$ endif
$ GOTO JLOOP

Hakan
Don't make it worse by guessing.........
Highlighted
Trusted Contributor
Solution

Re: F$GETQUI problem

Some lines "wrapped" when I "cut & paste".

Use it as:

@COMMANDFILE 'jobname'

Then you have to edit the code to suit your needs.

Hakan
Don't make it worse by guessing.........
Highlighted

Re: F$GETQUI problem

Thanks again Hakan, but it's producing no results here.
I can see a batch queue with a job in it, but I can't run the job with the batch queue name and the jobname as params to give me the entry number of the jobname.
Highlighted

Re: F$GETQUI problem

Hakan, you're a genius, it worked a treat many thanks,

Dave
Highlighted
Trusted Contributor

Re: F$GETQUI problem

Genius is a strong word, but Thanks !
I have some friends in the VMS-world that make me feel like a rockie.

If you need help to modify the script, mail me.

Hakan
hakan(dot)zanderau(at)ha-solutions(dot)se
Don't make it worse by guessing.........
Highlighted
Honored Contributor

Re: F$GETQUI problem

See also http://dcl.openvms.org
where you will find several examples of using F$GETQUI
____________________
Purely Personal Opinion
Highlighted
Trusted Contributor

Re: F$GETQUI problem

My fingers typed without confirming with my brain.....

The word is ROOKIE, not rockie ! ;-)

Hakan
Don't make it worse by guessing.........