Подсчет числа уникальных записей таблицы

[mefodiy]

В Дельфи я бы сделал это так

i := 0;
First;
while not Eof do
begin
s := <Текущее значение поля>;
while (<Текущее значение поля> = s) and (not Eof) do
Next;
i := i + 1;
end;

Но Navision я новичок и этот вариант не могу применить.
Происходит зацикливание.

Может кто переведет код в Navision?