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



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.



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.