--
-- acs_object_util__object_type_p/2
--
create or replace function acs_object_util__object_type_p(
  integer,
  character varying
) returns bool as $$

declare
    p_object_id         alias for $1;
    p_object_type       alias for $2;
    v_exist_p           boolean := 'f';
begin
    v_exist_p := acs_object_util__object_ancestor_type_p(p_object_id, p_object_type);
    return v_exist_p;
end;$$ language plpgsql;