set term ^;
create or alter  procedure p0  returns(x int) as begin x=0; suspend; end^
create or alter procedure p1 returns(x int) as begin for select x from p0 into x do suspend; end^
create or alter procedure p2 returns(x int) as begin for select x from p1 into x do suspend; end^
set term ;^
commit;

set term ^;
recreate  function p0  returns int as begin return 0; end^
create or alter procedure p1 returns(x int) as begin x=p0(); suspend; end^
create or alter procedure p2 returns(x int) as begin for select x from p1 into x do suspend; end^
set term ;^
commit;

Statement failed, SQLSTATE = 38000
unsuccessful metadata update
-cannot delete
- UDF P0 
-there are 1 dependencies
After line 1 in file test2.sql