例題
[C3025.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3025. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 A PIC 1(8) BIT. 000007 PROCEDURE DIVISION. 000008 P-START. 000009 IF ( A ) = B"00001111" THEN 000010 STOP RUN.
C3025.cob 9: JMN3025I-S ブール式は，条件式に指定できません．
