The only  way to do  that for regular files  (not filelists) is  to write
your own  file access control exit,  something that would check  the lock
status  (using a  GLOBALV  variable or  some private  disk  file of  your
choice) during  GET1, reject if file  already locked, and reset  the lock
condition at PUT2 time.
 
  Eric