[Progress Communities] [Progress OpenEdge ABL] Forum Post: RE: Update a record with NO-LOCK status

  • Thread starter Thread starter James Palmer
  • Start date Start date
Status
Not open for further replies.
J

James Palmer

Guest
I'm not sure if this is more or less worrying? DEFINE BUFFER bCust FOR customer. FIND bCust NO-LOCK WHERE bCust.custNum = 1. MESSAGE bCust.name VIEW-AS ALERT-BOX. DO TRANSACTION: FIND bCust EXCLUSIVE-LOCK WHERE bCust.custNum = 1. RUN updateRecord. END. FIND bCust NO-LOCK WHERE bCust.custNum = 1. MESSAGE bCust.name VIEW-AS ALERT-BOX. PROCEDURE updateRecord: FIND customer NO-LOCK WHERE customer.custNum = 1. ASSIGN customer.name = 'Hello world ' + STRING(TIME). END.

Continue reading...
 
Status
Not open for further replies.
Back
Top