埋め込みの説明
@1@ : STD
@2@ : RANDOM，DYNAMIC
例題
[P9391.cob] 000001 @OPTIONS FLAGSW(STDM) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. P9391. 000004 ENVIRONMENT DIVISION. 000005 INPUT-OUTPUT SECTION. 000006 FILE-CONTROL. 000007 SELECT INFILE 000008 ASSIGN TO IND 000009 ORGANIZATION IS INDEXED 000010 RECORD KEY IS REC01 000011 ACCESS MODE IS RANDOM. 000012 DATA DIVISION. 000013 FILE SECTION. 000014 FD INFILE. 000015 01 REC01 PIC 9(5). 000016 01 REC02 PIC 9(5). 000017 PROCEDURE DIVISION. 000018 P-START. 000019 OPEN INPUT INFILE. 000020 CLOSE INFILE. 000021 STOP RUN.
P9391.cob 14: JMN9391I-W (STD)ACCESS MODE句中のRANDOMは共通範囲外です．処理を続行します．
P9391.cob 14: JMN9002I-W (STD)ORGANIZATION IS INDEXED句は共通範囲外です．処理を続行します．
P9391.cob 14: JMN9002I-W (STD)RECORD KEY句は共通範囲外です．処理を続行します．
