EVALUATE ステートメントは、ネストされた一連の IF ステートメントに対する省略表現を提供します。 これは、複数の条件を評価できます。 すなわち、IF ステートメントでは複合条件での構成になります。 オブジェクト・プログラムのその後の処置は、これらの評価の結果によって決まります。
EVALUATE ステートメント - 形式 >>-EVALUATE--+-ID-1-------+--+--------------------------+-------> +-リテラル-1-+ | .----------------------. | +-式-1-------+ | V | | +-TRUE-------+ '---ALSO--+-ID-2-------+-+-' '-FALSE------' +-リテラル-2-+ +-式-2-------+ +-TRUE-------+ '-FALSE------' .------------------------------------------------------------. | .----------------------------------. | V V | | >------| WHEN 句 |--+-----------------+-+--命令ステートメント-1-+--> | .-------------. | | V | | '---| ALSO 句 |-+-' >--+----------------------------------+--+--------------+------>< '-WHEN OTHER--命令ステートメント-2-' '-END-EVALUATE-' WHEN 句: |--WHEN---------------------------------------------------------> >--+-ANY------------------------------------------------------+--| +-条件-1---------------------------------------------------+ +-TRUE-----------------------------------------------------+ +-FALSE----------------------------------------------------+ '-+-----+--+-ID-3-------+--+-----------------------------+-' '-NOT-' +-リテラル-3-+ '-+-THROUGH-+--+-ID-4-------+-' '-算術式-1---' '-THRU----' +-リテラル-4-+ '-算術式-2---' ALSO 句: |--ALSO---------------------------------------------------------> >--+-ANY------------------------------------------------------+--| +-条件-2---------------------------------------------------+ +-TRUE-----------------------------------------------------+ +-FALSE----------------------------------------------------+ '-+-----+--+-ID-5-------+--+-----------------------------+-' '-NOT-' +-リテラル-5-+ '-+-THROUGH-+--+-ID-6-------+-' '-算術式-3---' '-THRU----' +-リテラル-6-+ '-算術式-4---'
関連情報