[dimon4iknik]

Всем привет. Помогите разобраться в запросе... Запрос ниже...

Код:

INSERT INTO [Решение для первой смены] ( количество_диванов, Название_дивана, Наименование_товара, расход_товара_на_каркас, расход_товара_на_сборку, расход_за_день, смена )
SELECT [ количество_диванов] AS количество_диванов, [Название дивана].Название_дивана, [Наименование товара].Наименование_товара, БД.расход_товара_на_каркас, БД.расход_товара_на_сборку, (([расход_товара_на_каркас]+[расход_товара_на_сборку])*[количество_диванов]) AS расход_за_день, [ Смена] AS Смена
FROM Смена, [Наименование товара] INNER JOIN ([Название дивана] INNER JOIN БД ON [Название дивана].Название_дивана = БД.Название_дивана) ON [Наименование товара].Наименование_товара = БД.Наименование_товара
GROUP BY [ количество_диванов], [Название дивана].Название_дивана, [Наименование товара].Наименование_товара, БД.расход_товара_на_каркас, БД.расход_товара_на_сборку, [ Смена]
HAVING ((([Название дивана].Название_дивана) Like "Адам1"));

В данный запрос мне нужно вставить 3-и параметра что б сделать его универсальным. подскажите куда именно их нужно вставить..
Код в Delphi:

Код:

procedure TForm5.btn1Click(Sender: TObject);
begin
 qry1.Active:=False;
 qry1.SQL.Text:='Нужен запрос';
 qry1.Parameters.ParamByName('param1').Value:=combobbox1.Text;
 qry1.Parameters.ParamByName('param2').Value:=Edit1.Text;
 qry1.Parameters.ParamByName('param3').Value:=combobbox2.Text;
  qry1.ExecSQL;
  qry1.Open;

Вот скрин окна программы...

Вот скрин запроса из БД...

Ну и связи БД...