RPG で更新ファイルを読取れば自動的に最後に読取った更新対象のレコードは
更新用としてシステム(OS)によってレコードがロックされてしまう。
しかし場合によっては本当に更新するときだけにロックしたい場合がある。
例えば 先の「341. RPGのレコード・ロック」で紹介したような
READ命令で SFL表示する場合である。
EOF になったときはレコード・ロックは自動的に外れるのだが
EOFにならない場合は最後に読み込んだレコードが自動的にロックされて
排他制御となる。
このことを避けるには ILE-RPG では命令コードの直後に (N)を付加すると
レコード・ロックを外すことができる。
[例]
0209.00 C READ(N) BUHINM 50 0209.00 C RRN CHAIN(N) BUHINM 50 0209.00 C KEY READE(N) BUHINM 50