- 締切済み
COBOLで文字変数Aと絶対に一致しない特殊値は?
COBOLでプログラミングをしています。ある変数AとBがあり、どちらも領域はPIC X(1)です。 この変数Aを、いかなるときでも変数Bと一致させたくないとき、Bに入れる「END OF FILE」のような特殊な値って無いのでしょうか? そのような値が存在するならば、AかBにその特殊な値を入れておけばいいと思うのですが、 もし無いとすれば、以下のような処理をスマートにCOBOLで作るには、どのように作るのが一般的ですか? PERFORM文を用いて終了条件がA=Bのとき、 最初の処理では必ずPERFORMの中の処理を行い、 2回目からは終了条件で実行するかどうかを判定するような処理 よろしくお願いします。
- みんなの回答 (4)
- 専門家の回答
みんなの回答
- chukenkenkou
- ベストアンサー率43% (833/1926)
回答No.4
TEST AFTERを指定すればいいだけでは? 省略すると、TEST BEFOREです。 内PERFORMでの記述例 PERFORM TEST AFTER [VARYING ・・・] UNTIL 条件 1個以上命令 END-PERFORM
- Tacosan
- ベストアンサー率23% (3656/15482)
回答No.3
perform でできると思う. with test after ってないかな?
- bajutsu
- ベストアンサー率20% (139/693)
回答No.2
後判定じゃだめなのん?
- PXU10652
- ベストアンサー率38% (777/1993)
回答No.1
「この変数Aを、いかなるときでも変数Bと一致させたくないとき、Bに入れる「END OF FILE」のような特殊な値って無いのでしょうか?」 COBOL特有の値としては、「LOW-VALUE」や「HIGH-VALUE」があります。↓ http://ja.wikipedia.org/wiki/%E4%BA%88%E7%B4%84%E8%AA%9E_(COBOL)#.E4.BA.88.E7.B4.84.E8.AA.9E.E3.81.AE.E5.88.86.E9.A1.9E