На 944. В релизноты\RDB$EXCEPTIONS посмотреть никак низзя ?
execute block
as
declare variable LComText varchar(2001);
declare variable i integer;
begin
i=0;
LComText='';
while (:i<=2000) do
begin
LComText=:LComText||'1';
i=:i+1;
end
exception bgl_error :LComText;
end
отрабатівает без ошибок
Возвращает 1022 символа
FB 2.1
?

