埋め込みの説明
@1@ : CALLまたはINVOKE．
例題
[C5585.cob] 000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C5585. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 REPOSITORY. 000006 IDENTIFICATION DIVISION. 000007 OBJECT. 000008 DATA DIVISION. 000009 WORKING-STORAGE SECTION. 000010 01 PR5585 PIC S9(9) COMP-5 PROPERTY. 000011 PROCEDURE DIVISION. 000012 IDENTIFICATION DIVISION. 000013 METHOD-ID. M5585. 000014 DATA DIVISION. 000015 LINKAGE SECTION. 000016 01 LK1 PIC S9(9) COMP-5. 000017 PROCEDURE DIVISION RETURNING LK1. 000018 END METHOD M5585. 000019 END OBJECT. 000020 END CLASS C5585.
[P5585.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P5585. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 REPOSITORY. 000006 CLASS C5585. 000007 DATA DIVISION. 000008 WORKING-STORAGE SECTION. 000009 01 WOBR OBJECT REFERENCE C5585. 000010 PROCEDURE DIVISION. 000011 INVOKE WOBR "M5585" 000012 RETURNING PR5585 OF WOBR 000013 END PROGRAM P5585.
P5585.cob 12: JMN5585I-S INVOKE文のRETURNING指定にオブジェクトプロパティは記述できません．INVOKE文を無効とします．
