埋め込みの説明
@1@ : データ名
@2@ : INVOKE
例題
[C3442.cob] 000001 CLASS-ID. C3442. 000002 OBJECT. 000003 PROCEDURE DIVISION. 000004* 000005 METHOD-ID. M3442-M1. 000006 DATA DIVISION. 000007 WORKING-STORAGE SECTION. 000008 LINKAGE SECTION. 000009 01 PRM PIC X ANY LENGTH. 000010 01 RET PIC X ANY LENGTH. 000011 PROCEDURE DIVISION USING PRM RETURNING RET. 000012 INVOKE SELF "M3442-M1" USING PRM RETURNING RET. 000013 END METHOD M3442-M1. 000014* 000015 END OBJECT. 000016 END CLASS C3442.
C3442.cob 12: JMN3442I-S INVOKE文のRETURNING指定に，ANY LENGTH句が指定された項目である'RET'は指定できません．
