例題
[P2007.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2007. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT SQFILE1 ASSIGN TO SYS001. 000007 SELECT SQFILE1 ASSIGN TO SYS001. 000008 I-O-CONTROL. 000009 DATA DIVISION. 000010 FILE SECTION. 000011 FD SQFILE1. 000012 01 SQF1REC. 000013 02 PIC X(80). 000014 WORKING-STORAGE SECTION. 000015 PROCEDURE DIVISION. 000016 END PROGRAM P2007.
P2007.cob 7: JMN2007I-S SELECT句のファイル名は,他のSELECT句のファイル名と同じであってはなりません.
詳細な説明
ファイル名は,以下の各ソース単位中で一意である必要があります.
プログラム
ファクトリ
オブジェクト
メソッド
例えば,この例題プログラムでは,1つのプログラム中で同一のファイル名SQFILE1に対して,複数のファイル管理記述項が記述されていることが,この診断メッセージが出力される原因です.