QAsbcnUq

1-- 1.
2drop procedure if exists Modf_tip_Coloana;
3delimiter //
4create procedure Modf_tip_Coloana(nume_tabela varchar(50), nume_col varchar(50), tip varchar(50))
5begin
6	set @var = concat("alter table ", nume_tabela, " modify column ", nume_col, " ", tip, ";");
7	prepare instr from @var;
8	execute instr;
9end
10//
11delimiter ;
12
13-- 2.
14drop procedure if exists adg_ConstrangereImplicita;
15delimiter //
16create procedure adg_ConstrangereImplicita (nume_tabela varchar(50), nume_col varchar(50), tip varchar(50), val varchar(50))
17begin
18	set @var = concat("alter table ",nume_tabela, " modify ", nume_col," ", tip, " default ",val);
19	prepare instr from @var;
20	execute instr;
21end
22//
23delimiter ;
24
25-- 2.iners
26drop procedure if exists Inv_adg_ConstrangereImplicita;
27delimiter //
28create procedure Inv_adg_ConstrangereImplicita(nume_tabela varchar(50), nume_col varchar(50), tip varchar(50))
29begin
30	set @var = concat("alter table ", nume_tabela, " modify ", nume_col," ", tip, " null", ";");
31	prepare instr from @var;
32	execute instr;	
33end
34//
35delimiter ;
36
37-- 3.
38drop procedure if exists creeare_tabela;
39delimiter //
40create procedure creeare_tabela (nume_tabela varchar(50))
41begin
42    set @nume=concat('id',nume_tabela);
43    set @var = concat("create table if not exists ",nume_tabela,'(',@nume,' int not null, primary key(',@nume,'))',";");
44	prepare instr from @var;
45	execute instr;
46end //
47
48-- 3.invers
49drop procedure if exists stergere_tabela;
50delimiter //
51create procedure stergere_tabela(nume_tabela varchar(50))
52begin
53	set @var = concat("drop table if exists ",nume_tabela,';');
54	prepare instr from @var;
55	execute instr;
56end
57//
58delimiter ;
59
60-- 4.
61drop procedure if exists adaugare_camp;
62delimiter //
63create procedure adaugare_camp(nume_tabela varchar(50), nume_coloana varchar(50), tip varchar(50))
64begin
65	set @var = concat("alter table ",nume_tabela, " add ", nume_coloana," ", tip, ";");
66	prepare instr from @var;
67	execute instr;	
68end
69//
70delimiter ;
71
72-- 4.invers
73drop procedure if exists stergere_camp;
74delimiter //
75create procedure stergere_camp(nume_tabela varchar(50), nume_coloana varchar(50))
76begin
77	set @var = concat("alter table ", nume_tabela, " DROP ", nume_coloana, ";");
78	prepare instr from @var;
79	execute instr;	
80end
81//
82delimiter ;
83-- 5.
84drop procedure if exists creeaza_cheieStr;
85delimiter //
86create procedure creeaza_cheieStr(nume1_tabela varchar(50), nume2_tabela varchar(50), cheie varchar(50), col1 varchar(50), col2 varchar(50))
87begin
88	set @var = concat("alter table ", nume1_tabela, " add constraint ", cheie, " foreign key(",col1,") references ", nume1_tabela, "(",col2,")", ";");
89	prepare instr from @var;
90	execute instr;	
91end
92//
93delimiter ;
94
95-- 5.invers
96drop procedure if exists stergere_cheieStr;
97delimiter //
98create procedure stergere_cheieStr(nume_tabela varchar(50), cheie varchar(50))
99begin
100	set @var = concat("alter table ", nume_tabela, " drop foreign key ", cheie, ";");
101	prepare instr from @var;
102	execute instr;	
103end
104//
105delimiter ;
106