The UNLOCK statement frees a record in a relative or sequential file that was locked on a specified logical unit by a previous READ. It performs no other I/O operation. The UNLOCK statement takes one of the following forms:
UNLOCK ([UNIT=]u [,ERR=s] [,IOSTAT=ios]) UNLOCK u
If no record is locked, the operation has no effect.