埋め込みの説明
@1@ : メソッド名
例題
[C3447.cob] 000001 CLASS-ID. C3447. 000002 FACTORY. 000003 PROCEDURE DIVISION. 000004* 000005 METHOD-ID. M3447. 000006 DATA DIVISION. 000007 WORKING-STORAGE SECTION. 000008 01 X10 PIC X(10). 000009 LINKAGE SECTION. 000010 01 RET PIC X ANY LENGTH. 000011 PROCEDURE DIVISION RETURNING RET. 000012 MOVE SELF :: "M3447" TO X10 000013 END METHOD M3447. 000014* 000015 END FACTORY. 000016 END CLASS C3447.
C3447.cob 12: JMN3447I-S RETURNING指定にANY LENGTH句が指定されたメソッド'M3447'は,行内呼出しにより呼び出すことはできません.