例題
[P2011.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2011. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 WNUM PIC S9(9) BIT. 000007 PROCEDURE DIVISION. 000008 END PROGRAM P2011.
P2011.cob 6: JMN2011I-S BITはブール項目に指定しなければなりません.
詳細な説明
BIT(USAGE IS BIT句)は,データの用途がブール項目であることを示す句です.この句を指定するときは,データ記述項のPICTURE句の文字列は"1"だけで構成しなければなりません.