Параметр не имеет значения по умолчанию

[II_Dimit_II]

Что в запросе не так, помогите пожалуйста

procedure TForm1.sButton4Click(Sender: TObject); //приход товара
var
kol1, kol2, i, j:integer;
begin
ADOQuery2.Close;
ADOQuery2.SQL.Clear;
ADOQuery2.SQL.Add('insert into Склад (Вид_изделия, Наименование_изделия, Количество) select Вид_изделия, Наименование, Количество from Приход');
ADOQuery2.Open;
end;

[Sciv]

ADOQuery2.Open;

замени на

ADOQuery2.ExecSQL;