Рис. 4 Вибірка даних з таблиці Арес після занесення початкових даних
Рис. 5 Вибірка даних з таблиці СУЗ після занесення початкових даних
6. Реалізація серверного додатку і демонстрація його роботи
Процедури додавання даних в таблиці:
Додавання Нової спеціальності, перевірка її існування
use test
procedure addSPEC
@ Код_спеціальності varchar (20),
@ Дісціпліна_1 varchar (20),
@ Дісціпліна_2 varchar (20),
@ Дісціпліна_3 varchar (20),
@ Дісціпліна_4 varchar (20) nocount on ((select COUNT (*) from ВНЗ where Код_спеціальності=@ Код_спеціальності)!=0)
begin Така спеціальність вже є (1) tryinto ВНЗ (Код_спеціальності, Дісціпліна_1, Дісціпліна_2, Дісціпліна_3, Дісціпліна_4)
values (@Код_специальности,@Дисциплина_1,@Дисциплина_2,@Дисциплина_3,@Дисциплина_4)laquo;Добавленоraquo;scope_identity()trycatch(- 1)
end catch
Рис. 5 Вибірка даних з таблиці ВНЗ після внесення нових даних
Додавання нового абітурієнта. Перевірка наявності абітурієнта з таким ID в базі, перевірка наявності такої спеціальності в базі.
create procedure addABITUR
@ ID_абітуріента varchar (20),
@ Прізвище varchar (60),
@ Ім'я varchar (60),
@ батькові varchar (60),
@ Дата_рожденія varchar (20),
@ Медаль varchar (20),
@ Код_спеціальності varchar (20),
@ Індекс varchar (20),
@ Територія varchar (20),
@ Населенний_пункт varchar (20),
@ Вулиця varchar (20),
@ Номер_дома varchar (20),
@ Телефон varchar (20),
@ СУЗ varchar (20),
@ Місто varchar (20),
@ Дата_окончанія varchar (20) nocount on ((select COUNT (*) from Абітурієнт where ID_абітуріента=@ ID_абітуріента)!=0)
print Абітурієнт з таким ID вже є в базі
return (1) try ((select COUNT (*) from ВНЗ where Код_спеціальності=@ Код_спеціальності)=0)
print Такий спеціальності не існує
return (1)
end
begin try
insert into Абітурієнт (ID_абітуріента, Прізвище, Ім'я, По батькові, Дата_рожденія, Медаль, Код_спеціальності)
values (@ID_абитуриента,@Фамилия,@Имя,@Отчество,@Дата_рождения,@Медаль,@Код_специальности) into Адреса (ID_абітуріента, Індекс, Територія, Населенний_пункт, Вулиця, Номер_дома, Телефон)
values (@ID_абитуриента,@Индекс,@Территория,@Населенный_пункт,@Улица,@Номер_дома,@Телефон) into Оконченное_СУЗ (ID_абітуріента, Назва, Місто, Дата_окончанія)
values (@ID_абитуриента,@СУЗ,@Город,@Дата_окончания)laquo;Добавленоraquo;scope_identity()trycatch(- 1) catchtrycatch (- 1) catch
Рис. 6 Вибірка даних з таблиць, що містять дані про доданому абітурієнта
подання даних про абітурієнтів.
use testview Абітуріентиa.ID_абітуріента as ID raquo ;, a. Прізвище as Прізвище raquo ;, a. Ім'я as Ім'я raquo ;, a. По батькові as батькові raquo ;, a. Дата_рожденія as Д.р. ,. Медаль as Медаль raquo ;, a. Код_спеціальності as Спеціальність ,. Індекс as Індекс raquo ;, b. Територія as Територія ,. Населенний_пункт as Місто raquo ;, b. Вулиця as Вулиця raquo ;, b. Номер_дома as Будинок raquo ;, b. Телефон as Телефон ,. Місто as Город_СУЗ raquo ;, c. Дата_окончанія as Дата_окончанія Абітурієнт ajoin Адреса b on a.ID_абітуріента=b.ID_абітуріентаjoin Оконченное_СУЗ c on a.ID_абітуріента=c.ID_абітуріента
goVIEW ViewOfVoshogdenie
Рис. 7 Подання всієї інформації про абітурієнтів.
use testview Абітуріенти_с_медальюa.ID_абітуріента as ID raquo ;, a. Прізвище as Прізвище raquo ;, a. Ім'я as Ім'я raquo ;, a. По батькові as батькові raquo ;, a. Дата_рожденія as Д.р. ,
a. Медаль as Медаль raquo ;, a. Код_спеціальності as Спеціальність ,. Індекс as Індекс raquo ;, b. Територія as Територія ,. Населенний_пункт as ...
