例題
[P2529.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2529. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 . 000007 02 WTARGET OCCURS 26 INDEXED BY IX1 000008 ASCENDING KEY IS WKEY. 000009 03 WKEY PIC S9(4). 000010 03 WDATA PIC X(1). 000011 01 WANS PIC X(1). 000012 01 WDA1 PIC S9(4). 000013 PROCEDURE DIVISION. 000014 SEARCH ALL WTARGET 000015 AT END 000016 DISPLAY "ERROR" 000017 WHEN WKEY(IX1) < WDA1 + 12 000018 MOVE WDATA(IX1) TO WANS 000019 END-SEARCH 000020 END PROGRAM P2529.
P2529.cob 17: JMN2529I-S 比較演算子がありません．
詳細な説明
文脈に合った比較演算子が見つかりません．以下の場合が該当します．
SEARCH文／SEARCH ALL文のWHEN指定に=(EQUAL/EQUALS)以外の比較演算子が書かれている
IF文，PERFORM文中の条件式に比較演算子(>, <, =, <=, >=)が書かれていない，あるいはEVALUATE文中の条件式に補助語のISしか書かれていない
START文のKEY指定に比較演算子(>, <, =, <=, >=)が書かれていない
