Как сосчитать одинаковые записи в БД.

[hack]

Вот собственно вопрос - имеется БД (mdb). Мордочку написал на Delphi, коннект через ADO. В базе куча полей, адресная часть периодически повторяется - Улица-Номер дома-Корпус. Мне нужно сосчитать записи, совпадающие по этим трем полям и полученные значения забить в определенное поле (это не проблема). Третий день ломаю голову как осуществить, на данный момент пробую так:

• Перехожу к первой записи.
• Считываю все три поля в переменную_1.
• Перехожу к Следующей записи.
• Снова считываю три поля в переменную_2.
• Сравниваю строки.
• Если совпали, то увеличиваю переменную_3 на 1 и перехожу к следующей записи.
• Если не совпали, просто перехожу к следующей записи.
• Записываю переменную_3 в соответствующее поле.
• По достижении последней записи перехожу ко второй записи и гоню все заново.

Вроде все работает, но как сделать, что бы не считать запись с которой провожу сравнение, а то все значения получаются на 1 больше.
Заранее спасибо.

[timid_wolf]

что-то я не понял.

а почему группировкой нельзя выбрать все в самой базе?
или в аксесе нет group by?

[hack]

Цитата: Сообщение от timid_wolf а почему группировкой нельзя выбрать все в самой базе? или в аксесе нет group by?

Я же написал:

Цитата: Сообщение от hack Мордочку написал на Delphi

т.е. Работаю через самописную прогу, т.к. Access ненавижу с детства .

[vidik]

Проще использовать SQL. Например: select count(street) from table where street='Виноргадная'. Подобный запрос выдает количество улиц с определенным названием. Можно добавить условия по номеру дома и т.д. Опишите конкретную задачу, попробую помочь с запросом.

[hack]

Что я хочу сделать:
Есть три поля c с данными по адресу (Улица - № Дома - № Корпуса) и пустое 4-е поле.

| Поле_1| Поле_2 | Поле_3 | Поле_4 |
| 1 ____| 1 _____| 1 _____| 2_____ |
| 1_____| 1_____ | 1 _____| 2 _____|
| 1 ____| 2 _____| 1 _____| 3 _____|
| 1 ____| 2 _____| 1 _____| 3_____ |
| 1 ____| 2 _____| 1 _____| 3_____ |
| 3 ____| 1 _____| 1 _____| 4 _____|
| 3 ____| 1 _____| 1 _____| 4 _____|
| 3 ____| 1 ____ | 1 _____| 4 _____|
| 2 ____| 3_____ | 1 _____| 1_____ |
| 3 ____| 1_____ | 1_____ | 4 _____|
| 3 ____| 3 _____| 3 _____| 1_____ |

При добавлении записи мне нужно пробежаться по всем записям и найти дубликаты с совпадающими этими тремя полями.
Например записи со значениями 1-1-1 повторяются 2 раза, соответственно в 4-е поле мне нужно поставить '2'. Записи со значениями 1-2-1 повторяются 3 раза - в четвертой поле надо проставить '3' и т.д. Причем записи могут идти не по порядку.
Вариант с скулевским запросом наверно не прокатит по причине огромного кол-ва улиц (около 2000).
ЗЫ Опишу общий принцип - имеется БД установленных домовых коммутаторов (сейчас около 500 шт, в дальнейшем будет 5500-6000 записей). В теории 1 коммутатор - 1 адрес, но получилось так, что на некоторых адресах пришлось установить 2,3 а то и 4 коммутатора. Естественно адрес установки у них один (Поле -1, Поле -2,Поле -3) только номер подъезда меняется, но это не важно. Отсортировать записи в DBGridEh по трем полям мне не удается, поэтому и решил этим гемороем заняться. Может есть способ попроще - буду признателен за помощь (в Твери готов и поляну накрыть). Вопрос не срочный, но хотелось бы в месячный срок уложиться.

[Vasuha]

При добавлении записи, заносите всегда в поле4 - "1". А когда захотите узнать количество сгруппируйте по первым трем полям а четвертое - SUM. Вот и узнаете количество на каждой записе.

[vidik]

Зачем отягощать БД одинаковыми записями. Проведите нормализацию. Добавте таблицу "TComm" с полями, например: IDComm (идентификатор), SerialComm (серийный номер комутатора), IDAdr (ссылка на адресс из таблицы адресов). Тогда в таблице адресов будет одна запись (1,1,1) а в таблице TComm - несколько записей со ссылкой на этот адресс.

Таблица TAdr

IDAdr	Street	Dom	Korp
1	1	1	1
2	1	2	1
3	3	1	1
4	2	3	1
5	3	3	3

Таблица TComm

IDComm	SerialComm	IDAdr
1	xxx-xxx	1
2	xxx-xxx	2
3	xxx-xxx	1
4	xxx-xxx	3
5	xxx-xxx	3
6	xxx-xxx	5
7	xxx-xxx	4
8	xxx-xxx	4
9	xxx-xxx	4

Запрос:
SELECT Street, Dom, Korp, Count(IDComm) AS Kol
FROM TAdr, TComm
WHERE TAdr.IDAdr=TComm.IDAdr
GROUP BY Street, Dom, Korp

Результат:

Street	Dom	Korp	Kol
1	1	1	2
1	2	1	1
2	3	1	3
3	1	1	2
3	3	3	1

Цитата: Вариант с скулевским запросом наверно не прокатит по причине огромного кол-ва улиц (около 2000).

У меня уже больше 22000 записей - нет проблем.

P.S. Если нет необходимости идентифицировать коммутаторы, просто вводите ручками в поле_4 Вашей таблицы количество установленных коммутаторов и при изменении их количества - редактируйте соответствующую запись. Допускать же одинаковые записи в БД - крайне неэфективно.