埋め込みの説明
@1@ : 一意名の名標
例題
[C3069.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3069. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 A PIC XXXX. 000007 01 B PIC 9(4). 000008 01 C PIC 9(4). 000009 01 D PIC 9(4). 000010 PROCEDURE DIVISION. 000011 P-START. 000012 COMPUTE A = B + C ON SIZE ERROR STOP RUN 000013 NOT ON SIZE ERROR MOVE B TO D. 000014 STOP RUN.
C3069.cob 12: JMN3069I-S [NOT] ON SIZE ERROR指定付きのCOMPUTE文の受取り側'A'は，数字項目または数字編集項目でなければなりません．
