drop table tresultat purge;
create table tresultat(ligne varchar2(200));

declare
dnumCreneau varchar2(10);
dhdebut number;
dbenef number;
dnbjoueur number;

dmessage varchar2(200);
inexistant exception;
probleme exception;
dcpt number;
dnb number:=0;
cursor CUR is select CR.numcreneau, CR.hdebut, sum(F.tarifhoraire*R.nbjoueur)+sum(E.tarif*C.nombre), sum(nbjoueur)
		from creneau CR, facturer F, contenir C, reservation R, equipement E
		WHERE E.idequipement = C.idequipement
		AND R.idReserv = C.idReserv
		AND CR.numcreneau  = R.numcreneau
		order by 2;

begin
open CUR;
fetch cur into  dnumCreneau, dhdenut, dbenef, dnbjoueur ;
while cur%FOUND
loop
	insert into tresultat values('NumCreneau:'||dnumCreneau||'   hdebut :'||'Heure debut:'||dhdebut ||' Benefice:'||dbenef||'  Nb joueurs'||dnbjoueur);
	fetch cur into  dnumCreneau, dhdenut, dbenef, dnbjoueur ;
end loop;
close CUR;
end;
.
/
select * from tresultat;



