Makes the WRITE and REWRITE statements acquire a record lock when the program is locking multiple records in a shared data file in a multi-user environment.
>>-.---.-.----.-.-WRITELOCK--.------------->< +-/-+ +-NO-+ +-WRITE-LOCK-+
None
Default: | NOWRITELOCK |
Phase: | Syntax check |
$SET: | Initial |
Comments:
This directive is included for compatibility with earlier file-sharing products. When writing new programs you should use the relevant locking syntax rather than this directive.