埋め込みの説明
@1@ : SIA,STD
例題
[P9221.cob] 000001 @OPTIONS FLAGSW(STDM) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. P9221. 000004 ENVIRONMENT DIVISION. 000005 INPUT-OUTPUT SECTION. 000006 FILE-CONTROL. 000007 SELECT CHAR-FILE ASSIGN TO CHAR-FL. 000008 DATA DIVISION. 000009 FILE SECTION. 000010 FD CHAR-FILE 000011 BLOCK CONTAINS 0 CHARACTERS. 000012 01 CHAR-REC PIC X(80). 000013 PROCEDURE DIVISION. 000014 P-START. 000015 STOP RUN.
P9221.cob 10: JMN9221I-W (STD)BLOCK CONTAINS 0 CHARACTERS指定は共通範囲外です.処理を続行します.