-- Name: in_iucn_red_list(text, text, anyelement); Type: FUNCTION; Schema: public; Owner: -

--

CREATE FUNCTION in_iucn_red_list(accepted_family text, accepted_species_binomial text, schema_anchor anyelement DEFAULT NULL::schema_anchor) RETURNS boolean

    LANGUAGE plpgsql STABLE

    SET search_path TO pg_temp

    AS $$

/* must use LANGUAGE plpgsql because LANGUAGE sql does not support runtime

changes of search_path (schema elements are bound at inline time rather than

runtime) */

/* function option search_path is needed to limit the effects of

`SET LOCAL search_path` to the current function */

DECLARE

	accepted_family_ text = accepted_family;

	accepted_species_binomial_ text = accepted_species_binomial;

BEGIN

	PERFORM util.use_schema(schema_anchor);

	RETURN EXISTS(

		SELECT NULL FROM iucn_red_list t

		WHERE

			t.accepted_family = accepted_family_

		AND	t.accepted_species_binomial = accepted_species_binomial_

	);

END;

$$;

--