• Subject: RE: want to update a file three ways without using COMMIT to free
  • From: Buck Calabro <mcalabro@xxxxxxxxxxxx>
  • Date: Tue, 5 Oct 1999 12:58:45 -0400

CHAIN(n)/READx(n) will not lock the record at all.  The RPG/400 equivalent
puts the "n" in the half-adjust column.  This is in contrast to doing the
CHAIN, locking the record, then doing an UNLOCK/UNLCK to release the lock.
In the olden days we would have coded an UPDATE or an EXCEPT with no fields
to release the lock on the record.  I prefer to use the "no lock" read now,
because it is clearer that you never intended to lock the record (and
perform an update) in the first place.

Commitment control doesn't have any effect unless you are locking/updating
the records

Buck Calabro
Aptis; Albany, NY

> -----Original Message-----
> From: Mary Koetting 
> Sent: Tuesday, October 05, 1999 12:29 PM
> To:   'midrange'
> Subject:      want to update a file three ways without using COMMIT to
> free
> Thanks Henrik for your suggestions. I'll try to expand on my problem.
> There is only one set of beg/end dates for each logical but the date (the
> field is not defined as a DATE field) can be 00's and is sorted on the
> date
> descending so to get the most current date for each set of dates.
> No single record contains the most current dates for all date sets. I know
> this is probably not the best way to keep them but this is all we have to
> work with right now.
> This program is in COBOL but I know that RPG has a 'release' key word to
> unlock records. Does this only work if commitment control is not used?
> Does commitment control supersede all other efforts to unlock the record?
> Thanks again for your time and help.  
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com

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