Пытаюсь создать процедуру Interbase. Присваиваю Query.SQL.Text следующий текст:

CREATE PROCEDURE AUDIT_REN_LASTPAYERCHECKINFO (
PCODE VARCHAR(11),
ADATE DATE)
RETURNS (
CHECKDATE DATE,
CHECKVAL INTEGER)
AS
begin
if (adate is null) then adate = 'now';

select distinct max (checkdate) from checks
where checkdate < :aDATE and payercode =:PCODE
into :CHECKDATE;

select max(checkval) from checks
where payercode = :pcode and checkdate = :checkdate
into :checkval;

suspend;
end

Затем Query.ExecSQL. Ругается на каждое двоеточие.
Скажу сразу, что текст запроса заведомо рабочий, в IBExpert и Interbase WINSQL он выполняется без всяких проблем.

Как всетаки заставить компонент TQuery выполнить данный запрос? Или это невозможно?

Спасибо.

Спасибо. Кажись, помогло...