SQL. Несоответствие типов данных

[Xaenar]

Здравствуйте!

Есть БД Access с таблицами:

Агентство(Id_агента *, ФИО_сотруд, Название_агентства (тип Integer))
Квартира(Id_квартиры *, Id_агента, Дата_продажи)
Справочник_агентств(Key1 *, Название_агентства)

Получить сведения о количестве проданных квартир каждым агентом заданного агентства за определенный период времени.

Выполняю запрос с параметрами

SELECT Id_агента, Count(*)
FROM Квартира
Where (Дата_продажи Between :date_1 AND :date_2) 
AND Id_агента IN (Select Id_агента
                                 From Агентство
                                 Where Название_агентства = :agency)
Group by Id_агента

date_1, date_2 - тип DateTime
agency - тип Integer

DataModule1.StatisticsQuery.Active := false;

DataModule1.StatisticsQuery.Parameters.ParamByName('date_1').Value :=
    DateTimePicker1.Date;
DataModule1.StatisticsQuery.Parameters.ParamByName('date_2').Value :=
    DateTimePicker2.Date;
DataModule1.StatisticsQuery.Parameters.ParamByName('agency').Value :=
     DataModule1.AgencyBookTable.FieldByName('Key1').AsInteger;    

DataModule1.StatisticsQuery.Active := true;

И в результате получаю ошибку о несоответствии типов данных, хотя по отдельности основной запрос и подзапрос выполняются корректно.
Во вложении форма статистики и бд.
Буду очень благодарен за помощь.

[Прик]

Какой-то баговый баг в АДО и из-за этого надо явно указать тип значения в параметрах.