Used for assigning labels to data-values that a COBOL-Variable can take. Very useful in detecting special-conditions. They work like flags or switches.
01 TEMPERATURE PIC 9(03).
88 HIGH-TEMPERATURE VALUES 75 THRU 100.
88 MEDIUM-TEMPERATURE VALUES 50 THRU 74.
88 LOW-TEMPERATURE VALUES 32 THRU 49.
MOVE 60 TO TEMPERATURE
IF MEDIUM-TEMPERATURE(You need not write TEMPERATURE=60)
...
END-IF
No comments:
Post a Comment