Interbase StoredProc anlegen. Fehlermeldung

[Sven Janssen]

Hallo,

ich wollte folgende StoredProc in der IBConsole anlegen:

SQL-Code:

SET TERM ^;
create procedure nextFreeLiefNumber ( lBound char(7), uBound char(7))
    returns (A_RETURN INTEGER) AS
begin
    SELECT o.L1_NR as freienummer FROM FLIEF_1 o where o.L1_nr between lBound and uBound
        AND NOT EXISTS (SELECT i.L1_NR FROM FLIEF_1 i
            WHERE cast(i.L1_NR as double precision) = cast(o.L1_NR as double precision) + cast(1 as double precision));
    A_RETURN = cast(freienummer as double precision)+1;
end
SET TERM ;^

Allerdings ergibt das den Fehler

Zitat:

Dynamic SQL Error
SQL error code = -104
Token unknown - line 6, char 117
;

Entferne ich das ; erhalte ich den Fehler

Zitat:

Dynamic SQL Error
SQL error code = -104
Token unknown - line 7, char 3
A_RETURN

Die select Anweisung alleine funktioniert tadellos.
Irgendwas übersehe ich ... wäre nett, wenn mir jemand auf die Sprünge helfen kann.