|
Создание базы данных "РЭО-ГАИ" |
ервичный ключ: РНН владельца, Признак владельцаВозможные функциональные зависимости:РНН владельца, Признак владельца - Адрес владельцаРНН владельца, Признак владельца - ТелефонРНН владельца, Признак владельца - Адрес стоянки автоРНН владельца, Признак владельца - ПолРНН владельца, Признак владельца - Год рожденияРНН владельца, Признак владельца - № уд. личностиРНН владельца, Признак владельца - ПрофессияЧетвертая нормальная формаВидим, что каждому владельцу соответствует множество, состоящее из нуля или более значений атрибута телефон (А>В), также как и соответствует множество, состоящее из нуля или более значений атрибута адрес стоянки авто (А>С). Но телефон владельца авто не зависит от адреса стоянки авто.Многозначные зависимости:РНН владельца >> ТелефонРНН владельца >> Адрес стоянки автоМожно произвести декомпозицию отношения:Владельцы-физ_лица-телефоны (РНН владельца, Признак владельца, Адрес владельца, Телефон, Пол, Год рождения, № уд. личности, ПрофессияПервичный ключ: РНН владельца, Признак владельцаВозможные функциональные зависимости:РНН владельца, Признак владельца - Адрес владельцаРНН владельца, Признак владельца - ТелефонРНН владельца, Признак владельца - ПолРНН владельца, Признак владельца - Год рожденияРНН владельца, Признак владельца - № уд. личностиРНН владельца, Признак владельца - ПрофессияВладельцы-физ_лица-адреса стоянок (РНН владельца, Признак владельца, Адрес владельца, Адрес стоянки авто, Пол, Год рождения, № уд. личности, Профессия)Первичный ключ: РНН владельца, Признак владельцаВозможные функциональные зависимости:РНН владельца, Признак владельца - Адрес владельцаРНН владельца, Признак владельца - Адрес стоянки автоРНН владельца, Признак владельца - ПолРНН владельца, Признак владельца - Год рожденияРНН владельца, Признак владельца - № уд. личностиРНН владельца, Признак владельца - ПрофессияОтношения находятся в 4NFПятая нормальная формаТаблица находится в пятой нормальной форме 5NF, тогда и только тогда, когда в каждой ее полной декомпозиции все проекции содержат возможный ключ.Декомпозиция отношений6Владельцы-юр_лица_наименования (РНН владельца, Признак владельца, Наименование)Первичный ключРНН владельца, Признак владельцаФункциональные зависимости:РНН владельца, Признак владельца - НаименованиеВладельцы-юр_лица_адреса владельцев (РНН владельца, Признак владельца, Адрес владельца)Первичный ключРНН владельца, Признак владельцаФункциональные зависимости:РНН владельца, Признак владельца - Адрес владельцаВладельцы-юр_лица_адреса стоянок авто (РНН владельца, Признак владельца, Адрес стоянки авто, Телефон)Первичный ключРНН владельца, Признак владельцаФункциональные зависимости:РНН владельца, Признак владельца - Адрес стоянки автоВладельцы-юр_лица_телефоны (РНН владельца, Признак владельца, Телефон)Первичный ключРНН владельца, Признак владельцаФункциональные зависимости:РНН владельца, Признак владельца - ТелефонВладельцы-физ_лица-имена (РНН владельца, ФИО)Первичный ключ: РНН владельцаФункциональные зависимости:РНН владельца - ФИОВладельцы-физ_лица_адреса владельцев (РНН владельца, Признак владельца, Адрес владельца)Первичный ключ: РНН владельца, Признак владельцаРНН владельца, Признак владельца - Адрес владельцаВладельцы-физ_лица-телефоны (РНН владельца, Признак владельца, Телефон, рождения)Первичный ключ: РНН владельца, Признак владельцаВозможные функциональные зависимости:РНН владельца, Признак владельца - ТелефонВладельцы-физ_лица-адреса стоянок (РНН владельца, Признак владельца, Адрес стоянки авто)Первичный ключ: РНН владельца, Признак владельцаВозможные функциональные зависимости:РНН владельца, Признак владельца - Адрес стоянки автоВладельцы-физ_лица-пол (РНН владельца, Признак владельца, Пол)Первичный ключ: РНН владельца, Признак владельцаВозможные функциональные зависимости:РНН владельца, Признак владельца - ПолВладельцы-физ_лица-год рождения (РНН владельца, Признак владельца, Год рождения)Первичный ключ: РНН владельца, Признак владельцаВозможные функциональные зависимости:РНН владельца, Признак владельца - Год рожденияВладельцы-физ_лица-уд. личности (РНН владельца, Признак владельца, № уд. личности)Первичный ключ: РНН владельца, Признак владельцаВозможные функциональные зависимости:РНН владельца, Признак владельца - № уд. личностиВладельцы-физ_лица-профессии (РНН владельца, Признак владельца, Профессия)Первичный ключ: РНН владельца, Признак владельцаВозможные функциональные зависимости:РНН владельца, Признак владельца - профессия3. Структура программыПрограмма "РЭО-ГАИ" реализована на языке программирования Borland Delphi с подключением MSSQL Server 2000. Структуру программы составляют 4 класса и 6 программных модулей.3.1 Описание модулейМодули данной программы подразделяются на:1. Модуль Unit1, который находится в файле Unit1. pas содержит информацию о всех таблицах данной базы данных.2. В модуле Unit2, находящемся в файле Unit2. pas происходит реализация класса TZaprosy (запросы).3. Модуль Unit3 расположен в файле Unit3. pas, в котором находится реализация класса TOtchety (отчеты).4. Модуль Unit4 расположен в файле Unit4. pas, в нем находится код описания класса TProcedury (процедуры).5. Модуль Unit5, который расположен в файле Unit5. pas содержит реализацию класса TSpravka (справка).6. Модуль Unit6 находится в файле Unit6. pas и содержит информацию об отчетах.3.2 Описание запросов выполняемых в программеЗапрос 1. Количество автотранспортных средств, принадлежащих каждому из владельцев.SELECT [РНН владельца], COUNT ([№автомобиля])FROM АвтомобилиGROUP BY [РНН владельца]ORDER BY [РНН владельца] ;Запрос 2. Найти автомобиль по неполному номеру двигателя <…>SELECT [№автомобиля], [№двигателя]FROM АвтомобилиWHERE [№двигателя] LIKE '%111%';Запрос 3. Вычислить "возраст" каждого из автомобилей, стоящих на учете на текущую дату.SELECT Движение. [№автомобиля], 'Возраст =', datediff (yy, Автомобили. [Дата выпуска],getdate ())FROM Движение, Автомобили, ОперацииWHERE Автомобили. [№автомобиля] =Движение. [№автомобиля]and Операции. [Код операции] =Движение. [Код операции]and Операции. [Наименование] like '%постан%'and [Дата операции] < getdate ();Запрос 4. Какие операции проводились с автомобилями по <i-му> району учета в текущем месяце.SELECT Движение. [№автомобиля], Районы_учета. [Наименование района учета], Операции. [Наименование операции]FROM Операции, Районы_учета, ДвижениеWHERE Районы_учета. [Код района учета] =Движение. [Код района учета]AND Операции. [Код операции] =Движение. [Код операции]AND Районы_учета. [Наименование района учета] ='Казыбек-бийский'AND month ([Дата операции]) =month (getdate ());Запрос 5. Автомобили, каких категорий цветов поставлены на учет в текущем году.SELECT Движение. [№автомобиля], Категории_цвета. [Наименование категории цвета]FROM Категории_цвета, Цвета, Автомобили, Операции, ДвижениеWHERE Категории_цвета. [Код категории цвета] =Цвета. [Код категории цвета]AND Цвета. [Код цвета] =Автомобили. [Код цвета]AND Автомобили. [№автомобиля] =Движение. [№автомобиля]AND Операции. [Наименование операции] = 'Постановка на учет'AND year (Движение. [Дата операции]) =year (getdate ());Отчет 1. Карточка учета автотранспортного средстваSELECT Движение. [№автомобиля],Движение. [РНН владельца],Операции. [Наименование операции],Районы_учета. [Наименование района учета],Движение. [Дата операции]FROM Движение, Операции, Районы_учетаWHERE Районы_учета. [Код района учета] = Движение. [Код района учета]AND Операции. [Код операции] = Движение. [Код операции] ;Отчет 2. Отчет о движении транспортных средств на "I-ю" датуSELECT Движение. [Дата операции],Движение. [№автомобиля],Движение. [РНН владельца],Районы_учета. [Наименование района учета],Операции. [Наименование операции]FROM Движение, Районы_учета, ОперацииWHERE Районы_учета. [Код района учета] = Движение. [Код района учета]AND Операции. [Код операции] = Движение. [Код операции]AND year (Движение. [Дата операции]) =year ('13 October 2007')and month (Движение. [Дата операции]) =month ('13 October 2007')and day (Движение. [Дата операции]) =day ('13 October 2007');Отчет 3. Список автомобилей, владельцами которых являются физические лицаSELECT Движение. [№автомобиля],Категории_цвета. [Наименование категории цвета]FROM Категории_цвета, Цвета, Автомобили, Операции, ДвижениеWHERE Категории_цвета. [Код категории цвета] =Цвета. [Код категории цвета]AND Цвета. [Код цвета] =Автомобили. [Код цвета]AND Автомобили. [№автомобиля] =Движение. [№автомобиля]AND Операции. [Наименование операции] = 'Постановка на учет'AND year (Движение. [Дата операции]) =year (getdate ());Описание процедур выполняемых в программеПроцедура 1. Необходимо выбрать автомобили, возраст которых не превышает 10 лет.USE РЭО_ГАИGOCREATE PROCEDURE Vyboravto1ASSELECT *FROM АвтомобилиWHERE year ([Дата выпуска]) > year ('01 January 1997')GOexecute Vyboravto1goПроцедура 2. Необходимо выбрать автомобили определенной марки и с определенным типом кузова.USE РЭО_ГАИGOCREATE PROCEDURE Vyboravto2 @marka_id int, @kuzov_id intASSELECT *FROM АвтомобилиWHERE [Код марки авто] = @marka_idand [Код типа кузова] = @kuzov_idGOUSE РЭО_ГАИGOEXECUTE Vyboravto2 2, 2GOЗаключениеВ первом разделе данного курсового проекта была описана постановка задачи с нововведениями и дополнениями со стороны разработчика.Во втором и третьем разделах была описана структура разработанной базы данных и структура хранимой в ней информации. Также были подробно описаны связи между таблицами.В четвертом разделе была описана структура программы, её классы и модули.В пятом разделе было представлено подробное руководство по использованию программы.Приложениеunit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, Menus, DB, ADODB, ExtCtrls, DBCtrls, Grids, DBGrids, ComCtrls;typeTForm1 = class (TForm)MainMenu1: TMainMenu;N1: TMenuItem;N2: TMenuItem;N3: TMenuItem;N4: TMenuItem;N5: TMenuItem;N6: TMenuItem;N7: TMenuItem;N8: TMenuItem;N9: TMenuItem;N10: TMenuItem;N11: TMenuItem;N12: TMenuItem;N13: TMenuItem;N14: TMenuItem;N15: TMenuItem;N16: TMenuItem;ADOTable1: TADOTable;DataSource1: TDataSource;DBGrid1: TDBGrid;DBNavigator1: TDBNavigator;StatusBar1: TStatusBar;N17: TMenuItem;procedure N15Click (Sender: TObject);procedure N3Click (Sender: TObject);procedure N4Click (Sender: TObject);procedure N5Click (Sender: TObject);procedure N16Click (Sender: TObject);procedure N6Click (Sender: TObject);procedure N7Click (Sender: TObject);procedure N8Click (Sender: TObject);procedure N9Click (Sender: TObject);procedure N10Click (Sender: TObject);procedure N11Click (Sender: TObject);procedure N12Click (Sender: TObject);procedure N13Click (Sender: TObject);procedure N14Click (Sender: TObject);private{ Private declarations }public{ Public declarations }end;varForm1: TForm1;implementationuses Unit2, Unit3, Unit4, Unit5;{$R *. dfm}procedure TForm1. N15Click (Sender: TObject);beginSpravka. Show; // close;end;procedure TForm1. N3Click (Sender: TObject);beginZaprosy. Show;end;procedure TForm1. N4Click (Sender: TObject);beginOtchety. Show;end;procedure TForm1. N5Click (Sender: TObject);beginProcedury. Show;end;procedure TForm1. N16Click (Sender: TObject);beginclose;end;procedure TForm1. N6Click (Sender: TObject);beginADOTable1. Active: =false;ADOTable1. TableName: ='Районы_учета';ADOTable1. Active: =true;StatusBar1. SimpleText: =n6. Caption;end;procedure TForm1. N7Click (Sender: TObject);beginADOTable1. Active: =false;ADOTable1. TableName: ='Операции';ADOTable1. Active: =true;StatusBar1. SimpleText: =n7. Caption;end;procedure TForm1. N8Click (Sender: TObject);beginADOTable1. Active: =false;ADOTable1. TableName: ='Марки_автомобиля';ADOTable1. Active: =true;StatusBar1. SimpleText: =n8. Caption;end;procedure TForm1. N9Click (Sender: TObject);beginADOTable1. Active: =false;ADOTable1. TableName: ='Типы_кузова';ADOTable1. Active: =true;StatusBar1. SimpleText: =n9. Caption;end;procedure TForm1. N10Click (Sender: TObject);beginADOTable1. Active: =false;ADOTable1. TableName: ='Категории_цвета';ADOTable1. Active: =true;StatusBar1. SimpleText: =n10. Caption;end;procedure TForm1. N11Click (Sender: TObject);beginADOTable1. Active: =false;ADOTable1. TableName: ='Цвета';ADOTable1. Active: =true;StatusBar1. SimpleText: =n11. Caption;end;procedure TForm1. N12Click (Sender: TObject);beginADOTable1. Active: =false;ADOTable1. TableName: ='Автомобили';ADOTable1. Active: =true;StatusBar1. SimpleText: =n12. Caption;end;procedure TForm1. N13Click (Sender: TObject);beginADOTable1. Active: =false;
Страницы: 1, 2, 3
|
|
|
© 2003-2013
Рефераты бесплатно, курсовые, рефераты биология, большая бибилиотека рефератов, дипломы, научные работы, рефераты право, рефераты, рефераты скачать, рефераты литература, курсовые работы, реферат, доклады, рефераты медицина, рефераты на тему, сочинения, реферат бесплатно, рефераты авиация, рефераты психология, рефераты математика, рефераты кулинария, рефераты логистика, рефераты анатомия, рефераты маркетинг, рефераты релиния, рефераты социология, рефераты менеджемент. |
|
|