[COBOL] EVALUATE ~ END-EVALUATE

▶ EVALUATE

The EVALUATE statement provides a shorthand notation for a series of nested IF statements. It can evaluate multiple conditions. The subsequent action depends on the results of these evaluations.

- Operands before the WHEN phrase
 
   Are interpreted in one of two ways, depending on how they are specified:

   * Individually, they are called selection subjects.
   * Collectively, they are called a set of selection subjects.

- Operands in the WHEN phrase
 
  Are interpreted in one of two ways, depending on how they are specified:

  * Individually, they are called selection objects
  * Collectively, they are called a set of selection objects.

- ALSO
  
  Separates selection subjects within a set of selection subjects;
  separates selection objects within a set of selection objects.
 
- THROUGH and THRU
 
  Are equivalent.

▶ END-EVALUATE phrase

This explicit scope terminator serves to delimit the scope of the EVALUATE statement. END-EVALUATE permits a conditional EVALUATE statement to be nested in another conditional statement.

▶ EVALUATE ~ END-EVALUATE example