Чем тебе не подходит мой вариант? Там вобще не нужно никаких проверок.
Задача: Посчитать количество строк с уникальным значением поля "VAT Doc No.". Поле "VAT Doc No." имеет тип, к примеру Code.
1. Ужем таблицу у которой первичный ключ типа Code.
2. Создаем временную таблицу на ее основе.
3. Копируем в чикле поле "VAT Doc No." во временную таблицу в ключевое поле
4. Пишем
IF NOT временная таблица.INSERT THEN;
Если такого значения нет то инсерт отработает нормально и перейдет к копированию следующей строчки
Если такое значение есть, то инсерт не отработает и, опять таки перейдет к копированию следующей строчки
5. После цикла пишем временная таблица.COUNT
все.... значение получили
IF временная таблица.FIND(-) THEN REPEAT
временная таблица.INIT;
временная таблица.ключевое поле := "VAT Doc No.";
IF NOT временная таблица.INSERT THEN;
UNTIL временная таблица.NEXT=0
Количество строк := временная таблица.COUNT;
|