COBCH1658 ASSIGN は VALUE OF FILE-ID により上書きされる

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'
...