Re: Checking for an Active Program in a Different Job's Call Stack

I have a service program written a few years ago that has a function to
check for active jobs for a given job or job, user or job, user and job
number. It uses system API's to get the information.

I can send you the code.

On Thu, Oct 29, 2009 at 2:18 PM, Michael Ryan <michaelrtr@xxxxxxxxx>
wrote:

Hi Carel -

Yeah...that's what I'm using...well, the retrieve call stack API anyway.

I

have an inactivity monitor that monitors the message queue specified in
system values QINACTITV and QINACTMSGQ. I need to know if an interactive
user is using certain program, and do something different if they are.

On Thu, Oct 29, 2009 at 4:10 PM, Carel Teijgeler <coteijgeler@xxxxxxxxx

wrote:

Trigger PGMs may be locked to a job and cannot be replaced at
recompilation. You can check it with WRKOBJLCK *PGM

Back to the OP with some questions:
What exactly do you mean with active PGM in an inactive job?
For what purpose, just curious?

I think it will be using the List Active Jobs API combined with the
Retrieve Call Stack API, as you alredy said.


With regards,
Carel Teijgeler

*********** REPLY SEPARATOR ***********

On 29-10-2009 at 13:25 Charles Wilt wrote:

Unlike *FILEs, *PGM objects are not locked by use.


On Thu, Oct 29, 2009 at 12:03 PM, James H. H. Lampert

Michael Ryan wrote:
I have an inactivity monitor that I need to change to check to see

if

a

certain program is in the inactive job's stack. I thought I saw a

thread

about that, but I can't find it. Any suggestions? Thanks!

If you're looking around in general, maybe looking for locks on the

program might be of use.



--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing

list

To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing

list

To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.