10:Re: AT END が無視されて、再度、DELETE処理を行い、 不正十進数エラーで アボートしてしまいます EXCHANGE 07/19 16:24 ☆ 拝見させていただいて、前任者はかなり古風なソフト書法をご存じの方と思います。ひょっとしたらA−VX以外でのCOBOLを使っておられた経験者かも?low-value high-valueをendがらみで使われているところなんかそれっぽい感じがします) ☆それはともかく、私は江須扇さんのご指摘が(現在なら)妥当な書法ではないかと同感いたします。 以下、(江須扇氏より引用) >それにしても旧100からCOBOLがあったのでそれを引き継いだプログラムが多いので >GO TO ありありのプログラムはやむを得ないかもしれませんが >新規であればCOBOL85はEND−XXXとPERFORM を使った構造化プログラムが作成が可能になります。 >データベースのSELECTと命令と組み合わせると かなりすっきりしたプログラムになります。 |