Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

dBase antifreeze [D6, dBase, FoxPro]


Hyboid ©   (2003-10-20 19:04:00) 

Привет, всем!

Исходные данные:
<Таблица 1> - dBase ~20Mb
<Таблица 2> - dBase ~3Mb
Запрос типа:


DELETE FROM <Имя таблицы 1> AS Table1
WHERE EXIST(
SELECT <Поле 1>
FROM <Имя таблицы 2> AS Table2
WHERE Table1.<Поле 1> = Table2.<Поле 1>
)


Работает достаточно долго. Использование CPU 100%.
И все такое.

1) Предполагаю, что лучше использовать цикл FOR (есть ли он),
меняя вложенность SELECT c DELETE, но не знаю как.
Документация по dBase нулевая.
2) Что делать с загрузкой CPU ?
3) Можно ли как нибудь оценить примерное время выполнение
запроса.

Заранее спасибо.


Vlad   (2003-10-20 19:10:00) [1]

Индекс по полю Table2.<Поле 1> спасет.
Если нет, переделай запрос
DELETE FROM <Имя таблицы 1> AS Table1
WHERE (SELECT count(*)
FROM <Имя таблицы 2> AS Table2
WHERE Table1.<Поле 1> = Table2.<Поле 1>) > 0
Тоже необходим индекс.


Наверх

Титульная страница Поиск, карта сайта Написать письмо