手動レコード ロックの例

次は、手動で単一のレコードをロックする例です。

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

次は、手動で複数のレコードをロックする例です。

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