Помогите советом, знатоки!
Пишу утилиту к чужой БД.
Несколько слов о БД: InterBase, в базе 21 таблица, размер около 15 Мб.
Делаю запрос над таблицей Data (в ней всего около 200 000 записей).

Select D.* from Data D where D.Parnumber=12 and D.Data_Date='0:30 15.12.2003' and D.Object=2 Order By D.Item

Вроде все просто.
Таких запросов циклично около 50.
Отлаживаю прогрмму в Delphi 5.5. Сервер БД - Firebird 1.0
Так вот, запросы судя по отладчику обрабатываются быстро, но после всего этого программа залипает.
Смотрю: параметр Firebird Guardian - Number of Attachments - число вложений (или как это еще назвать) медленно растет. Так жду около 5 минут, потом, когда Number of Attachments падает до 1, программа отмокает.
Данные я только читаю, не записываю, после запроса делаю откат Rollback.
Такое подозрение, что идет перезапись данных на диск, что весьма странно, или это нормально?
Где можно еще поковырять, какие свойства посмотреть?
Мучаюсь уже неделю.
ICQ 134811783

Nick74
Запросов у меня было по началу около 2200, потом я оптимизировал код и сделал запросы более глобальные. Так что это уже не поможет.
Далее...
Виснет сервак, как я понимаю. Он перегружен неосвобожденными запросами.

Открытие базы:

if SiconSisOpen then exit;
if not dmSicon.dbSicon.Connected then dmSicon.dbSicon.DatabaseName:=PathBaseSicon;
try if not dmSicon.dbSicon.Connected then dmSicon.dbSicon.Connected:=true;
SiconSisOpen:=true;
except MessageDlg( '...........', mtError ,[mbOk], 0);
end;

Запросы :

CurrIbQ.SQL.Clear;
CurrIbQ.SQL.Add(strSQL);
try CurrIbQ.Open; // ЗАЛИПАЕТ ЗДЕСЬ !!!
except
MessageDlg('..........',mtWarning,[mbOk],0);
Result:=false;
end;
// обработка данных
// обработка данных
// обработка данных
CurrIbQ.Close;
if dmSicon.transSicon.Active then dmSicon.transSicon.Rollback;

{
запрос strSQL типа :

Select D.* from Data D where D.Parnumber=12 and D.Data_Date='0:30 15.12.2003' and D.Object=2 Order By D.Item
}

Закрываю базу:

dmSicon.dbSicon.Connected:=false;
BasesSiconIsOpen:=false;