Re: Allocating a *PGM object -- MIDRANGE-L

Subject: Re: Allocating a *PGM object
From: Jeff Young <cooljeff913@xxxxxxxxx>
Date: Wed, 26 Oct 2005 06:21:37 -0700 (PDT)
List-archive: <http://archive.midrange.com/midrange-l>
List-help: <mailto:midrange-l-request@midrange.com?subject=help>
List-id: Midrange Systems Technical Discussion <midrange-l.midrange.com>
List-post: <mailto:midrange-l@midrange.com>
List-subscribe: <http://lists.midrange.com/mailman/listinfo/midrange-l>, <mailto:midrange-l-request@midrange.com?subject=subscribe>
List-unsubscribe: <http://lists.midrange.com/mailman/listinfo/midrange-l>, <mailto:midrange-l-request@midrange.com?subject=unsubscribe>

You can use the ALCOBJ command in the CL that runs the pgm.
In the pgm that wants to test if Pgm A is running, use the ALCOBJ command.  If 
Pgm A is running and allocated to CL Pgm A, the ALCOBJ will fail.
You can monitor for the failure and take appropiate action.


Luis Rodriguez <luisrodriguez@xxxxxxxxxxx> wrote:
Hi all,

Does anybody know how to check if a program is being used for another
job? I had thought of using ALCOBJ, but it only protects the program of
being deleted.

Thanks for your help,

Luis Rodriguez

This mailing list archive is Copyright 1997-2026 by midrange.com 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.