help debug this script

[swf]

this is a simple script to eliminate duplicates found by a self join. The self join makes a record count field= 1 for single and = 2 for duplicate. Then it finds record count >1 and deletes one entry in a loop. It works but does not delete them all unless I run the script 4 times. Each time it misses less. Must be a bug in my loop where it misses values. Here is the script

Perform find (record count>1)

Go to first record

Loop

Freeze Window

Commit records

If record count >1

Delete record

End if

go to record next (exit after last)

end loop

show all records

[sbg2]

If record count >1

Delete record

End if

go to record next (exit after last)

end loop

show all records

When you delete (or Omit) a record FMP has to go to another record, which happens to be the next record. So by executing a Delete Record step and a Go To Record Next step you are moving by two records not one.