external-file-reference は、あいまいさを避けるために 1 回だけ指定する必要があります。2 回指定している場合は、どちらかの指定をソース プログラムから削除します。2 箇所の指定がある場合、VALUE OF FILE-ID の指定がファイルに対して使用され、external-file-reference の ASSIGN 句指定は無視されます。
input-output section. file-control. select f1 assign to disk f1-name-1. *> the first external-file-reference 'f1-name-1' ... file section. fd f1 record contains 10 characters value of file-id is f1-name-2. *> the second external-file-reference 'f1-name-2' ...