埋め込みの説明
@1@ : 送出し側のデータ項目
@2@ : 受取り側のデータ項目
例題
[C3022.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3022. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 ID01 PIC 9V9 PACKED-DECIMAL. 000006 01 AN01 PIC X(4). 000007 PROCEDURE DIVISION. 000008 MOVE ID01 TO AN01. 000009 END PROGRAM C3022.
C3022.cob 8: JMN3022I-W 非整数項目'ID01'は,英数字項目'AN01'に転記できません.送出し側のデータ項目と同じけた数を持つ符号なし外部10進項目に転記した後で,その外部10進項目を英数字項目として再定義したものを受取り側の英数字項目に転記したかのような処理をします.