APPEND [BLANK] [IN <nWorkArea> | <cAlias> ] [NOMENU]
DbRLock( [<xRecordID>] ) --> lSuccess
NetErr( [<lNewStatus>] ) --> lError
SET EXCLUSIVE on | OFF | <lToggle>
UNLOCK [ALL] UNLOCK [IN <nWorkArea> | <cAlias> ] UNLOCK RECORD <xRecordId> [IN <nWorkArea> | <cAlias> ]