You could make a small program that opens the file I-O, and then reads the 
actual record.  The record will now be in a lock-situation.  If you run 
this program within a debugger, you can stop just there, and the record 
will be locked for as long as you like......


Sent by:
15.01.2003 08:16
Please respond to COBOL Programming on the iSeries/AS400

        Fax to: 
        Subject:        Forcing a record lock

Hi All,

I need to force a record lock on a particular record in order to simulate
a problem.  I'm trying to fix an issue where a program abends because a
record is locked.  However, in our system, the program does not abend and
the file that is supposedly locked has a shared lock.  I need to be able
to lock the record for a significant amount of time (about 60 seconds) in
order to cause the abend.  What are the different ways I can do this?

Regina Rafols
This is the COBOL Programming on the iSeries/AS400 (COBOL400-L) mailing 
To post a message email:
To subscribe, unsubscribe, or change list options,
or email:
Before posting, please take a moment to review the archives

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-2021 by 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.