READ文と次のREWRITE文の間で主レコードキーの値が変更されました。
プログラム名＝*** 1 ***
行番号／欄＝*** 2 ***
*** 3 ***＝*** 4 ***

要因

順アクセスの索引ファイルで，READ文で入力したレコードの主レコードキーの内容を変更した後，REWRITE文を実行した。

(S)

プログラムの実行を中止する。

(P)

REWRITE文の実行前にREAD文で入力した主レコードキーの内容を変更しないように修正して再実行する。

共通例外の例外名

EC-I-O-INVALID-KEY