-- return 'yes' if I am allowed to page someone else
CREATE or REPLACE FUNCTION canpage(integer,varchar) RETURNS varchar AS '
   DECLARE
       allow varchar;
       pageable varchar;
       uid ALIAS for $1;
       ext ALIAS for $2;
   BEGIN

       select into allow contact.allow_page
       from   contact where id = uid;

       IF  allow = ''no'' THEN
       --  RAISE NOTICE ''not allowed to page other people'';
           return ''no'';
       END IF;

       return allow;
   END;
' LANGUAGE plpgsql;
