如何製作一個sql程序？

Question

你能給我一些如何和如果我可以做出一些存儲過程的提示，請嗎？

-- Declarare variabile 
Declare @p1 float,@p2 float,@p3 float, @p4 float, @CostFix float,@CostVar float,@suma float; 
select @p1=sum(Cantitate)from Productie_iulie_2014 where id_r='1'; 
select @p2=sum(Cantitate)from Productie_iulie_2014 where id_r='2'; 
select @p3=sum(Cantitate)from Productie_iulie_2014 where id_r='3'; 
select @p4=sum(Cantitate)from Productie_iulie_2014 where id_r='4'; 
Set @CostFix='50000'; 
Set @CostVar='1'; 
Select @suma= Sum(Cost)from Intrari_Materii; 

--Costul total de productie a fiecarui produs 
Select Produse.Nume,Case 
When Pret.Id_r='1' then (PretNet*@p1) 
When Pret.Id_r='2' Then (PretNet*@p2) 
When Pret.Id_r='3' Then (PretNet*@p3) 
When Pret.Id_r='4' Then (PretNet*@p4) 
End as 'Cost productie' 
from Pret 
left join Produse on Pret.Id_r=Produse.Id_r 

--Costul Total de productie la sfarsitul lunii 
Select sum(Case 
When Pret.Id_r='1' then (PretNet*@p1) 
When Pret.Id_r='2' Then (PretNet*@p2) 
When Pret.Id_r='3' Then (PretNet*@p3) 
When Pret.Id_r='4' Then (PretNet*@p4) 
End)as 'Cost productie general' 
from Pret 
left join Produse on Pret.Id_r=Produse.Id_r 

--Ce cantitate s-a vandut din fiecare produs si la ce pret 
Select Produse.Nume, Pret.PretBrut, SUM(Iesiri_Factura.Cantitate*Ambalare.Total_kilograme) 
as 'Vanzare Total Per Produs(kilograme)' from Iesiri_Factura 
left join Ambalare on Iesiri_Factura.Id_r=Ambalare.Id_r 
left join Produse on Ambalare.Id_r=Produse.Id_r 
left join Pret on Produse.Id_r=Pret.Id_r 
group by Pret.PretBrut,Produse.Nume,Produse.Id_r,Pret.Id_r 

--Incasari totale/luna 
Declare @Sibiana float,@Bitter float,@bomboane float,@Praline float; 
Select @Sibiana=SUM(Iesiri_Factura.Cantitate*Ambalare.Total_kilograme)*Pret.PretBrut 
from Iesiri_Factura 
left join Ambalare on Iesiri_Factura.Id_r=Ambalare.Id_r 
left join Produse on Ambalare.Id_r=Produse.Id_r 
left join Pret on Produse.Id_r=Pret.Id_r 
where Produse.Id_r='1' 
group by Pret.PretBrut; 
Select @Bitter=SUM(Iesiri_Factura.Cantitate*Ambalare.Total_kilograme)*Pret.PretBrut 
from Iesiri_Factura 
left join Ambalare on Iesiri_Factura.Id_r=Ambalare.Id_r 
left join Produse on Ambalare.Id_r=Produse.Id_r 
left join Pret on Produse.Id_r=Pret.Id_r 
where Produse.Id_r='2' 
group by Pret.PretBrut; 
Select @bomboane=SUM(Iesiri_Factura.Cantitate*Ambalare.Total_kilograme)*Pret.PretBrut 
from Iesiri_Factura 
left join Ambalare on Iesiri_Factura.Id_r=Ambalare.Id_r 
left join Produse on Ambalare.Id_r=Produse.Id_r 
left join Pret on Produse.Id_r=Pret.Id_r 
where Produse.Id_r='3' 
group by Pret.PretBrut; 

Select @Praline=SUM(Iesiri_Factura.Cantitate*Ambalare.Total_kilograme)*Pret.PretBrut 
from Iesiri_Factura 
left join Ambalare on Iesiri_Factura.Id_r=Ambalare.Id_r 
left join Produse on Ambalare.Id_r=Produse.Id_r 
left join Pret on Produse.Id_r=Pret.Id_r 
where Produse.Id_r='4' 
group by Pret.PretBrut; 

select distinct @Sibiana as 'Incasari Sibiana',@Bitter as 'Incasari Bitter', 
@bomboane as'Incasari Bomboane Craciun',@Praline as 'Incasari Praline', 
(@Sibiana+@Bitter+@bomboane+@Praline)as'Incasari totale/luna' 
from Produse; 

--Cantitatea totala de ciocolata vanduta 
Select SUM(Iesiri_Factura.Cantitate*Ambalare.Total_kilograme) 
as 'Cantitate vanduta(kg)' from Iesiri_Factura 
left join Ambalare on Iesiri_Factura.Id_r=Ambalare.Id_r 
left join Produse on Ambalare.Id_r=Produse.Id_R 

--Stocul,ce marfa a ramas la sfarsitul lunii dupa productie-vanzare 
Select Produse.Nume, 
case when Produse.Id_r='1' then @p1 
     when Produse.Id_r='2' then @p2 
     when Produse.Id_r='3' then @p3 
     when Produse.Id_r='4' then @p4 
end -(sum(Iesiri_Factura.Cantitate*Ambalare.Total_kilograme)) as Stoc 
from Produse 
left join Ambalare on Produse.Id_r=Ambalare.Id_r 
left join Iesiri_Factura on Ambalare.Id_r=Iesiri_Factura.Id_r 
Group by Produse.Nume,Produse.Id_r 

--Cate Kg s-au produs in total luna respectiva si Cheltuielile survenite la furnizor 
--Cheltuielile generale la sfarsitul lunii(Costul fix+Costul variabil+cheltuieli furnizor) 
Select distinct (@p1+@p2+@p3+@p4)as 'Productie Totala(Kg)', 
@suma as 'Cheltuieli Materii/luna', 
(@p1+@p2+@p3+@p4)*@CostVar +@suma+@CostFix as 'Cheltuieli generale/luna' 
from Produse left join Pret on Produse.Id_r=Pret.Id_r 
left join Retete on Pret.Id_r=Retete.Id_r 
left join Intrari_Materii on Retete.Id_m=Intrari_Materii.Id_m 

--Profitul firmei la sfarsitul lunii 
Declare @x float,@y float; 
Select @x=sum(Case 
When Pret.Id_r='1' then (PretNet*@p1) 
When Pret.Id_r='2' Then (PretNet*@p2) 
When Pret.Id_r='3' Then (PretNet*@p3) 
When Pret.Id_r='4' Then (PretNet*@p4) 
End) 
from Pret 
left join Produse on Pret.Id_r=Produse.Id_r; 

Set @y=(@p1+@p2+@p3+@p4)*@CostVar +@suma+@CostFix; 

select distinct(@x+@y)as 'Cheltuieli totale/luna' 
from Iesiri_Factura 
left join Ambalare on Iesiri_Factura.Id_r=Ambalare.Id_r 
left join Produse on Ambalare.Id_r=Produse.Id_r 
left join Pret on Produse.Id_r=Pret.Id_r 

Select distinct(@Sibiana+@Bitter+@bomboane+@Praline)-(@x+@y) as'Profit/luna' from Iesiri_Factura 

Answer 1

將

create proc myproc 
as 
begin 

在開始和

end 

末。