例題
[C1683.cob] 000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C1683. 000003 ENVIRONMENT DIVISION. 000004 IDENTIFICATION DIVISION. 000005 OBJECT. 000006 DATA DIVISION. 000007 WORKING-STORAGE SECTION. 000008 01 AAA2 PROPERTY GET PIC 9. 000009 END OBJECT. 000010 END CLASS C1683.
C1683.cob 8: JMN1683I-S PROPERTY句のGET指定またはSET指定にはNOを記述しなければなりません．次の認識できる句，段落，節または部まで無効になります．
