埋め込みの説明
@1@ : データ名
@2@ : 関数名
例題
[C3443.cob] 000001 CLASS-ID. C3443. 000002 FACTORY. 000003 PROCEDURE DIVISION. 000004* 000005 METHOD-ID. M3443. 000006 DATA DIVISION. 000007 WORKING-STORAGE SECTION. 000008 01 WRCV PIC X(25). 000009 LINKAGE SECTION. 000010 01 WDATA-AN PIC X ANY LENGTH. 000011 PROCEDURE DIVISION USING WDATA-AN. 000012 MOVE FUNCTION REVERSE(WDATA-AN) TO WRCV. 000013 END METHOD M3443. 000014* 000015 END FACTORY. 000016 END CLASS C3443.
C3443.cob 12: JMN3443I-S FUNCTION REVERSEの引数に,ANY LENGTH句が指定された項目である'WDATA-AN'は指定できません.