PROCEDURE DIVISION USING／PROCEDURE DIVISION RETURNING／ENTRY USINGのデータ名"*** 1 ***"が重複しているか，又は，同じ領域（REDEFINES句で再定義）が指定されています。