RE: Dataarea lock problem

["Lim Hock-Chai" <Lim.Hock-Chai@xxxxxxxx>]

The two driver programs *lock IN, add 1 to the number and then do the out 
immediately.

What I don't understand is how could the WRKOBJLCK showing more than one jobs 
locking the dataarea at the same time (Did I not reading the screen correctly, 
like Don mentioned below?).  Like I mentioned, this only happened 2 to 3 times 
for the past 2 years.

-----Original Message-----
From: Steve Richter [mailto:srichter@xxxxxxxxxxxxx]
Sent: Tuesday, May 27, 2003 1:58 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: Dataarea lock problem


Hi Lim,

sometimes programmers lock something before writing the display, then
mistakenly dont release the lock until the display read completes.

When the lockup happens, you should be able to use wrkobjlck to see what job
and maybe what program is holding the lock.

Possibly run a program in batch all day long that uses alcobj and dlcobj to
lock and release the dtaara.   Use a wait time of 60 seconds on the alcobj
command.  Then send yourself a message when the dtaara cant be locked.  That
might tell you that another job has locked the dtaara for too long.

-Steve

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Lim Hock-Chai
Sent: Tuesday, May 27, 2003 2:21 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: Dataarea lock problem


This only happen about 2 to 3 times for the past two years.  I'was not able
to recall what the share status were.

All I can recall is when this happen, all the jobs (a lot of them) that try
to call the RPG program to access the dataarea were all getting the time-out
cpf error.  Because a lot of jobs were failing, I got no choice but ended
those jobs that were in HELD status.  Everything start to working again
after I ended those (HELD) jobs.

-----Original Message-----
From: Fisher, Don [mailto:Dfisher@xxxxxxxxxxxxxxxxx]
Sent: Tuesday, May 27, 2003 12:02 PM
To: 'RPG programming on the AS400 / iSeries'
Subject: RE: Dataarea lock problem


You're looking at the wrong column.  The column with "HELD" merely informs
you the object has been acquired by the process for whatever purpose needed.
Next to the column with the "HELD" value should be a column with such
statuses as "SHRRD", "SHRUP", etc.  This column tells you how the process is
using the object.  Any process using *LOCK to acquire the data area should
have "SHRUP" in this column, if I remember correctly.

Check out the CL programming manual under object locking or WRKOBJLCK for
more information on what these values mean.

Hope that helps.

Donald R. Fisher, III
Project Manager
Roomstore Furniture Company
(804) 784-7600 extension 2124
DFisher@xxxxxxxxxxxxxxxxx

<clip>
1) When do WRKOBJLCK on the dataarea, sometimes I'll see three or four
programs in HELD status and the other in wait status.  The question is how
can multiple jobs lock a dataarea.
<clip>
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.


_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.


_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.