例題
[C3079.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3079. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 A PIC 1(8). 000007 01 B PIC 1(8) BIT. 000008 PROCEDURE DIVISION. 000009 P-START. 000010 IF A > B STOP RUN.
C3079.cob 10: JMN3079I-S ブール作用対象の比較で指定する比較演算子は,EQUAL(=)またはNOT EQUAL(NOT =)でなければなりません.