basic.unlock Statement/BASIC Program

basic.unlock

Command basic.unlock Statement/BASIC Program
Applicable release versions: AP, R83
Category BASIC Program (486)
Description resets an execution lock, in the range 0 to 63, previously set with a "lock" statement.

If no "lock.number" is specified, all locks set by the program are unlocked.
Syntax unlock
unlock lock.number.expression
Options
Example
again: lock 12 else rqm; goto again
read rec from file,id else print id:" not found"; rec = "X"
write rec on file,id
unlock 12

This conditionally sets execution lock 12 just before a segment of code which 
performs file retrieval and update. When complete, lock 12 is cleared by the 
"unlock" statement.
Purpose
Related basic.statements
tcl.clear-basic-locks
tcl.clear-locks
basic.lock
tcl.list-locks_rp