Help - User name not unique?

[Tifa]

I am trying to write a program that will sort an input record and output a report. I want to sort it using an item's purchase price. I wrote the program and when I try to compile it says "5-S User-name SALES-RECORD not unique." It is highlighting the line in my SELECT-RECORDS paragraph where I put "READ SALES-FILE INTO SALES-RECORD". Any ideas? Thanks so much for the help!


B-210-SELECT-RECORDS.

OPEN INPUT SALES-FILE.

MOVE "N" TO SW-END-OF-FILE.

Error here -> READ SALES-FILE INTO SALES-RECORD
AT END MOVE "Y" TO SW-END-OF-FILE.

PERFORM B-340-RELEASE-RECORDS
UNTIL END-OF-FILE.

CLOSE SALES-FILE.

 

[TomKane]

Could it be that you have more than one SALES-RECORD defined in your data division?

 

[Tifa]

!!! That was it.. I had declared it twice. Oops.. thanks for the help!