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