埋め込みの説明
@1@ : 一意名の名標
例題
[C3071.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3071. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 A PIC 1111. 000007 01 B PIC 9(4). 000008 01 C PIC 9(4). 000009 PROCEDURE DIVISION. 000010 P-START. 000011 COMPUTE A = B + C. 000012 STOP RUN.
C3071.cob 11: JMN3071I-S COMPUTE文の右辺が算術式の場合,受取り側'A'は数字項目または数字編集項目でなければなりません.