]> git.stg.codes - stg.git/blob - projects/stargazer/inst/var/00-alter-01.sql
Reduced public interface.
[stg.git] / projects / stargazer / inst / var / 00-alter-01.sql
1 /*
2  *  DB migration from v00 to v01 (firebird)
3  */
4
5 alter table tb_users add disabled_detail_stat dm_bool;
6
7 drop procedure sp_add_user;
8
9 set term !! ;
10 create procedure sp_add_user(name varchar(32), dirs integer)                             
11 as  
12 declare variable pk_user integer;
13 declare variable pk_stat integer;                                                        
14 begin                                                                                    
15     pk_user = gen_id(gn_pk_user, 1);                                                     
16     insert into tb_users(pk_user, fk_tariff, fk_tariff_change, fk_corporation, address, always_online, credit, credit_expire, disabled, disabled_detail_stat, email, grp, note, passive, passwd, phone, name, real_name) values (:pk_user, NULL, NULL, NULL, '', 0, 0, 'now', 0, 0, '', '_', '', 0, '', '', :name, '');
17     pk_stat = gen_id(gn_pk_stat, 1);                                                     
18     insert into tb_stats values (:pk_stat, :pk_user, 0, 0, 'now', 0, 'now', 0, 'now');   
19     while (dirs > 0) do
20     begin
21         insert into tb_stats_traffic (fk_stat, dir_num, upload, download) values (:pk_stat, :dirs - 1, 0, 0);
22         dirs = dirs - 1;
23     end
24 end!!
25 set term ; !!