埋め込みの説明
@1@ : 一意名の名標,特殊レジスタの名標,指標名の名標
@2@ : 属性
@3@ : “算術式",“数字定数",“文字定数",各表意定数の名標,“日本語定数",“ブール定数"
例題
[C3241.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3241. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 A PIC S9(3) PACKED-DECIMAL. 000007 PROCEDURE DIVISION. 000008 P-START. 000009 IF A = "AB" STOP RUN.
C3241.cob 9: JMN3241I-S 'A'(内部10進)と文字定数との比較は,許されない組合せの比較です.