埋め込みの説明
@1@ : ファイル名
例題
[C3130.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3130. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 SPECIAL-NAMES. 000006 CHANNEL-01 IS CHN-1. 000007 INPUT-OUTPUT SECTION. 000008 FILE-CONTROL. 000009 SELECT FILE-1 ASSIGN TO S-SYS001. 000010 DATA DIVISION. 000011 FILE SECTION. 000012 FD FILE-1 LINAGE IS 50 LINES. 000013 01 REC-1 PIC X(121). 000014 PROCEDURE DIVISION. 000015 WRITE REC-1 AFTER ADVANCING CHN-1. 000016 STOP RUN.
C3130.cob 15: JMN3130I-S LINAGE句指定のあるファイル'FILE-1'のWRITE文に，呼び名句指定のADVANCING指定を記述することはできません．BEFORE ADVANCING 1とみなされます．
