--DROP TABLE object_field_t;
--drop procedure t_set ();

CREATE TABLE object_field_t (
  id_object integer,
  name char( 35 )
);

insert into object_field_t values ( 145 , 'id_type_departament');

 
create procedure t_set () returning varchar( 40 );
 
--  DEFINE l_set_rights set (CHAR (36) not NULL);--так работать будет
  DEFINE l_set_rights set (CHAR ( 35 ) not NULL);  
  Define res varchar( 40 );

  INSERT INTO TABLE(l_set_rights) SELECT TRIM(lower(name)) FROM object_field WHERE id_object =  145 ;

  IF ('id_type_departament' IN l_set_rights) THEN
    LET res = 'Есть';
  else
    LET res = 'Нет';
  END IF;
  return res;

end procedure; 

execute procedure t_set ();