手動レコード ロック

手動レコード ロックを使用する場合、READ 文を使用してレコード ロックを取得します。

手動ロックを使用するには、次のように指定します。

1. ファイルに対して SELECT 句で LOCK MODE IS MANUAL 句を指定します。
2. READ 文で WITH LOCK 句を指定します。

次に例を示します。

 select fd-name
     assign to "muser.dat"
     lock mode is manual
   ...
     read fd-name with lock