--
-- acs_mail_body__set_content_object/2
--
create or replace function acs_mail_body__set_content_object(
  integer,
  integer
) returns int4 as $$

declare
	p_body_id				alias for $1;
	p_content_item_id		alias for $2;
begin
    update acs_mail_bodies
        set content_item_id = p_content_item_id
        where body_id = p_body_id;

    return 1;
end;
$$ language plpgsql;