&& Хранимая процедура в базе данных IB сервера

CREATE PROCEDURE NEW_PROBA (
X1 INTEGER,
Y1 INTEGER,
Z1 INTEGER)
RETURNS (
XYZ INTEGER)
AS
begin
if (X1 > Y1) then
Z1 = X1 - Y1;
else
Z1 = Y1 + X1;
XYZ=Z1;
end

/////////////////////////////////////////

&& Программа в VFP

LOCAL X1, Y1, Z1

X1=350
Y1=250
Z1=0

=SQLPREPARE(gnConnHandle, 'EXECUTE PROCEDURE NEW_PROBA (?X1,?Y1,?@Z1)')
=SQLEXEC(gnConnHandle, 'EXECUTE PROCEDURE NEW_PROBA (?X1,?Y1,?@Z1)')

Результат выполнения SQLPREPARE и SQLEXEC возвращает 1, т.е. успешно, но
Z1 (или XYZ) равно 0, хотя в данном конкретном случае долно равнятся 100

Помогите разобраться.