At 12:39 PM 10/27/97 -0800, Venu Gopal wrote:

>Hi All,
>     Is there anyway we can find all the jobs that run with a specific
>JobDescription. Here we have several job descriptions linked to different
>departments. I need to find out all the jobs of our department. So I need
>to look for all jobs that run with our department's JOBD. I know the JOBD
>but from there, how do I get the list of jobs with that JOBD? At present I
>am doing WRKUSRJOB and specifying USER(JOBD name). Any better solutions for
>this?? Thanx in advance for any help/suggestions. Good day.

The QUSLJOB API will give you this information. You can specify jobs with
various status, like *active, *jobq or *outq. You can also specify the kind
of jobs you want to see, like batch, subsystem, interactiv, etc.

In the input parameters you can say what information you want for each job
listed. Format JOBL0200 will return whatever you asked for. The job
description name is identified by key code 1003.

I've had good results running something like this in CL, although you don't
get the performance benefits of pointers that you can in ILE RPG.

The drawback is, you might miss some jobs, since this process doesn't run
continuously. I like J Moreno's solution, which creates a log entry
whenever a job is started. Otherwise, you might try making sure all jobs
leave a joblog. There'll be information about the job description in the
heading. CPYSPLF will let you retrieve this. Of course, if all jobs leave a
joblog, they'll be caught in jobs in *outq status!


Vernon Hamberg
Systems Software Programmer
Old Republic National Title Insurance Company
400 Second Avenue South
Minneapolis, MN 55401
(612) 371-1111 x480

| This is the Midrange System Mailing List!
| To submit a new message, send your mail to "".
| To unsubscribe from this list send email to
|    and specify 'unsubscribe MIDRANGE-L' in the body of your message.
| Questions should be directed to the list owner/operator:

As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2021 by and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.