埋め込みの説明
@1@ : INVOKEまたはCALL.
例題
[P5555.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P5555. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 WOBR OBJECT REFERENCE. 000006 CONSTANT SECTION. 000007 01 CNST-DATA PIC X(10) VALUE "XXX". 000008 PROCEDURE DIVISION. 000009 INVOKE WOBR "M5555" RETURNING CNST-DATA. 000010 END PROGRAM P5555.
[Win32]
P5555.cob 9: JMN5555I-S INVOKE文のRETURNINGに指定可能な一意名は,ファイル節,作業場所節または連絡節で定義されたデータ項目でなければなりません.INVOKE文を無効とします.
[Winx64]
P5555.cob 9: JMN5555I-S INVOKE文のRETURNINGに指定可能な一意名は,ファイル節,作業場所節,局所記憶節または連絡節で定義されたデータ項目でなければなりません.INVOKE文を無効とします.