Задание 9
Выдать статистику по категориям обучения и учебным заведениям вашего государства. Отчет должен начинаться с заголовка и цифры - общего количества записей по запросу. Далее совокупность таблиц, где каждая таблица начинается с заголовка: <категория обучения> - <цифра>, не равная нулю, а заканчивается перечнем учебных заведений с цифрами, не равными нулю.
create procedure request29 as
declare @uz char(25)
declare @ko char(15)
declare @it1 int /*итог по полю вуз*/
declare @it2 int /*итог по полю категория обучения*/
declare @itall int
declare @ko1 char(15)
declare @str1 varchar(8000)
declare @str2 varchar(8000)
declare y cursor for
select kat_obuch.kat_obucheniya, vuz_gorod.nazvanie_vuza, count(*)
from cir join vuz_gorod on vuz_k=vuz_gorod.cod_vuza
join kat_obuch on kat_obuch_k=kat_obuch.cod
group by kat_obuch.kat_obucheniya, vuz_gorod.nazvanie_vuza
order by kat_obuch.kat_obucheniya
select @it2=0
select @itall=0
open y
fetch y into @ko, @uz, @it1
if (@@fetch_status=-2) begin
print 'Ошибка при выполнении первого FETCH'
close y
return
end
if (@@fetch_status=-1) begin
print 'Данные не найдены'
close y
return
end
select @ko1=@ko
select @str2=@uz+'-'+str(@it1)
select @it2=@it2+@it1
select @itall=@itall+@it1
/*цикл обработки запроса*/
while (@@fetch_status=0)
begin
fetch y into @ko, @uz, @it1
if (@ko1!=@ko) begin
select @str1='Категория обучения '+@ko1+'-'+str(@it2)+'|'+@str2
select @str2=@str1
select @ko1=@ko
select @it2=0
end
if (@@fetch_status=-1) break
select @str1=@uz+'-'+str(@it1)+'|'+@str2
select @str2=@str1
select @it2=@it2+@it1
select @itall=@itall+@it1
end
close y
if (@@fetch_status=-2) begin
print 'Ошибка при выполнении FETCH'
return
end
select @str1='Всего по запросу-'+str(@itall)+'|'+'----------------------------------'+'|'+'Категория обучения '+@ko1+'-'+str(@it2)+'|'+@str2
declare @n1 bigint
while (PATINDEX('%|%',@str1)!=0)
begin
select @n1=PATINDEX('%|%',@str1)
select @str2=LEFT(@str1,@n1-1)
print @str2
select @str1=STUFF(@str1,1,@n1,'')
end
print @str1
deallocate y
return
Задание 10
Выдать статистику по выпуску 1993 года вашего государства по всем учебным заведениям и специальностям. Отчет должен начинаться с заголовка и цифры - общего количества записей по запросу (выпуску 1993 г.). Далее перечень таблиц, где каждая таблица начинается с заголовка: <название учебного заведения> - <цифра>, не равная нулю, а заканчивается перечнем шифров специальностей с цифрами, не равными нулю.
create procedure request210 as
declare @uz char(25)
declare @sp char(15)
declare @it1 int /*итог по полю специальность*/
declare @it2 int /*итог по полю вуз*/
declare @itall int
declare @uz1 char(25)
declare @str1 varchar(8000)
declare @str2 varchar(8000)
declare y cursor for
select vuz_gorod.nazvanie_vuza, spec, count(*)
from cir join vuz_gorod on vuz_k=vuz_gorod.cod_vuza
where gok='93'
group by vuz_gorod.nazvanie_vuza, spec
order by vuz_gorod.nazvanie_vuza
select @it2=0
select @itall=0
print 'Статистика по выпуску 1993 года'
open y
fetch y into @uz, @sp, @it1
if (@@fetch_status=-2) begin
print 'Ошибка при выполнении первого FETCH'
close y
return
end
if (@@fetch_status=-1) begin
print 'Данные не найдены'
close y
return
end
select @uz1=@uz
select @str2=@sp+'-'+str(@it1)
select @it2=@it2+@it1
select @itall=@itall+@it1
/*цикл обработки запроса*/
while (@@fetch_status=0)
begin
fetch y into @uz, @sp, @it1
if (@uz1!=@uz) begin
select @str1='Учебное заведение '+@uz1+'-'+str(@it2)+'|'+@str2
select @str2=@str1
select @uz1=@uz
select @it2=0
end
if (@@fetch_status=-1) break
select @str1=@sp+'-'+str(@it1)+'|'+@str2
select @str2=@str1
select @it2=@it2+@it1
select @itall=@itall+@it1
end
close y
if (@@fetch_status=-2) begin
print 'Ошибка при выполнении FETCH'
return
end
select @str1='Всего по запросу-'+str(@itall)+'|'+'----------------------------------'+'|'+'Учебное заведение '+@uz1+'-'+str(@it2)+'|'+@str2
declare @n1 bigint
while (PATINDEX('%|%',@str1)!=0)
begin
select @n1=PATINDEX('%|%',@str1)
select @str2=LEFT(@str1,@n1-1)
print @str2
select @str1=STUFF(@str1,1,@n1,'')
end
print @str1
deallocate y
return