例題
[C3307.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3307. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 PTR1 USAGE IS POINTER. 000007 01 PTR2 USAGE IS POINTER. 000008 PROCEDURE DIVISION. 000009 IF PTR1 > PTR2 THEN DISPLAY "NG". 000010 END PROGRAM C3307.
C3307.cob 9: JMN3307I-S ポインタデータ作用対象の比較で指定する比較演算子は,EQUAL(=)またはNOT EQUAL(NOT =)でなければなりません.