Московский Энергетический Институт

Технический Университет

Лабораторная работа по курсу БД.

№ 8

Создание и использование сложных хранимых процедур. Использование хранимых процедур для выполнения двумерных и трехмерных статистических запросов.

Выполнили студенты группы

А-13-08

Логинов Андрей

Сержанов Никита

Проверила

Сидорова Н.П.

2011 Задание 1

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

create procedure request21 as

declare @gr char(15)

declare @sp char(10)

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, spec, count(*)

from cir join vuz_gorod on vuz_k=vuz_gorod.cod_vuza

group by vuz_gorod.nazvanie_goroda, spec

order by vuz_gorod.nazvanie_goroda

select @it2=0

select @itall=0

open y

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

select @it2=@it2+@it1

select @itall=@itall+@it1

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

while (@@fetch_status=0)

begin

fetch y into @gr, @sp, @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=@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)+'|'+'----------------------------------'+'|'+'Город '+@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

С параметром:

create procedure request21param

@spec char(10),

@it2 int out

as

select @it2=COUNT(*) from cir where spec=@spec

return

declare @kol int

exec request21param '000655', @kol out

select @kol

Задание 2

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

create procedure request2 as

declare @gr char(15)

declare @uz char(25)

declare @it1 int /*итог по полю вуз*/

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

declare @itall int

declare @gr1 char(15)

declare y cursor for

select vuz_gorod.nazvanie_goroda, vuz_gorod.nazvanie_vuza, count(*)

from cir join vuz_gorod on vuz_k=vuz_gorod.cod_vuza

group by vuz_gorod.nazvanie_goroda, vuz_gorod.nazvanie_vuza

order by vuz_gorod.nazvanie_goroda

select @it2=0

select @itall=0

open y

fetch y into @gr, @uz, @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

print @uz+'-'+str(@it1)

select @it2=@it2+@it1

select @itall=@itall+it1

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

while (@@fetch_status=0)

begin

fetch y into @gr, @uz, @it1

if (@gr1!=@gr) begin

print 'Город '+@gr1+'-'+str(@it2)

select @gr1=@gr

select @it2=0

end

if (@@fetch_status=-1) break

print @uz+'-'+str(@it1)

select @it2=@it2+@it1

select @itall=@itall+it1

end

close y

if (@@fetch_status=-2) begin

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

return

end

print 'Город '+@gr1+'-'+str(@it2)

print '----------------------------------'

print 'Всего по запросу-'+str(@itall)

deallocate y

return