埋め込みの説明
@1@ : ADD/SUBTRACT/MULTIPLY/DIVIDE
@2@ : 一意名の名標
例題
[C3062.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3062. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 A PIC X(4). 000007 01 B PIC 9(4). 000008 PROCEDURE DIVISION. 000009 P-START. 000010 ADD A TO B. 000011 SUBTRACT A FROM B. 000012 MULTIPLY A BY B. 000013 DIVIDE A INTO B. 000014 STOP RUN.
C3062.cob 10: JMN3062I-S ADD文の作用対象'A'は,数字項目でなければなりません.
C3062.cob 11: JMN3062I-S SUBTRACT文の作用対象'A'は,数字項目でなければなりません.
C3062.cob 12: JMN3062I-S MULTIPLY文の作用対象'A'は,数字項目でなければなりません.
C3062.cob 13: JMN3062I-S DIVIDE文の作用対象'A'は,数字項目でなければなりません.