COBOLなら、オレに聞け!<2>
■ このスレッドは過去ログ倉庫に格納されています
0790デフォルトの名無しさん
NGNGつーか、一番いいのは
DISPLAY "月を2桁で入力して下さい(01-12)"
にしるっ!!!
これが、一番というより、間違えがすくないとおもわれ。
もしくは判定を EVALUATE で
EVALUATE TSUKI
WHEN "1 " *> 1とスペースの二文字
WHEN "2 "
:
WHEN "12"
ただしい
WHEN OTHER
えらー
END-EVALUATE.
にしとけ、私は絶対やらないがな・・・
そもそも一番の間違えは、文字項目に対して
比較する時に数字を使ってるのが間違いと思われ。
IF TSUKI >= "12" と
IF TSUKI >= 12 は使い分けるべき
>783
ACCEPT で 数字項目に値をとってこれたっけ?やるなら、
01 TSUKI.
03 TSUKI-9 PIC 9(02).
が妥当かと。
■ このスレッドは過去ログ倉庫に格納されています