EMZETT.IF bedingung ... ELSE ... END-IF verzweigt. Vergleiche schreibst du als Zeichen (>, <, =) oder als Wörter (GREATER THAN, LESS THAN, EQUAL TO), verknüpft mit AND, OR und NOT. Mit EVALUATE wählst du zwischen mehreren Fällen, ähnlich wie switch.
Besonders sind Stufe-88-Namen: Sie geben einem Wert eine lesbare Bedingung, etwa 88 VOLLJAEHRIG VALUE 18 THRU 150., die du dann direkt abfragst.
IDENTIFICATION DIVISION.
PROGRAM-ID. BEDINGUNG.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-ALTER PIC 9(3) VALUE 16.
88 VOLLJAEHRIG VALUE 18 THRU 150.
01 WS-NOTE PIC 9 VALUE 2.
PROCEDURE DIVISION.
IF VOLLJAEHRIG
DISPLAY "erwachsen"
ELSE
DISPLAY "noch nicht volljährig"
END-IF.
EVALUATE WS-NOTE
WHEN 1 DISPLAY "sehr gut"
WHEN 2 DISPLAY "gut"
WHEN OTHER DISPLAY "naja"
END-EVALUATE.
STOP RUN.Merke
IF ... ELSE ... END-IFEVALUATEist ein Mehrfach-Schalter- Stufe-88-Namen sind benannte Bedingungen
Aufgabe
Gib zu einer Punktzahl eine Note aus (mit EVALUATE).