[掲示板に戻る]
| 11 | AT ENDは正しく動いているのでは？ |
| ターラヤン 2015-7-22 0:23
[返信] [編集] HIGH-VALUEを8888・・に直してうまく動くようになったのでしたら、良いとは思いますが・・・ もともとのご質問は 「最終レコードが削除されたら、レコードがなくなるので、AT END になると思うのですが、 なぜAT END GOTO ABC-090が無視されてしまうのでしょうか？」 だったと思います。 「最後のレコードがDELETE されたあと、 再度READ命令を実行した際、 READ XXXX NEXT AT END の直後に DISPLAY したところ ”１０” が表示されました。」 ということならば、 AT ENDの直後のDISPLAY文が実行されたということですので、 「最終レコードが削除されたら、レコードがなくなるので、AT ENDになっている」 のではないでしょうか。 プログラムの一部分しか見えないので、はっきりとはわかりませんが、 実はGOTO文の前にHIGH-VALUEをMOVEする処理もあるようですし、 例えば、MOVEとGOTOの間の別の命令があって不正十進エラーになっているとか、 XXXX-KEY2が英数字項目で定義されていて、HIGH-VALUEを入れた後に どこかでXXXX-KEY2を使って計算して（例えばCOMPUTE A=XXXX-KEY/2のように） 不正十進エラーになっているとか AT ENDとGOTOの間が空いているのなら、GOTOでジャンプしない経路があり予想外の場所を実行しているとか どこかにロジックに誤りがあるのではないか、という気もします。 |
 AT END が無視されて、再度、DELETE処... GAI 2015-7-14 16:12
|
 
Re: AT END が無視されて、再度、DELE... 温泉好きのうさぎ 2015-7-14 18:57
|
Re: AT END が無視されて、再度、DELE... ターラヤン 2015-7-15 0:52
|
Re: AT END が無視されて、再度、DELE... gai 2015-7-17 11:53
|
|
Re: AT END が無視されて、再度、DELE... GAI 2015-7-17 11:24
|
|
Re: 久々ＣＯＢＯＬ８５を見ました。（A... 江須扇 2015-7-16 11:02
|
|
Re: 久々ＣＯＢＯＬ８５を見ました。（A... gai 2015-7-17 13:14
|
|
Re: AT END が無視されて、再度、DELE... gai 2015-7-17 14:09
|
|
Re: AT END が無視されて、再度、DELE... GAI 2015-7-17 15:57
|
|
Re: AT END が無視されて、再度、DELE... ＥＸＣＨＡＮＧＥ 2015-7-19 16:24
|
|
Re: AT END が無視されて、再度、DELE... MAKI 2015-8-4 14:53
|
|
AT ENDは正しく動いているのでは？ ターラヤン 2015-7-22 0:23
←いまここ〜
|
|
Re: AT ENDは正しく動いているのでは？ gai 2015-7-23 15:07
|
BluesBB ©Sting_Band