RE: want to update a file three ways without using COMMIT to free

Mary,
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
mailto:Buck.Calabro@aptissoftware.com

> -----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
+---