fbt_run -b <path_to_fb_NN_binaries> bugs.core_mmmm -o localhost/port_FB_NN

dir .\tests\bugs\bugs.core_mmmm.fbt

cd fbt-repo
svn co svn://svn.code.sf.net/p/firebird/code/qa/fbt-repository/trunk  . 

set term ^;
create or alter procedure sp_test as
  declare c cursor for (select 1 from rdb$database);
  declare n int;
begin
  open c;
  fetch c into n;
  close c;
end
^
set term ;^
commit;

SQL> show procedure sp_test^
Procedure text:
======================================================
  declare c cursor for (select 1 from rdb$database);
  declare n int;
begin
  open c;
  fetch c into n;
  close c;
end
======================================================
SQL> set term ^;
SQL> alter procedure sp_test as
 -- Скопипастил сюда вышеприведенное: 
CON>   declare c cursor for (select 1 from rdb$database);
CON>   declare n int;
CON> begin
CON>   open c;
CON>   fetch c into n;
CON>   close c;
CON> end^
Statement failed, SQLSTATE = 42000
unsuccessful metadata update
-ALTER PROCEDURE SP_TEST failed
-Dynamic SQL Error
-SQL error code = -104
-Invalid command
-no column name specified for column number 1 in derived table C