ЛАБОРАТОРНАЯ РАБОТА № 8

 

Цель:

1. Практически освоить создание и использование сложных (с элементами программирования) хранимых процедур.

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

Справочный материал:

1. Конспект курса.

 

Упражнения

Перед выполнением лабораторной работы необходимо войти в сеть, затем в систему MS SQL Server и SQL Query Analyser, а также установить связь пользователя с базой данных (аналогично описанному сценарию в лабораторной работе № 1).

 

Вариант двумерного статистического запроса к БД

Выдать статистику по всем учебным заведениям и категориям обучения учащихся России, принятых на учебу в 1990 году.

В этом запросе требуется, во-первых: выдать общее количество учащихся, принятых на учебу в 1990 году; во-вторых: распределить это количество по разным учебным заведениям, т.е. для каждого учебного заведения определить количественные характеристики; в-третьих: каждую количественную характеристику каждого учебного заведения распределить по разным категориям обучения, т.е. определить количественные характеристики каждой категории обучения в каждом учебном заведении.

Другими словами, если использовать только SELECT - предложения, то необходимо выполнить три запроса (и получить три разных отчета):

1) запрос получения общего количества учащихся, принятых в 1990 году;

2) запрос с условием выборки по году приема (значение '90'), с предложением group by для группирования значений по полю "учебное заведение" и с агрегатной функцией count(*) в списке выборки для оценки количества значений учебных заведений в каждой группе;

3) запрос с условием выборки по году приема (значение '90'), с предложением group by для группирования значений по двум полям: "учебное заведение" и "категория обучения" и с агрегатной функцией count(*) в списке выборки для оценки количества значений категорий обучения в каждой группе.

Замечание. То, что функция count(*) подсчитывает количество значений в группах для последнего указанного в списке выборки поля, является ограничением языка SQL, поэтому для подсчета статистики по двум полям (атрибутам) требуется выполнять два отдельных запроса.

Перечисленные выше запросы выглядят следующим образом:

1) select count(*) from poss where gp='90'

2) select vuz.uch_zavedenie,

count(*)

from poss, vuz

where gp='90' and vuz_k=vuz.cod

group by vuz.uch_zavedenie

3) select vuz.uch_zavedenie, kat_obuch.kat_obucheniya,

count(*)

from poss, vuz, kat_obuch

where gp='90' and vuz_k=vuz.cod

and kat_obuch_k=kat_obuch.cod

group by vuz.uch_zavedenie, kat_obuch.kat_obucheniya

Замечание. Значения полей "учебное заведение" и "категория обучения" при выдаче отчета должны быть раскодированы, поэтому в запросах используется операция соединения таблиц.

То, что результат двумерного статистического запроса расположен в трех разных отчетах, не совсем удовлетворяет пользователя. Для исправления этого нужно использовать программирование в хранимой процедуре.

Для объединения всех количественных характеристик значений атрибутов и общего итога по запросу в один отчет необходимо в теле хранимой процедуры использовать курсор (см. конспект курса). В качестве предложения select для курсора нужно взять запрос номер 3), в котором определяются количества значений по последнему в списке выборки атрибуту (в данном запросе "категория обучения"). Суммируя количественные характеристики значений категорий обучения можно получить количественные характеристики соответствующих значений учебных заведений ("учебное заведение" - первый атрибут в списке выборки), а также общий итог по запросу (т.е. по приему 1990 года).

Для создания процедуры в верхней области окна необходимо ввести текст процедуры (команда create procedure):

create procedure zapr8 as

declare @yz char (25) /* переменная для названия учебного заведения */

declare @ko char (16) /*переменная для названия категории обучения */

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

declare @it2 int /* переменная для итога по полю учебное заведение */

declare @itall int /* переменная для итога по всему запросу */

declare @yz1 char (25) /*переменная для названия учебного заведения*/

/* объявление курсора для двумерного статистического запроса */

declare y cursor for

select vuz.uch_zavedenie, kat_obucheniya, count (*)

from poss join vuz on vuz_k=vuz.cod

join kat_obuch on kat_obuch_k=kat_obuch.cod

where gp='90'

group by vuz.uch_zavedenie, kat_obuch.kat_obucheniya

select @it2=0 /*начальное значение итога по полю уч. заведение=0*/

select @itall=0 /* начальное значение итога по запросу = 0 */

open y /* открытие курсора */

fetch y into @yz, @ko, @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 /*запоминание названия учебного заведения в @yz1*/

print @ko+' -'+str(@it1) /*печать названия категории обучения и итога*/

select @it2=@it2+@it1 /* подсчет итога по полю учебное заведение */

select @itall=@itall+@it1 /* подсчет общего итога по запросу */

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

while (@@fetch_status=0)

begin

fetch y into @yz, @ko, @it1 /* считывание очередного итога по полю категория обучения */

if (@yz1 !=@yz) begin /* если название учебного заведения поменялось, то печать */

print 'учебное заведение ' + @yz1 + ' - ' +str(@it2) /* старого названия учебного заведения и итога */

select @yz1=@yz/*присвоение нового названия учебного заведения */

select @it2=0 /* новый итог = 0 */

end

if (@@fetch_status=-1) break /* при окончании данных немедленный выход из цикла */

print @ko + ' - ' +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 [F5]

Для выполнения запроса нужно запустить эту процедуру, т.е. в верхней области окна необходимо ввести:

zapr8 [F5]

Отчет будет представлен в нижней области окна (см. рис. 29).

 

Рис. 29

Вариант трехмерного статистического запроса к БД

Выдать статистику по всем учебным заведениям, специальностям и категориям обучения учащихся России

Трехмерный статистический запрос выполняется аналогично двумерному, за исключением того, что в этом запросе и в списке выборки, и в предложении group by добавляется еще одно поле (атрибут "специальность"). Другими словами, в этом запросе требуется, во-первых: выдать общее количество учащихся в России; во-вторых: распределить это количество по разным учебным заведениям, т.е. определить количественные характеристики для каждого учебного заведения; в-третьих: каждую количественную характеристику каждого учебного заведения распределить по разным шифрам специальностей, т.е. определить количественные характеристики каждой специальности в каждом учебном заведении; в-четвертых: каждую количественную характеристику каждого шифра специальности (в каждом учебном заведении) распределить по разным категориям обучения, т.е. определить количественные характеристики каждой категории обучения для каждого шифра специальности (в каждом учебном заведении).

Если использовать только SELECT - предложения, то потребуется выполнить четыре отдельных запроса и получить четыре разных отчета (по аналогии с двумерным статистическим запросом), что совершенно не удовлетворит пользователя. Поэтому для реализации этого запроса необходимо использовать курсор и программирование в хранимой процедуре.

В качестве предложения select для курсора берется следующее предложение:

select vuz.uch_zavedenie, spec, kat_obuch.kat_obucheniya,

count(*)

from poss, vuz, kat_obuch

where vuz_k=vuz.cod and kat_obuch_k=kat_obuch.cod

group by vuz. uch_zavedenie, spec, kat_obuch. kat_obucheniya

Данный курсор позволяет получать количественные характеристики разных категорий обучения (последний атрибут в списке выборки и в предложении group by). Если суммировать эти количественные характеристики, то можно получить и количественные характеристики соответствующих шифров специальностей, и количественные характеристики соответствующих учебных заведений, и общий итог по запросу.

Для создания процедуры в верхней области окна необходимо ввести текст процедуры (команда create procedure):

create procedure zapr9 as

declare @yz char (25) /* переменная для названия учебного заведения */

declare @sp char (6) /* переменная для шифра специальности */

declare @ko char (16) /*переменная для названия категории обучения */

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

declare @it2 int /* переменная для итога по полю специальность */

declare @it3 int /* переменная для итога по полю учебное заведение */

declare @itall int /* переменная для итога по всему запросу */

declare @yz1 char (25)/*переменная для названия учебного заведения */

declare @sp1 char (6) /* переменная для шифра специальности */

/* объявление курсора для трехмерного статистического запроса */

declare y cursor for

select vuz.uch_zavedenie, spec,

kat_obuch.kat_obucheniya, count (*)

from poss join vuz on vuz_k=vuz.cod

join kat_obuch on kat_obuch_k=kat_obuch.cod

group by vuz.uch_zavedenie, spec, kat_obuch. kat_obucheniya

select @it2=0 /*начальное значение итога по полю специальность = 0 */

select @it3=0 /*начальное значение итога по полю учебное заведение=0*/

select @itall=0 /*начальное значение итога по запросу = 0 */

open y /* открытие курсора */

fetch y into @yz, @sp, @ko, @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/*запоминание названия учебного заведения в @yz1 */

select @sp1=@sp /* запоминание шифра специальности в @sp1 */

print @ko + ' - ' + str(@it1) /* печать названия категории обучения и итога */

select @it2=@it2+@it1 /* подсчет итога по полю специальность */

select @it3=@it3+@it1 /* подсчет итога по полю учебное заведение */

select @itall=@itall+@it1 /* подсчет общего итога по запросу */

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

while (@@fetch_status=0) begin

fetch y into @yz, @sp, @ko, @it1 /* считывание очередного итога по полю категория обучения */

if (@yz1!=@yz) begin /* если название учебного заведения поменялось, то печать */

print 'учебное заведение ' + @yz1 + ' - ' + str(@it3) /* старого названия учебного заведения и итога */

select @yz1=@yz /* присвоение нового названия учебного заведения */

select @it3=0 /* новый итог = 0 */

end

if (@sp1!=@sp) begin /*если шифр специальности поменялся, то печать*/

print 'специальность ' + @sp1 + ' - ' + str(@it2) /* старого шифра специальности и итога */

select @sp1=@sp /* присвоение нового шифра специальности */

select @it2=0 /* новый итог = 0 */

end

if (@@fetch_status=-1) break /* при окончании данных немедленный выход из цикла */

print @ko + ' - ' +str(@it1) /* печать очередных названия категории обучения и итога */

select @it2=@it2+@it1 /* подсчет итога по полю специальность */

select @it3=@it3+@it1 /* подсчет итога по полю учебное заведение */

select @itall=@itall+@it1 /* подсчет общего итога по запросу */

end

close y /* закрытие курсора по окончании цикла */

if (@@fetch_status=-2) begin

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

return /* останов процедуры в случае ошибки */

end

print 'специальность ' + @sp + ' - ' + str(@it2) /* печать последнего итога по специальности */

print 'учебное заведение ' + @yz + ' - ' + str(@it3) /* печать последнего итога по учебн. заведению */

print 'всего по запросу -'+str(@itall)/*печать общего итога по запросу */

deallocate y /* освобождение курсора */

return [F5]

Для выполнения запроса нужно запустить эту процедуру, т.е. в верхней области окна необходимо ввести:

zapr9 [F5]

Отчет будет представлен в нижней области окна (см. рис. 30).

 

Варианты заданий на выполнение лабораторной работы № 8 приведены в приложении V.