埋め込みの説明
@1@ : 関数名
例題
[C3351.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3351. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 A PIC S9(2)V9(2). 000007 01 B PIC X(1). 000008 PROCEDURE DIVISION. 000009 P-START. 000010 MOVE FUNCTION CHAR(A) TO B. 000011 END PROGRAM C3351.
C3351.cob 10: JMN3351I-S FUNCTION CHARの引数は,整数型でなければなりません.