埋め込みの説明
@1@ : STD
例題
[C9018.cob] 000001 @OPTIONS FLAGSW(STDM) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. C9018. 000004 ENVIRONMENT DIVISION. 000005 DATA DIVISION. 000006 WORKING-STORAGE SECTION. 000007 01 REC01. 000008 02 REC-A PIC X(4). 000009 02 REC-B PIC X(4). 000010 02 REC-C PIC X(4). 000011 66 REC-A RENAMES REC-B THRU REC-C. 000012 PROCEDURE DIVISION. 000013 P-START. 000014 STOP RUN.
C9018.cob 11: JMN9018I-W (STD)レベル番号66は共通範囲外です.処理を続行します.
C9018.cob 11: JMN9002I-W (STD)RENAMES句は共通範囲外です.処理を続行します.