--
-- acs_mail_multipart__multipart_p/1
--
create or replace function acs_mail_multipart__multipart_p(
  integer
) returns bool as $$

declare
	p_object_id				alias for $1;
    v_check_multipart_id    integer;
begin
	select count(multipart_id) into v_check_multipart_id
      from acs_mail_multiparts
	  where multipart_id = p_object_id;

    if v_check_multipart_id <> 0 then
        return 't';
    else
        return 'f';
    end if;
end;
$$ language plpgsql;