Показать сообщение отдельно
  #1  
Старый 17.03.2010, 20:53
Yura_S Yura_S вне форума
Прохожий
 
Регистрация: 26.10.2009
Сообщения: 16
Репутация: 10
По умолчанию Загрузка параметрического SQL запроса из файла

Здравствуйте! Не могу разобраться с запуском запроса, возникает ошибка.
Загружаю текст запроса:
Код:
procedure TBlydo.FormCreate(Sender: TObject);
var i,j:integer;
begin
DM.KolKal.SQL.LoadFromFile('КолКал.txt');
...
Код в файле:
Код:
SELECT Рецепт.KodRecepta, Sum([(КалорииВБлюде)].Калории) AS [Sum-Калории]
FROM Блюда INNER JOIN (Рецепт INNER JOIN [(КалорииВБлюде)] ON Рецепт.KodRecepta = [(КалорииВБлюде)].KodRecepta) ON (Блюда.KodRecepta = Рецепт.KodRecepta) AND (Блюда.KodRecepta = [(КалорииВБлюде)].KodRecepta)
GROUP BY Рецепт.KodRecepta
HAVING (((Рецепт.KodRecepta)=:Kod));
":Kod"-Параметр который должен задаваться в коде Delphi
Код запуска запроса (Находится в процедуре кнопки):
Код:
DM.KolKal.Close;
DM.KolKal.Parameters.ParamByName('Kod').Value:=IntToStr(Kod);
DM.KolKal.Open;
При выполнении программы возникает ошибка:
...'KolKal: Parametr 'Kod' Not Found'...
Подскажите пожалуйста в чём ошибка.
Ответить с цитированием