埋め込みの説明
@1@ : エラーの原因となったデータ名.
例題
[P2331.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2331. 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 IS EXTERNAL 000011 LINAGE WPAGE. 000012 01 SQF1REC. 000013 02 PIC X(80). 000014 WORKING-STORAGE SECTION. 000015 01 WPAGE PIC 9(2). 000016 PROCEDURE DIVISION. 000017 END PROGRAM P2331.
P2331.cob 11: JMN2331I-S LINAGE句を指定したファイルが外部ファイルの場合,データ名'WPAGE'は外部データ項目として定義しなければなりません.
詳細な説明
LINAGE句を指定したファイルを外部ファイルとして共有するとき,倫理ページの構成もまた共用するため,ページ本体の行数を示すデータ項目も外部属性を持たなければなりません.