--
-- bt_version__set_active/1
--
create or replace function bt_version__set_active(
  integer
) returns int4 as $$

declare
    new__active_version_id alias for $1;
    v_project_id integer;
begin
    select project_id
    into   v_project_id
    from   bt_versions 
    where  version_id = new__active_version_id;

    if found then
        update bt_versions set active_version_p='f' where project_id = v_project_id;
    end if;
    update bt_versions set active_version_p='t' where version_id = new__active_version_id;
    return 0;
end;
$$ language plpgsql;