Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.04;
Скачать: [xml.tar.bz2];




Вниз

Удаление повторяющийся записи 


vinni2000   (2002-01-03 14:02) [0]

Проблема, нужно в таблице удалить все повторяющиеся записи подскажите как написать такой запрос. Нужно срочно. Спасибо!!!!



Delirium   (2002-01-03 15:50) [1]

Пишу для MSSQL, из таблицы Test (ключевое поле id) удаляются все повторяющиеся (в поле cValue) записи:

delete from test
where id in (select id from
(select Min(id) as id,cValue,Count(*) as C
from test
group by cValue) tmp where c>1)



Fareader   (2002-01-03 16:06) [2]

Смотри чего на www.ib.demo.ru было

DELETE FROM XXX T1 WHERE EXISTS
(SELECT * FROM XXX T2 WHERE
(T2.column1 = T1.column1 or (T2.column1 is null and T2.column1 is null)) AND
(T2.column2 = T1.column2 or (T2.column2 is null and T2.column2 is null)) AND
(.......) AND
(T2.RDB$DB_KEY > T1.RDB$DB_KEY))

В этом случае используется RDB$DB_KEY - физический номер записи IB. Можно оставить как запись с самым большим DB_KEY, так и с самым меньшим (> или < в последнем условии WHERE).

Статья называется : Удаление или поиск дубликатов записей в таблице
Авторы: Diane Brown
Cognos



Delirium   (2002-01-03 16:18) [3]

>Fareader
Согласен, такой командой удаляются не только "двойные", но и все остальные "лишние".

delete test where id in
(select t2.id from test t1,test t2
where (t1.cValue=t2.cValue) and (t1.id<t2.id))



Fareader   (2002-01-03 16:23) [4]

Там же другой вариант, кажется этим я пользовался

SELECT * FROM TABLE T1
WHERE EXISTS
(SELECT FIELD FROM TABLE T2
WHERE T1.FIELD = T2.FIELD AND
T1.RDB$DB_KEY != T2.RDB$DB_KEY)

но надо проверить который из них...




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.04;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.028 c
3-8785            Niky                  2002-01-05 09:01  2002.02.04  
excel


14-8994           Raider                2001-12-11 10:53  2002.02.04  
Кодекс Русских Программистов


1-8816            ev                    2002-01-19 17:11  2002.02.04  
Sender


4-9024            Leviathan             2001-12-07 15:24  2002.02.04  
Разрешение экрана


1-8870            NY152                 2002-01-15 09:59  2002.02.04  
Подскажите, где поставить проверку...