埋め込みの説明
@1@ : 受取り側に指定された項目名
例題
[C3343.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3343. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 A PIC X. 000007 01 B USAGE IS POINTER. 000008 PROCEDURE DIVISION. 000009 P-START. 000010 SET A TO B. 000011 END PROGRAM C3343.
C3343.cob 10: JMN3343I-S SET文の受取り側項目'A'は,指標名,指標データ項目,整数項目,ポインタデータ項目,ADDRESS OF特殊レジスタまたはオブジェクト参照データ項目でなければなりません.