Causes the default locking to become AUTOMATIC rather than EXCLUSIVE for files in a multi-user environment, and automatically locks records on a WRITE or REWRITE statement when the program is locking multiple records.
Note: This directive is included for compatibility with earlier file-sharing products. When writing new programs you should use the locking syntax mentioned below rather than this directive.
Syntax:
>>-.---.-.----.--FILESHARE-----------------><
+-/-+ +-NO-+
Properties:
Default:
|
NOFILESHARE
|
Phase:
|
Syntax check
|
$SET:
|
Initial
|
Dependencies:
DIALECT"RM" sets FILESHARE immediately.
Comments:
FILESHARE is equivalent to WRITELOCK and AUTOLOCK together. NOFILESHARE is equivalent to NOAUTOLOCK and NOWRITELOCK together.