埋め込みの説明
@1@ : SIA,STD
例題
[P9183.cob] 000001 @OPTIONS FLAGSW(STDH) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. P9183. 000004 ENVIRONMENT DIVISION. 000005 INPUT-OUTPUT SECTION. 000006 FILE-CONTROL. 000007 SELECT KYUUYO-FILE ASSIGN TO IDFL 000008 ORGANIZATION IS INDEXED 000009 RECORD KEY IS SYAIN-BANGO. 000010 DATA DIVISION. 000011 FILE SECTION. 000012 FD KYUUYO-FILE. 000013 01 KYUUYO-REC. 000014 02 SYAIN-BANGO PIC X(6). 000015 02 KYUUYO PIC 9(6). 000016 PROCEDURE DIVISION. 000017 P-START. 000018 START KYUUYO-FILE KEY NOT > SYAIN-BANGO. 000019 STOP RUN.
P9183.cob 18: JMN9182I-W (STD)START文のデータ名指定は共通範囲外です.処理を続行します.
P9183.cob 18: JMN9183I-W (STD)START文のこの比較演算子は共通範囲外です.処理を続行します.