埋め込みの説明
@1@ : PROPERTY
例題
[C5122.cob] 000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C5122. 000003 ENVIRONMENT DIVISION. 000004 OBJECT. 000005 DATA DIVISION. 000006 WORKING-STORAGE SECTION. 000007 01 PP USAGE OBJECT REFERENCE 000008 FACTORY OF SELF 000009 PROPERTY WITH NO GET. 000010 END OBJECT. 000011 END CLASS C5122.
C5122.cob 7: JMN5122I-S PROPERTY句は,SELF,FACTORY OF SELFまたはCLASS OF SELFが指定されたオブジェクト参照データ項目には指定できません.PROPERTY句は無効になります.
詳細な説明
USAGE OBJECT REFERENCE句にはクラス名が指定されていなければなりません.