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
BEGIN:VCARD
VERSION:2.1
N:Howard;Mark
FN:Mark Howard
ORG:Forest Production Systems Ltd
TEL;WORK;VOICE:(07) 348 8177
TEL;CELL;VOICE:(021) 477564
TEL;WORK;FAX:(07) 348 8178
ADR;WORK:;;P.O.Box 5155;Rotorua
LABEL;WORK;ENCODING=QUOTED-PRINTABLE:P.O.Box 5155=0D=0ARotorua
EMAIL;PREF;INTERNET:[EMAIL PROTECTED]
REV:20010529T220336Z
END:VCARD

Reply via email to