埋め込みの説明
@1@ : メソッドの行内呼出しまたはオブジェクトプロパティ.
@2@ : ADDRESS OFまたはLENGTH OF.
例題
[C5563.cob] 000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C5563. 000003 IDENTIFICATION DIVISION. 000004 OBJECT. 000005 PROCEDURE DIVISION. 000006 IDENTIFICATION DIVISION. 000007 METHOD-ID. M5563. 000008 DATA DIVISION. 000009 WORKING-STORAGE SECTION. 000010 01 WPX POINTER. 000011 LINKAGE SECTION. 000012 01 LX1 PIC X(4). 000013 01 LX2 PIC X(4). 000014 PROCEDURE DIVISION 000015 USING LX1 000016 RETURNING LX2. 000017 SET WPX TO ADDRESS OF SELF :: "M5563"(LX1). 000018 END METHOD M5563. 000019 END OBJECT. 000020 END CLASS C5563.
C5563.cob 17: JMN5563I-S メソッドの行内呼出しはADDRESS OFの一意名に指定できません.