Re: How to tell if an object is in use?

[rob@xxxxxxxxx]

List Object locks api?
http://publib.boulder.ibm.com/infocenter/iseries/v5r3/ic2924/info/apis/qwclobjl.htm

Rob Berendt
-- 
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





Greg Wenzloff <GWenzloff@xxxxxxxxxxx> 
Sent by: midrange-l-bounces@xxxxxxxxxxxx
02/09/2005 08:44 AM
Please respond to
Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>


To
"'midrange-l@xxxxxxxxxxxx'" <midrange-l@xxxxxxxxxxxx>
cc

Subject
How to tell if an object is in use?






I have a CLP that will process a file in batch then delete it.   Sometimes 
a
user first performs maintenance on the file but fails to exit the
maintenance program leaving the file locked.    The CLP which runs in 
batch
then hangs.

I put the following code in the program that is about to submit the batch
job:

/* SOMETIMES USERS ARE IN MAINTENANCE IN ANOTHER SESSION */ 
        ALCOBJ OBJ((&FILEE *FILE *EXCL *FIRST)) WAIT(5) 
        MONMSG MSGID(CPF0000) EXEC(DO) 
                <<< send the user a message to get out of the file  >>>>
                ENDDO 
        DLCOBJ     OBJ((&FILEE *FILE *EXCL *FIRST)) 
 
This ALCOBJ/DLCOBJ does not seem very elegant.   Is there a better way to
tell if an object is being used by someone?

Thanks,
Greg 
-- 
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.