AT END が無視されて、再度、DELETE処理を行い、 不正十進数エラーで アボートしてしまいます

8:Re: AT END が無視されて、再度、DELETE処理を行い、 不正十進数エラーで アボートしてしまいます
gai 07/17 14:09
こんにちは。

各所にDISPLAYを入れて、
fileSTATUSを表示してみました。

最後のレコードがDELETE されたあと、
再度READ命令を実行した際、

READ XXXX NEXT
AT END の直後に
DISPLAY したところ
 ”10” 
が表示されました。

10はAT ENDですよね?

表示したあと、そこで 十進数エラーになります。

もしかしたら、KEYに HIGH-VALUE を入れているからいけないのでですか??

READ XXXX NEXT
AT END
DISPLAY STS UPON AAA-GDD
MOVE HIGH-VALUE TO XXXX-KEY2.

と書いてあります。




1-

BluesBB ©Sting_Band