埋め込みの説明
@1@ : 一意名
例題
[C3226.cob] 000001 @OPTIONS CONF(74),LANGLVL(85) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. C3226. 000004 ENVIRONMENT DIVISION. 000005 DATA DIVISION. 000006 WORKING-STORAGE SECTION. 000007 01 A PIC 999PP. 000008 PROCEDURE DIVISION. 000009 MOVE 12345 TO A. 000010 IF "123" = A THEN 000011 DISPLAY "CONF-OK" 000012 ELSE 000013 DISPLAY "CONF-NG" 000014 END-IF 000015 END PROGRAM C3226.
C3226.cob 9: JMN3331I-W MOVE文の数字定数からP付き数字項目'A'への転記は，数字項目のPに対応する部分の文字位置の値が反映されません．
C3226.cob 10: JMN3226I-I (CONF)小数点の左側に'P'を持つ数字項目'A'を文字作用対象と比較しています．小数点の左側に'P'を持たない数字項目とみなします．
