Examples of Single Record Locking

To lock a single record, using manual record locking:

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

To lock a single record, using automatic record locking:

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