例題
[C1697.cob] 000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C1697. 000003 OBJECT. 000004 PROCEDURE DIVISION. 000005 METHOD-ID. M1697. 000006 DATA DIVISION. 000007 WORKING-STORAGE SECTION. 000008 01 DATA011 PIC X ANY LENGTH. 000009 END METHOD M1697. 000010 END OBJECT. 000011 END CLASS C1697.
C1697.cob 8: JMN1697I-S ANY LENGTH句はメソッド定義の連絡節のレベル番号01の項目だけに指定できます．次の認識できる句，段落，節または部まで無効になります．
