Ch 8_4. EVALUATE (II)


EVALUATE WHEN ... THRU ...

   01 SCORE    PIC 999V9.
   ...

   EVALUATE SCORE
      WHEN 90.0 THRU 100.0
         MOVE 'A' TO GRADE
      WHEN 80.0 THRU 89.9
         MOVE 'B' TO GRADE
      WHEN 70.0 THRU 79.9
         MOVE 'C' TO GRADE
      WHEN 60.0 THRU 69.9
         MOVE 'D' TO GRADE
      WHEN 0.0 THRU  59.9
         MOVE 'E' TO GRADE
      WHEN OTHER 
         MOVE '?' TO GRADE
   END-EVALUATE