--
-- get_func_header/2
--
create or replace function get_func_header(
  character varying,
  oidvector
) returns text as $$

declare
        fname   alias for $1;
        args    alias for $2;
        v_src   text;
        pos     integer;
begin
        v_src := get_func_definition(fname,args);
        pos := position('begin' in lower(v_src));

        return substr(v_src, 1, pos + 4);

end;$$ language plpgsql;