Exception 'first chance' at $753D812F. Exception class Exception with a message 'Incorrect parameter count. Expected: 9; Actual: 8'. Process Gestion_MultiCN.exe (5140)
As you can see, there is 8 Unique parameters in my query but ":Ordre_Fabrication" is declared twice.
Code: Select all
var
FUniQuery: TuniQuery;
begin
FUniQuery := TuniQuery.Create(nil);
FUniQuery.Connection := FConnection;
try
FUniQuery.SpecificOptions.Values['PostgreSQL.UseParamTypes'] := 'True';
FUniQuery.SQL.Text := OrdreFabrication_Update;
FUniQuery.ParamByName('Ordre_Fabrication').AsString :=
Value.Ordre_Fabrication;
FUniQuery.ParamByName('Date_Production').AsDateTime := now;
FUniQuery.ParamByName('Ligne').AsString := FLigne.Id_ligne;
FUniQuery.ParamByName('Compteur_Produit').AsInteger :=
Value.Compteur_Produit;
FUniQuery.ParamByName('Id_Poste').AsInteger := FPoste.Id_Poste;
FUniQuery.ParamByName('Date_Poste').AsDate := FPoste.Date_Poste;
FUniQuery.ParamByName('Id_Pilote_1').AsString := FPoste.Id_Pilote_1;
FUniQuery.ParamByName('Id_Pilote_2').AsString := FPoste.Id_Pilote_2;
FUniQuery.Prepare;
FUniQuery.Execute;
finally
FUniQuery.Free;
end;
Code: Select all
Update Productions_Ordres_Fabrications set Ordre_Fabrication= :Ordre_Fabrication, Ligne=:ligne, Date_Poste=:Date_Poste, Compteur_Produit=:Compteur_Produit, Date_Production=:Date_Production,Id_Poste=:Id_Poste,Id_Pilote_1=:Id_Pilote_1,Id_Pilote_2=:Id_Pilote_2 WHERE Ligne = :Ligne AND Ordre_Fabrication =:Ordre_Fabrication;