Hola

|E S C U E L A I N D U S T R I A L S U P E R I O R | |
|“P E D R O D O M I N G O M U R I L LO” | |
|I N F O R M Á T I C A I N D U S T R I A L| |
|NOMBRE: Quispe Huanca Gregorio ||
|MATERIA: INF 257 | |
|DOCENTE:Lic. Julia Centeno | |

PRACTICA DE CURSORES

1: Crear un cursor para listarlos programas que curso el alumno 'sofia perez colque'

declare ej1 cursor
for
select p.cod_pro,p.dec_pro,p.den_pro,p.cos_pro
from programa p
inner join clases_teoricas c on(p.cod_pro=c.cod_pro)inner join alumno a on(c.cod_alu=a.mat_alu)
where a.nom_alu='Adrian' and a.pat_alu='perez' and a.mal_alu='LLanos'
open ej1
fetch ej1
begin
print 'fin del proceso'
end
close ej1
deallocateej1

2: Crear un procedimiento almacenado conteniendo un cursor para generar el reporte de todos los estudiantes
--de un programa este procedimiento debe verificar si el reporte ya fue generadopara no volver a generarlo

create procedure ej2
@co varchar(5)
as
declare @i int
set @i=0
declare cs cursor
for
selecta.mat_alu,a.cid_alu,a.nom_alu,a.pat_alu,a.mal_alu,a.fen_alu,a.sex_alu,a.dir_alu
from alumno a
inner join couta_alumno c on(a.mat_alu=c.mat_alu)
inner join programa p on(c.cod_pro=p.cod_pro)
where p.cod_pro=@co
open cs
fetch cs
if(@i=1)
begin
print 'se encuentra...