× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  1.  Home
  2. MIDRANGE-L
  3. May 2021

Re: need ALCOBJ type lock released when program ends

If you can use RPG then look at ON-EXIT Op Code
It gets called whenever the program terminates no matter what.

HTH
Gad



date: Thu, 27 May 2021 06:57:23 +0200
from: "D*B" <dieter.bender@xxxxxxxxxxxx>
subject: Re: need ALCOBJ type lock released when program ends

<Steve>
is it possible to have a CL program run ALCOBJ to get an *EXCLRD lock on
an
object. Then be guaranteed that once the CL program ends, the lock will be
released?
</Steve>

ACTGRP(*NEW) and CEE4RAGE could do this. As I don't use CL since more than
15 years, I don't have an CL example, but lots of RPG (using CEE4RAGE for
cleanup work is standard in all my programms.
For instance here: http://bender-dv.de/Sourcen/QRPGLESRC.HASHTABLE (have
a
look on subprocedures init and exit. init registers procedure exit as exit
handler, put your DLCOBJ in procedure exit and the runtime calls the
procedure , when the ACTGRP ends - regardless why and when this happens.

D*B



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-2024 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.