例
000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C1822. 000003 OBJECT. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 A. 000007 02 B PIC 9(4) COMP-5 IS PUBLIC. 000008 END OBJECT. 000009 END CLASS C1822.
C1822.cob (7) : JMN1822I-S アクセス指定句は01または77レベル項目以外には指定できません.