例題
[P2598.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2598. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 WNUM PIC S9(4) BINARY. 000007 PROCEDURE DIVISION. 000008 IF WNUM EQUAL THAN 12 THEN 000009 DISPLAY "OK" 000010 END-IF 000011 END PROGRAM P2598.
P2598.cob 8: JMN2598I-S 条件の比較演算子の組合せに誤りがあります.
詳細な説明
比較演算子は次のいずれかでなければなりません.
IS GREATER THAN
IS NOT GREATER THAN (IS LESS THAN OR EQUAL TOと等価です)
IS LESS THAN
IS NOT LESS THAN (IS GREATER THAN OR EQUAL TOと等価です)
IS EQUAL TO
IS NOT EQUAL TO
IS GREATER THAN OR EQUAL TO (IS NOT LESS THANと等価です)
IS LESS THAN OR EQUAL TO (IS NOT GREATER THANと等価です)