Getting started with cobol GnuCOBOL installation with GNU/Linux ACCEPT statement ADD statement ALLOCATE statement ALTER statement CANCEL statement CALL statement COMMIT statement COMPUTE statement CONTINUE statement COPY directive String DELETE statement DIVIDE statement DISPLAY statement EVALUATE statement EXIT statement GENERATE statement FREE statement GO TO statement GOBACK statement IF statement INITIALIZE statement INITIATE statement INSPECT statement MERGE statement MOVE statement MULTIPLY statement OPEN statement PERFORM statement READ statement RELEASE statement RETURN statement REPLACE directive REWRITE statement SET statement SEARCH statement SORT statement START statement SUBTRACT statement STOP statement TERMINATE statement STRING statement SUPPRESS statement UNLOCK statement Intrinsic Functions UNSTRING statement USE statement WRITE statement Data division How does the computational work in cobol?

EVALUATE statement

Remarks:

The EVALUATE statement is a multiple branch, multiple join, conditional test and selection structure.

A three condition EVALUATE

EVALUATE a ALSO b ALSO TRUE
    WHEN 1 ALSO 1 THRU 9 ALSO c EQUAL 1 PERFORM all-life
    WHEN 2 ALSO 1 THRU 9 ALSO c EQUAL 2 PERFORM life
    WHEN 3 THRU 9 ALSO 1 ALSO c EQUAL 9 PERFORM disability
    WHEN OTHER PERFORM invalid
END-EVALUATE

Contributors

Topic Id: 7083

Example Ids: 23795

This site is not affiliated with any of the contributors.