cobmig:cobol:stmt:evaluate [TeamWiSE Referenzdokumentation]

EVALUATE

Folgende Syntax wird für das EVALUATE Statement erkannt:

>>-EVALUATE--+-identifier-1-+----------------------------------->
             +-literal-1----+   
             +-expression-1-+   
             +-TRUE---------+   
             '-FALSE--------'   

>--+-----------------------------+------------------------------>
   | .-------------------------. |   
   | V                         | |   
   '--- ALSO--+-identifier-2-+-+-'   
              +-literal-2----+       
              +-expression-2-+       
              +-TRUE---------+       
              '-FALSE--------'       

   .----------------------------------------------------------------------------.   
   | .------------------------------------------------.                         |   
   V V                                                |                         |   
>------WHEN--| phrase 1 |--+------------------------+-+--imperative-statement-1-+-->
                           | .--------------------. |                               
                           | V                    | |                               
                           '---ALSO--| phrase 2 |-+-'                               

>--+------------------------------------+--+--------------+----><
   '-WHEN OTHER--imperative-statement-2-'  '-END-EVALUATE-'

<html><hr/></html> phrase 1

|--+-ANY--------------------------------------------------------------------------------+--|
   +-condition-1------------------------------------------------------------------------+   
   +-TRUE-------------------------------------------------------------------------------+   
   +-FALSE------------------------------------------------------------------------------+   
   '-+-----+--+-identifier-3------------+--+------------------------------------------+-'   
     '-NOT-'  +-literal-3---------------+  '-+-THROUGH-+--+-identifier-4------------+-'     
              '-arithmetic-expression-1-'    '-THRU----'  +-literal-4---------------+       
                                                          '-arithmetic-expression-2-'

<html><hr/></html> phrase 2

|--+-ANY--------------------------------------------------------------------------------+--|
   +-condition-2------------------------------------------------------------------------+   
   +-TRUE-------------------------------------------------------------------------------+   
   +-FALSE------------------------------------------------------------------------------+   
   '-+-----+--+-identifier-5------------+--+------------------------------------------+-'   
     '-NOT-'  +-literal-5---------------+  '-+-THROUGH-+--+-identifier-6------------+-'     
              '-arithmetic-expression-3-'    '-THRU----'  +-literal-6---------------+       
                                                          '-arithmetic-expression-4-'