База данных в Mssql

insert into abonk values (37,7,'21/11/2009','30/11/2009', 'Нет долгов', 'Керсокова Л.В.')

insert into abonk values (38,8,'22/11/2009','1/11/2009', 'Должник', 'Керсокова Л.В.')

insert into abonk values (39,9,'23/11/2009','2/12/2009', 'Нет долгов', 'Керсокова Л.В.')

insert into abonk values (40,10,'24/11/2009','2/12/2009', 'Нет долгов', 'Керсокова Л.В.')

Создаю  таблицу  Абонент (Nabo)

CREATE TABLE Nabo (nkod int, nfam char (20), nname char (20), notc char (20), ndar datetime, ndad varchar(100), npas char (50), anab int not null references abonk) insert into nabo values (1,'…','…','…','14/07/1960',     '… 3-54','97 02 678124',31)

insert into nabo values (2,'…','…','…','15/01/1969',    '… 10-98','97 02 678348',32)

insert into nabo values (3,'…','…','…','3/09/1979',     '… 5-19','97 02 674324',33)

insert into nabo values (4,'…','…','…','25/11/1990',    '… 8-56','97 02 768124',34)

insert into nabo values (5,'…','…','…','11/10/1965',    '… 7-34','97 02 678123',35)

insert into nabo values (6,'…','…','…','9/03/1961',     '… 1-78','97 02 612124',36)

insert into nabo values (7,'…','…','…','22/06/1950',    '… 9-43','97 02 678654',37)

insert into nabo values (8,'…','…','…','12/04/1975',     '… 6-94','97 02 677624',38)

insert into nabo values (9,'…','…','…','11/04/1980',    '… 21-34','97 02 678884',39)

insert into nabo values (10,'…','… ','…','24/03/1984', '… 3-47','97 02 675324',40)

 
 
 
 
 
 
 
 
 
 

     3.Создание представлений.

Выводит представление о всех абонентах  библиотеки не имеющих долга.

create view Dannie as select nkod,nfam,nname,notc,abonk.anab,kinv,adas,apri from nabo,abonk where abonk.anab=nabo.anab and apri like   'Нет долгов'

select*from Dannie

 

    Выводит на экран книги от 2005 года выпуска  и выше.

create view  knigivishly  as select kinv,kavt,knai,kgod,ksto from knig where kgod>=2005

select*from knigivishly

 
 
 
 
 
 

     4.Создание процедур. 

Процедура уменьшающая стоимость всех книг в 10 раз(на возможность уменьшения курса рубля)

create proc smenakurcarubla as update knig set ksto=ksto/10

exec smenakurcarubla

select*from knig

    Процедура изменяющая статус ‘нет долгов’ на ‘долник’ по инвентарному номеру ‘2’

create proc dolg as update abonk set apri ='Äîëæíèê'where kinv like '2'

exec dolg

select*from abonk

     5.Создание запросов.

Вывести на экран cписок литературы в темах которых имеется

значение Ms sql.

select kinv,tem.kshit,kshik,kavt,knai,kgod,ksto,tcha from tem,knig where tem.kshit=knig.kshit and tnap like '% ms sql'

Вывести на экран количество абонентских книжек которое существует в библиотеке.

select count(anab)as 'Количество абонентских книжек' from nabo

Вывод на экран всей стоимости книг находящихся  в библиотеке.

select sum(ksto)as'Сумма всех книг' from knig

Вывод на экран информацию о библиотекаре выдавшем книги после 20/11/2009

select akev,abonk.kinv,adav from knig,abonk where abonk.kinv=knig.kinv and adav>'20/11/2009'