Помогите пожалуйста создать процедуру IB SQL из приложения

← →
J (2001-12-03 11:51) [2]

С помощью Query1.ExecSQL запускаю в приложении процедуру
CREATE PROCEDURE RECT1 (
CODENO INTEGER
) RETURNS (
L INTEGER,
T INTEGER,
R INTEGER,
B INTEGER
) AS
BEGIN
SELECT COND_X1, COND_Y1, COND_X2, COND_Y2
FROM NAME_OB1
WHERE (CODE_N_O= :CODENO)
INTO :L, :T, :R, :B ;
SUSPEND;
END

И выдает SQL ошибку при запуске создания процедуры c указанием на ;
Причем запросы и создание таблиц проходят

Помогите пожалуйста создать процедуру IB SQL из приложения Найти похожие ветки