• Subject: Re: How can i test, from rpg, if a display file is in use?
  • From: Sam_L <lennon_s_j@xxxxxxxxxxx>
  • Date: Mon, 28 Jan 2019 13:12:57 -0500
  • Arc-authentication-results: i=1; mx.google.com; spf=neutral (google.com: 195.159.176.226 is neither permitted nor denied by best guess record for domain of rpg400@xxxxxxxxxxx) smtp.mailfrom=rpg400@xxxxxxxxxxx; dmarc=fail (p=NONE sp=NONE dis=NONE) header.from=hotmail.com
  • Arc-message-signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=google.com; s=arc-20160816; h=content-language:in-reply-to:user-agent:content-transfer-encoding :mime-version:reply-to:references:message-id:date:subject:from:to; bh=OGm9S7xaHXo2yaEDNyX7Dw0m8GbGbckZjO7kzYkY/UI=; b=D7nroTcSeX598ZiZ/lk0yek0VWsMhseiPK436bS/ONkng4yYuqcAWoHu+kv418d6t9 4tBnRbZlrCAvd3TueLu7e8LYuXmNmOMZn6bJsfXHI16WaYZTGgPQEwC/g+ygaNPot3FI DK0efgJJkKdk8eQAkdUZI1dE7CZJckZBHQ4YD8XOhca/nmzUxj7P4wcoEoeNklsplXu0 iRqqIVSukSgNsM18NlRHYh04e9D8puYg+jtoBODfPnYZRt9v57WZB3pgQPj9rVITifm3 06S2H9ZWJCqJnOyG7FRhKD3NeqN15GalzXq1Ytdvc6CxU0Hxi8NY8JsiwcTMjuZDr4rp 80LA==
  • Arc-seal: i=1; a=rsa-sha256; t=1548699182; cv=none; d=google.com; s=arc-20160816; b=POeT4XholJH7LxwUK1xdUxCYn0+YYe4goynG86/oSQ+QDEvEmklwun4b6YHTnPHax7 J0QB/9gs62IScmoFzLF2tSZiymKMJMaNGsKfOyvWJp9DNtOF1a/S9xEzGZnxywCG4JIO BcppjA53PPC6MSdP1aKcZUxZE/3Q0n3TyGICJrIaAHn9L8o39YuopxxatzHpdE/n8o68 C8gBJdWaeElpeVp8PpwMaECvVmShFiNDgBdjvRZZEQjPoInswmeqBMSx9DTbl+D9PFYZ qgccpFceZcw/SsUFysIRN1jL16AKmtexqBEVeOZqZrQWafzjA2ZURXLFGzu+FpLT82me uEzA==
  • List-archive: <https://archive.midrange.com/rpg400-l/>
  • List-help: <mailto:rpg400-l-request@lists.midrange.com?subject=help>
  • List-id: "RPG programming on the IBM i \(AS/400 and iSeries\)" <rpg400-l.lists.midrange.com>
  • List-post: <mailto:rpg400-l@lists.midrange.com>
  • List-subscribe: <https://lists.midrange.com/mailman/listinfo/rpg400-l>, <mailto:rpg400-l-request@lists.midrange.com?subject=subscribe>
  • List-unsubscribe: <https://lists.midrange.com/mailman/options/rpg400-l>, <mailto:rpg400-l-request@lists.midrange.com?subject=unsubscribe>


Off the top of my head...

Maybe ALCOBJ *EXCL and if it fails it is in use. (Don't forget to DLCOBJ
if it succeeds.)

Or maybe the APIs on object locking may be needed.

Sam

On 1/28/2019 12:38 PM, JRusling@xxxxxxxxxxx wrote:
From pgmA i want to test if pgmB's display file pgmBD is in use.

In my copius notes i've saved throughout the years I cannot find anything
about this.

Nor can i find anything searching rpg400-l or google.

Anyone have a technique or code for doing this?

Thanks for any help,

John
<br />
The information in this email is confidential and may be legally privileged.
It is intended solely for the addressee. Access to this email by anyone else is
unauthorized. If you are not the intended recipient, any disclosure, copying,
distribution or any action taken or omitted to be taken in reliance on it, is
prohibited and may be unlawful.



This thread ...

Follow-Ups:
Replies:

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

This mailing list archive is Copyright 1997-2019 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].