埋め込みの説明
@1@ : エラーの原因となったデータ名.
例題
[P2427.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2427. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT REPFILE ASSIGN TO SYS001. 000007 I-O-CONTROL. 000008 DATA DIVISION. 000009 FILE SECTION. 000010 FD REPFILE 000011 REPORT IS REP1. 000012 WORKING-STORAGE SECTION. 000013 01 . 000014 02 CTLD OCCURS 10 000015 PIC X. 000016 REPORT SECTION. 000017 RD REP1 PAGE 66 000018 CONTROL CTLD. 000019 01 TYPE DE. 000020 PROCEDURE DIVISION. 000021 END PROGRAM P2427.
P2427.cob 18: JMN2427I-S CONTROL句の制御データ名'CTLD'は,添字を必要とする項目であってはなりません.この制御データ名は,無効となります.
詳細な説明
制御データ名(CONTROL句に指定したデータ名)のデータ記述項は,OCCURS句が指定された項目あるいはそれに従属する項目であってはなりません.