Задание 3

Выдать статистику по городам и категориям обучения вашего го­сударства. Отчет должен начинаться с заголовка и цифры - общего коли­чества записей по запросу. Далее совокупность таблиц, где каждая таб­лица начинается с заголовка: ГОРОД <название> - ВСЕГО <цифра>, где <цифра> ^= 0, а заканчивается перечнем категорий обучения с цифрами, не равными нулю.

create procedure request23 as

declare @gr char(15)

declare @ko char(15)

declare @it1 int /*итог по полю категория обучения*/

declare @it2 int /*итог по полю город*/

declare @itall int

declare @gr1 char(15)

declare @str1 varchar(8000)

declare @str2 varchar(8000)

declare y cursor for

select vuz_gorod.nazvanie_goroda, kat_obuch.kat_obucheniya, 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 vuz_gorod.nazvanie_goroda, kat_obuch.kat_obucheniya

order by vuz_gorod.nazvanie_goroda

select @it2=0

select @itall=0

open y

fetch y into @gr, @ko, @it1

if (@@fetch_status=-2) begin

print 'Ошибка при выполнении первого FETCH'

close y

return

end

if (@@fetch_status=-1) begin

print 'Данные не найдены'

close y

return

end

select @gr1=@gr

select @str2=@ko+'-'+str(@it1)

select @it2=@it2+@it1

select @itall=@itall+@it1

/*цикл обработки запроса*/

while (@@fetch_status=0)

begin

fetch y into @gr, @ko, @it1

if (@gr1!=@gr) begin

select @str1='Город '+@gr1+'-'+str(@it2)+'|'+@str2

select @str2=@str1

select @gr1=@gr

select @it2=0

end

if (@@fetch_status=-1) break

select @str1=@ko+'-'+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)+'|'+'----------------------------------'+'|'+'Город '+@gr1+'-'+str(@it2)+'|'+@str2

declare @n1 bigint

while (PATINDEX('%|%',@str1)!=0)

begin

select @n1=PATINDEX('%|%',@str1)

if (@n1>1)

begin

select @str2=LEFT(@str1,@n1-1)

print @str2

select @str1=STUFF(@str1,1,@n1,'')

end

end

print @str1

deallocate y

return

Задание 4

Выдать статистику по всем учебным заведениям и категориям обу­чения вашего государства. Отчет должен начинаться с заголовка и циф­ры - общего количества записей по запросу. Далее совокупность таблиц, где каждая таблица начинается с заголовка: <название учебного заведе­ния> - <цифра>, не равная нулю, а заканчивается перечнем категорий обучения с цифрами, не равными нулю.

create procedure request24 as

declare @uz char(25)

declare @ko 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, kat_obuch.kat_obucheniya, 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 vuz_gorod.nazvanie_vuza, kat_obuch.kat_obucheniya

order by vuz_gorod.nazvanie_vuza

select @it2=0

select @itall=0

open y

fetch y into @uz, @ko, @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=@ko+'-'+str(@it1)

select @it2=@it2+@it1

select @itall=@itall+@it1

/*цикл обработки запроса*/

while (@@fetch_status=0)

begin

fetch y into @uz, @ko, @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=@ko+'-'+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)

if (@n1>1)

begin

select @str2=LEFT(@str1,@n1-1)

print @str2

select @str1=STUFF(@str1,1,@n1,'')

end

end

print @str1

deallocate y

return