埋め込みの説明
@1@ : PROPERTY
例題
[C5120.cob] 000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C5120. 000003 ENVIRONMENT DIVISION. 000004 IDENTIFICATION DIVISION. 000005 OBJECT. 000006 DATA DIVISION. 000007 WORKING-STORAGE SECTION. 000008 01 PROP1 POINTER PROPERTY. 000009 PROCEDURE DIVISION. 000010 IDENTIFICATION DIVISION. 000011 METHOD-ID. MO1. 000012 DATA DIVISION. 000013 WORKING-STORAGE SECTION. 000014 01 OBR1 USAGE OBJECT REFERENCE. 000015 PROCEDURE DIVISION. 000016 END METHOD MO1. 000017 END OBJECT. 000018 END CLASS C5120.
C5120.cob 8: JMN5120I-S PROPERTY句はポインタデータ項目には指定できません．PROPERTY句は無効になります．
