Уважаемые профессионалы помогите пожалуйста разобраться с проблемой:
Собственно сервер PostgreSQL и в нем функция
CREATE OR REPLACE FUNCTION adqa_ref_cursors3()
RETURNS refcursor AS
$BODY$
DECLARE
ref REFCURSOR;
BEGIN
OPEN ref FOR SELECT * FROM "Customers";
RETURN ref;
END;
$BODY$
сама по себе функция в pgAdmin отрабатывает корректно, но при попытке её использовать в Delphi при помощи компонента adStoredProc Пытаюсь получить результат её выполнения
procedure TForm1.Button1Click(Sender: TObject);
begin
ADStoredProc1.FetchOptions.AutoClose := False;
ADStoredProc1.StoredProcName := 'adqa_ref_cursors3';
ADStoredProc1.Open;
end;
В итоге получаю ошибку с текстом
'[FireDAC][Phys][PG][libpq] ОШИБКА: курсор "unnamed portal 1" не существует'