例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2538.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 WDA1 PIC X(1).
000007 01 WDA2 PIC X(1).
000008 PROCEDURE DIVISION.
000009 EVALUATE TRUE ALSO TRUE
000010 WHEN WDA1 = SPACE
000011 DISPLAY "OK"
000012 WHEN OTHER
000013 DISPLAY "NG"
000014 END-EVALUATE
000015 END PROGRAM P2538.
P2538.cob (10) : JMN2538I-S 選択対象の数が選択主体の数より少ない．両者は等しくなければなりません．ANYを補って，処理を続行します．
詳細な説明
EVALUATE文の最初のWHEN指定より前に書く作用対象(TRUEおよびFALSEも含む)を「選択主体」，EVALUATE文のWHEN指定に書く作用対象(TRUE，FALSEおよびANYも含む)を「選択対象」といいます．
1つのWHEN指定の中には，選択主体の数と同じ数の選択対象を書かなければなりません．