Mark
Have you tried -
ParamByName('SaveDate').AsDate := CurrentDate;
as opposed to
ParamByName('SaveDate').AsString := DateToStr(CurrentDate);
 
What is your Short Date Format - dd/mm/yy or mm/dd/yy?
DateToStr may not be giving you a valid date for SQL
Why you would get "could not find object", I don't know. 
 
HTH
Mike
 
----- Original Message -----
Sent: Wednesday, May 30, 2001 10:03 AM
Subject: [DUG]: SQL and Parameters

Hi
 
Using Paradox.
 
When I run the following SQL code (DocNos.Sql) using the LoadFromFile method, things work fine;
 
Delete from DocketNos
Where DocketNo in (
Select DocketNo from Dockets
Where ForCode not in (
Select distinct forcode from dockets
where docketdate > '03/31/2001'))
 
But when I try to parameterise it as follows, and with the final line of the Sql file changed to :
 
where docketdate > :SaveDate))
 
then I get an error message "Could not find object"
 
  procedure RunPQuery(SQLFile: string);
  begin
    with RSQuery do
    begin
      Close;
      Unprepare;
      SQL.LoadFromFile('DocNos.SQL');
      ParamByName('SaveDate').AsString := DateToStr(CurrentDate);
      Prepare;
      Open;
      MainForm.Memo.Lines.Add('Done');
    end;
  end;
Can any one see where I have gone wrong?
 
TIA  Mark

Reply via email to