RE: SQL Record Lock Question

Thanks to all that replied. The wait time was the culprit. For some unknown
reason, the wait time was 120 seconds. I have never seen it that high
before. Thanks for also helping to get rid of the blinders I had on. I was
so focused on solving this thru the use of SQL statements, I forgot there
are many ways to skin a cat.

Nick W. Mart
Programmer Analyst
Solutions, Inc.
2311 West 18th Street
PO Box 857
Spencer, IA 51301
 
712-262-4520  ext. 33

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Matt.Haas@xxxxxxxxxxx
Sent: Wednesday, January 18, 2006 2:58 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: RE: SQL Record Lock Question

Adding "WITH RR" to the end of a SELECT will make it lock the record
until you do a COMMIT. The file in the select needs to be journaled for
this to work.

Matt 

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Wilt, Charles
Sent: Wednesday, January 18, 2006 3:49 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: SQL Record Lock Question

Nick,

I'm lost.  Your subject line says "SQL Record Lock Question".  Yet you
say that _you're_ putting the lock on the record.

How are you doing this?

It seems your second process is attempting to read the file via SQL.  Is
the process that is updating the file also using SQL?


Charles Wilt
--
iSeries Systems Administrator / Developer
Mitsubishi Electric Automotive America
ph: 513-573-4343
fax: 513-398-1121
  

> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx 
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Nick W. Mart
> Sent: Wednesday, January 18, 2006 3:16 PM
> To: 'RPG programming on the AS400 / iSeries'
> Subject: RE: SQL Record Lock Question
> 
> Booth,
> 
> I totally agree with your point of view. However, our 
> programming group has
> decided to put a record lock on any record that is being 
> updated. Therefore,
> I still need to find a solution to this situation.
> 
> Thanks for your response.
> 
> Nick W. Mart
> Programmer Analyst
> Solutions, Inc.
> 2311 West 18th Street
> PO Box 857
> Spencer, IA 51301
>  
> 712-262-4520  ext. 33
> 
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx 
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
> On Behalf Of Booth Martin
> Sent: Wednesday, January 18, 2006 2:02 PM
> To: RPG programming on the AS400 / iSeries
> Subject: Re: SQL Record Lock Question
> 
> A record stays locked as long as the process that locked it.  
> Sometimes 
> this will happen when a user displays a record to update it and then 
> goes to lunch.  Its a real irritation.
> 
> However if the record is locked, the changes made, and the record 
> unlocked, then the next program can read it.  This is usually 
> pretty fast.
> 
> So....  why is the record staying locked?  Is it user 
> inspired delays? 
> Solve that problem first, and then your problem will probably go away.
> 
> 
> 
> Nick W. Mart wrote:
> > With the help of several old posts, I have been able to get 
> a record lock
> > when trying to update a record. Thanks to the list members for that.
> > 
> >  
> > 
> > However, I have not been able to find how to handle when 
> another user
> tries
> > to update this same record. So far, the program seems to 
> hang when it
> > attempts to select the record for update. I attempted to 
> use a "whenever
> > sqlerror goto recordlock" statement. However, that did not 
> seem to work.
> > 
> >  
> > 
> > Any and all suggestions would be welcome. Thank you in advance.
> > 
> >  
> > 
> > Nick W. Mart
> > 
> > Programmer Analyst
> > 
> > Solutions, Inc.
> > 
> > 2311 West 18th Street
> > 
> > PO Box 857
> > 
> > Spencer, IA 51301
> > 
> >  
> > 
> > 712-262-4520  ext. 33
> > 
> >  
> > 
> 
> -- 
> -----------------------------------
> Booth Martin
> http://martinvt.com
> -----------------------------------
> -- 
> 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.
> 
>