埋め込みの説明
@1@ : APPLY,LABEL RECORD,RECORD KEY,ALTERNATE RECORD KEY,FORMATTED RECORDまたは
CONTROL RECORD.
@2@ : エラーの原因となったデータ名.
例題
[P2181.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2181. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT SQFILE1 ASSIGN TO SYS001. 000007 I-O-CONTROL. 000008 DATA DIVISION. 000009 FILE SECTION. 000010 FD SQFILE1 000011 LABEL RECORD RECLB. 000012 01 SQF1REC. 000013 02 PIC X(80). 000014 01 RECLB PIC X(80). 000015 01 RECLB PIC X(80). 000016 WORKING-STORAGE SECTION. 000017 PROCEDURE DIVISION. 000018 END PROGRAM P2181.
P2181.cob 11: JMN2181I-S LABEL RECORD句のデータ名'RECLB'は,一意でなければなりません.データ名は,無効になります.