Try this:

> WITH Query1 DO BEGIN
> Close;
> SQL.Text:=SaveSQL;

Prepare;

> Params.AssignValues(SaveParams); SaveParams.Free;
> Open;
> END;

Jason Wharton
CPS - Mesa AZ
http://www.ibobjects.com