Parsing database object definitions...
==== Error ==== : EduPlan: Missing: <)> (<(>)
                  Script:  Line:548 Pos:49
Linking dependencies...

for select
    ...
from EduPlan.ProcedureName(...)

Parsing database object definitions...
==== Error ==== : EduProtocol: Missing: INTO (AS)
Script:  Line:317 Pos:8

for select
    ...
from ...
as cursor cur
do ...

SET TERM ^ ;

CREATE OR ALTER PACKAGE TEST2
AS
begin

function TEST_CURSOR2 (
    A integer,
    B integer)
returns integer;


end^

RECREATE PACKAGE BODY TEST2
AS
begin

function TEST_CURSOR2 (
    A integer,
    B integer)
returns integer
AS
declare variable r int;
begin
    r = 0;
    for with
        res_a as (
            select
                t.a
            from test_table t
            where t.id between :a and :b
        )
    select
        a.a
    from res_a a
    as cursor c
    do begin
        r = r + c.a;
    end
    return r;
end

end
^

SET TERM ; ^

Parsing database object definitions...
==== Error ==== : TEST2: Missing: INTO (AS)
                  Script:  Line:21 Pos:8

CREATE TABLE TEST_TM (
    ID    INTEGER GENERATED BY DEFAULT AS IDENTITY,
    ATTR  INTEGER,
    OBJ   INTEGER,
    V     INTEGER
);

create procedure test_merge (
    attr_id int,
    obj_id int,
    v int
)
returns (
    id int)
as
begin
    merge into test_tm t
    using (
        select
            :attr_id as a,
            :obj_id as o,
            nullif(:v, 0) as v
        from rdb$database
    ) s
    on t.attr = s.a and t.obj = s.o
    when not matched and s.v is not null then
        insert (attr, obj, v)
        values (s.a, s.o, s.v)
    when matched and s.v is null then
        delete
    when matched and s.v <> t.v then
        update set t.v = s.v
    returning new.id into :id;
end

Parsing database object definitions...
==== Error ==== : Procedure TEST_MERGE: Missing: <;> (RETURNING)
                  Script:  Line:18 Pos:15