execute block и tibquery

[Владимир Каратаев]

Добрый день!
Видимо после рабочих выходных с утра мозг не варит, прошу подсказать как 
можно справиться вот с этим:
в tibquery вставил запрос с execute block. установил paramcheck:=false; 
params пустые (поудалял все оттуда).  при попытке открыть запрос выдает 
"Unknown SQL Data type(0)".
вот сам блок:
execute block
  returns (packs varchar(1000))
as
declare variable vnumber varchar(36);
begin
 packs='';
 for select name
         from table1 where docid=10038
 into :vnumber
 do packs=packs || :vnumber || ', ';
 if (packs<>'') then select substring(:packs from 1 for 
(char_length(trim(:packs))-1)) from rdb$database into :packs;
suspend;
end

я предполагаю, что ругается на тип выходной строки. что можно сделать, чтоб 
работало?

--
Каратаев Владимир.