==[[COBOL ステートメント - EVALUATE]]==
[[COBOL]] |
{{include_html [[banner_html]], "!ads"}}
一連のネストされたIF ステートメントの省略表現を提供。このステートメントは、複数の条件を評価することができる。
WHEN "3"
MOVE 3 TO B
WHEN OTHEROTHE[[R]]
MOVE 0 TO B
END-EVALUATE.
=====式の真偽を判定=====
EVALUATE A > B
WHEN TRUET[[R]]UE
MOVE 1 TO X
WHEN FALSE
=====条件の真偽を判定=====
EVALUATE TRUET[[R]]UE
WHEN A > B
MOVE 1 TO X
=====値の範囲を判定=====
EVALUATE TOKUTEN
WHEN 80 THROUGH TH[[R]]OUGH 100 MOVE "A" TO GRADEG[[R]]ADE WHEN 60 THROUGH TH[[R]]OUGH 79 MOVE "B" TO GRADEG[[R]]ADE WHEN 50 THROUGH TH[[R]]OUGH 59 MOVE "C" TO GRADEG[[R]]ADE WHEN OTHEROTHE[[R]] MOVE "D" TO GRADEG[[R]]ADE
END-EVALUATE
{{include_html [[banner_html]], "!COBOL"}}