Всем привет. Помогите разобраться в запросе... Запрос ниже...
Код:
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;
Вот скрин окна программы...
Вот скрин запроса из БД...
Ну и связи БД...
