埋め込みの説明
@1@ : STD
例題
[C9105.cob] 000001 @OPTIONS FLAGSW(STDM) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. C9105. 000004 ENVIRONMENT DIVISION. 000005 DATA DIVISION. 000006 WORKING-STORAGE SECTION. 000007 01 REC01 PIC 9(4). 000008 01 REC02 PIC 9(4). 000009 PROCEDURE DIVISION. 000010 P-START. 000011 IF REC01 = LOW-VALUE THEN 000012 DISPLAY "LOW-VALUE" 000013 ELSE 000014 IF REC01 = HIGH-VALUE THEN 000015 DISPLAY "HIGH-VALUE" 000016 END-IF. 000017 STOP RUN.
C9105.cob 11: JMN9105I-W (STD)IF文の入れ子は共通範囲外です.処理を続行します.