Here is what I have:
Paging screen:
Key field - list of files to be read:
File: XXXX ACDL
Update program (loops through file XXXX):
Primary File - XXXX Mode: D
Record Lock Logic:
SUPPRESS_RETRY()
DSEL
If I sit on a record in the paging screen, then start the update, the update shows: UPDATE IN PROGRESS - PLEASE WAIT until I exit out of the paging screen.
In the Lock Logic (in the Update) you need to put the code:
SUPPRESS_RETRY()
This tells the Function to stop waiting on the lock on this record.