Задание 5
Выдать статистику по учебным заведениям и категориям обучения вашего государства, включая цифры по выпуску 1993 года и по приему 1990 года по каждой категории обучения. Отчет должен начинаться с заголовка и цифры - общего количества записей по запросу. Далее совокупность таблиц, где каждая таблица начинается с заголовка : <название учебного заведения> - <цифра>, не равная нулю, а заканчивается перечнем категорий обучения с тремя цифрами: 1) всего (не равная нулю); 2) выпуск 1993 г.; 3) прием 1990 г.
create procedure zapr8_5 as
declare @v1 char(20)
declare @v2 char(20)
declare @ko char(25)
declare @it1 integer
declare @it2 integer
declare @it93 integer
declare @it90 integer
declare @itall integer
declare y cursor for
select vuz_gorod.nazvanie_vuza,kat_obuch.kat_obucheniya, count(*),
SUM (case when gp='90'then 1 else 0 end),
SUM (case when gok='93'then 1 else 0 end)
from azer join vuz_gorod on vuz_k=vuz_gorod.cod_vuza
join kat_obuch on kat_obuch_k=kat_obuch.cod
group by vuz_gorod.nazvanie_vuza,kat_obuch.kat_obucheniya
order by vuz_gorod.nazvanie_vuza,kat_obuch.kat_obucheniya
select @it2=0
select @itall=0
select @it93=0
select @it90=0
open y
fetch y into @v1,@ko,@it1,@it90,@it93
if (@@fetch_status=-2)
begin
print 'Ошибка при выполнении первого FETCH'
close y
return
end
if (@@fetch_status=-1)
begin
print 'Данные не найдены'
close y
return
end
select @v2=@v1
print @ko+'-'+str(@it1)+' '+str(@it90)+' '+str(@it93)
select @it2=@it2+@it1
select @itall=@itall+@it1
while (@@fetch_status=0)
begin
fetch y into @v1, @ko, @it1, @it90, @it93
if (@v1!=@v2)
begin
print 'Учебное заведение '+@v2+'-'+ str (@it2)
print '______________________________________'
select @v2=@v1
select @it2=0
end
if (@@fetch_status=-1) break
print @ko + ' - ' +str(@it1)+' '+str(@it90)+' '+str(@it93)
select @it2=@it2+@it1
select @itall=@itall+@it1
end
close y
if (@@fetch_status=-2)
begin
print 'Ошибка при выполнении FETCH'
return
end
print 'учебное заведение ' + @v1 + ' - ' +str(@it2)
print '_____________________________'
print 'всего по запросу-'+str(@itall)
deallocate y
return
Задание 6
Выдать статистику по учебным заведениям и годам окончания вашего государства. Отчет должен начинаться с заголовка и цифры - общего количества записей по запросу. Далее совокупность таблиц, где каждая таблица начинается с заголовка: <название учебного заведения> <цифра>, не равная нулю, а заканчивается перечнем годов окончания с цифрами, не равными нулю.
create procedure zapr8_6 as
declare @yz char (25)/*переменная для названия учебного заведения*/
declare @gok char (2)/*переменная для года окончания*/
declare @it1 int/*переменная для итога по полю год окончания*/
declare @it2 int/*переменная для итога по полю название учеьного заведения*/
declare @itall int/*переменная для итога по всему запросу*/
declare @yz1 char (25)/*переменная для названия учебного заведения*/
declare y cursor for
select vuz_gorod.nazvanie_vuza,gok,count(*)
from azer join vuz_gorod on vuz_k=vuz_gorod.cod_vuza
where vuz_gorod.nazvanie_stran like 'АЗЕРБАЙДЖАН%'
group by vuz_gorod.nazvanie_vuza,gok
select @it2=0
select @itall=0
open y
fetch y into @yz,@gok,@it1
if(@@fetch_status=-2) begin
print 'Ошибка при выполнении первого FETCH'
close y
return
end
if(@@fetch_status=-1) begin
print 'Данные не найдены'
close y
return
end
select @yz1=@yz
print @gok+' - '+str(@it1)
select @it2=@it2+@it1
select @itall=@itall+@it1
while (@@fetch_status=0)
begin
fetch y into @yz,@gok,@it1
if (@yz1!=@yz) begin
print 'учебное заведение '+@yz1+' - '+str(@it2)
select @yz1=@yz
select @it2=0
end
if(@@fetch_status=-1) break
print @gok+' - '+str(@it1)
select @it2=@it2+@it1
select @itall=@itall+@it1
end
close y
if(@@fetch_status=-2) begin
print 'Ошибка при выполнении FETCH'
return
end
print 'учебное заведение '+@yz+' - '+str(@it2)
print '-----------------------------------------'
print 'всего по запросу- '+str(@itall)
deallocate y
return
