埋め込みの説明
@1@ : 被除数/除数
例題
[C3065.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3065. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 A COMP-1. 000007 01 B PIC 99. 000008 01 C PIC 9999. 000009 01 D PIC 99. 000010 PROCEDURE DIVISION. 000011 P-START. 000012 DIVIDE A BY B GIVING C REMAINDER D. 000013 DIVIDE A INTO B GIVING C REMAINDER D. 000014 STOP RUN.
C3065.cob 12: JMN3065I-S REMAINDER指定付きのDIVIDE文の被除数は，固定小数点項目または固定小数点定数でなければなりません．
C3065.cob 13: JMN3065I-S REMAINDER指定付きのDIVIDE文の除数は，固定小数点項目または固定小数点定数でなければなりません．
