例題
[C3080.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3080. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 A PIC 1 BIT. 000007 01 B PIC 1(8) BIT. 000008 PROCEDURE DIVISION. 000009 P-START. 000010 IF A = B STOP RUN.
C3080.cob 10: JMN3080I-S ALLブール定数を除くブール作用対象同士の比較では，両方の作用対象のブール文字数は等しくなければなりません．
