RE: Embedded SQL fetch next receives record lock. How to bypass

Alan, This will definitely be what I use when we get to V6.1. Thanks for
the input....

Kirk Barker
Development Team
Premier Software Associates
(801) 299-8772 Ext. 139
http://www.premsoft.com/Support.htm


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Alan Shore
Sent: Thursday, January 15, 2009 2:19 PM
To: RPG programming on the IBM i / System i
Subject: Re: Embedded SQL fetch next receives record lock. How to bypass

Hi Kirk
see if this web page may be of any help)
http://www.itjungle.com/fhg/fhg011409-story01.html


Alan Shore
Programmer/Analyst, Distribution
E:AShore@xxxxxxxxxxx
P:(631) 200-5019
C:(631) 880-8640
"If you're going through Hell, keep going" - Winston Churchill

rpg400-l-bounces@xxxxxxxxxxxx wrote on 01/15/2009 03:03:10 PM:

Hello All

My question is as follows. I am writing a RPGLE program using
embedded SQL. Using a cursor, I come to the Fetch Next. Here the
program hangs up because it is trying to read a record that is locked by
another user. I need to update this record. But If it is locked I
simply want to skip over it. So I check for the error in the SQL STAT
and know that it is locked. So I try to do another fetch next.
However, the Fetch next just tries to read the same locked record, over
and over. How can I skip or bypass this record. If I was on V6.1 I
could use the SKIP RECORD LOCK. However, I am not and have spent way to
much time trying to figure it out. Please Help. Thanks



Kirk Barker

kirkb@xxxxxxxxxxxx

Development Team

Premier Software Associates

www.Premsoft.com <http://www.premsoft.com/>

(801) 299-8772 Ext. 139



--
This is the RPG programming on the IBM i / System i (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.