Geum.ru

"турбо" курсовая работа специальность "Прикладное программирование" Тема: Создание бд «Кинотеатр»

Вид материалаКурсовая

Содержание


3 Анализ предметной области
Физическая модель базы данных
5Интерфейс программы
Система справочники договор о программе
Таблица данные, триггер, генератор CREATE TABLE DN (
Таблица анкета, триггер, генератор CREATE TABLE AN ( AN_KOD INTEGER NOT NULL
Таблица DVD, триггер, генератор CREATE TABLE DN ( DN_KOD INTEGER NOT NULL
Подобный материал:
Университетский центр компьютерного обучения
"ТУРБО"


КУРСОВАЯ РАБОТА


специальность "Прикладное программирование"


Тема: Создание БД «Кинотеатр»



Работу выполнил студент 3 курса

Абрамцов Сергей




Научный руководитель:

Бурлаев С. Ю.



Майкоп, 2010 г.


Оглавление

Введение 3

Анализ предметной области 4

Инфологическая модель базы данных 4

Физическая модель базы данных 5

Таблицы БД 5

Выводы 13

Литература 14



Введение


Данная локальная БД значительно облегчает работу работников прокатного салона. На главной форме выводится самые важные сведения о клиенте: ФИО, мобильный или сотовый телефон, дата выдачи и дата возврата диска. Также в приложении есть форма-анкета, в которую вносятся паспортные данные клиента, мобильный или сотовый телефон. Есть форма для редактирования данных о названии фильмов. Одной из самых важных частей моей БД составляет форма-договор, в которой содержится информация об условиях проката дисков. Также имеется форма, в которой содержится информация о создателе данной БД.





3

Анализ предметной области


Имеется прокатный салон. Данное приложение осуществляет контроль над прокатом дисков.


Инфологическая модель базы данных



Анализ описанной предметной области и решаемых задач позволяет выделить следующие сущности:

  1. Данные о клиенте
  2. Анкета клиента
  3. Названия фильмов
  4. Договор



В таблице 1. Данные о клиенте: представлена следующая информация:

ФИО, мобильный или сотовый телефон, дата выдачи и дата возврата диска.

В таблице 2. Анкета клиента: представлена следующая информация: паспортные данные клиента, мобильный или сотовый телефон.

В таблице 3. Названия фильмов: представлена следующая информация: данных о названии фильмов.

В таблице 4. Договор: представлена информация об условиях проката дисков.


4


Физическая модель базы данных


Авторами была поставлена задача создания СУБД. В качестве сервера базы данных было решено использовать сервер InterBase.

Таблицы БД


База данных, как следует из разработки инфологической модели, содержит 3 таблицы:


DN (Данные)

Поле
Тип
Описание

DN_KOD
INTEGER
Первичный ключ

CD_KOD

INTEGER
Код DVD

AN_COD
INTEGER
Код анкеты

DN_DATAV

DATE
Дата выдачи

DN_DATAVV
DATE
Дата возврата


AN (Анкета)

Поле
Тип
Описание

AN_KOD

INTEGER
Первичный ключ

AN_FAM
VARCHAR(30)
Фамилия

AN_NAM
VARCHAR(30)
Имя

AN_OTCH
VARCHAR(30)
Отчество

AN_FIO
COMPUTED BY
ФИО

AN_PHONE
VARCHAR(30)
Телефон

AN_ADRES
VARCHAR(30)
Адрес


GANR (Жанры)

Поле
Тип
Описание

CD_kod
INTEGER
Первичный ключ

CD_Nam
VARCHAR(30)
Название диска



5


Интерфейс программы


При запуске программы появляется главное окно:




СИСТЕМА СПРАВОЧНИКИ ДОГОВОР О ПРОГРАММЕ

↓ ↓

ВЫХОД АНКЕТА

↓

DVD


6


Окно справочники→Анкета:





7


Окно справочники→DVD:

Окно договор:





8


Окно о программе:





9


Скрипты

Таблица данные, триггер, генератор

CREATE TABLE DN

(

DN_KOD INTEGER NOT NULL,

DN_DATAV DATE,

DN_DATAVV DATE,

CD_KOD INTEGER,

AN_COD INTEGER,

PRIMARY KEY(dn_Kod)

);


CREATE GENERATOR gen_dn;

SET GENERATOR gen_dn TO 0;


SET TERM ;

CREATE TRIGGER tr_dn FOR dn

ACTIVE BEFORE INSERT

AS

BEGIN

IF (NEW.dn_kod IS NULL) THEN

NEW.dn_kod = GEN_ID(gen_dn,1);

END

SET TERM ;

10


Таблица анкета, триггер, генератор

CREATE TABLE AN

(

AN_KOD INTEGER NOT NULL,

AN_FAM VARCHAR(30) CHARACTER SET WIN1251 NOT NULL,

AN_NAM VARCHAR(30) CHARACTER SET WIN1251 NOT NULL,

AN_OTCH VARCHAR(30) CHARACTER SET WIN1251 NOT NULL,

AN_FIO COMPUTED BY (AN_FAM ||' '|| AN_NAM ||' '|| AN_OTCH),

AN_ADRES VARCHAR(30) CHARACTER SET WIN1251 NOT NULL,

AN_PHONE VARCHAR(10) CHARACTER SET WIN1251 NOT NULL,

CD_KOD INTEGER,

PRIMARY KEY(AN_Kod)

);


CREATE GENERATOR gen_an;

SET GENERATOR gen_an TO 0;


SET TERM ;

CREATE TRIGGER tr_an FOR an

ACTIVE BEFORE INSERT

AS

BEGIN

IF (NEW.an_kod IS NULL) THEN

NEW.an_kod = GEN_ID(gen_an,1);

END

SET TERM ; 11


Таблица DVD, триггер, генератор

CREATE TABLE DN

(

DN_KOD INTEGER NOT NULL,

DN_DATAV DATE,

DN_DATAVV DATE,

CD_KOD INTEGER,

AN_COD INTEGER,

PRIMARY KEY(dn_Kod)

);


CREATE GENERATOR gen_dn;

SET GENERATOR gen_dn TO 0;


SET TERM ;

CREATE TRIGGER tr_dn FOR dn

ACTIVE BEFORE INSERT

AS

BEGIN

IF (NEW.dn_kod IS NULL) THEN

NEW.dn_kod = GEN_ID(gen_dn,1);

END

SET TERM ;


12

Выводы


Мной разработана СУБД «Прокат DVD» с использованием SQL-сервера Borland InterBase.

В процессе работы над курсовой работой автором закреплены практические навыки по созданию клиент-серверных приложений для работы с базами данных на основе SQL-сервера InterBase, полученные на занятиях в УЦКО «Турбо».


13

Литература

  1. Архангельский А. Я. Программирование в Delphi 7. – М.: ООО "Бином-Пресс", 2003 г. – 1152 с.
  2. Кандзюба С. П., Громов В. Н. Delphi 6. Базы данных и приложения. Лекции и упражнения. – К.: Издательство «ДиаСофт», 2001. – 576 с.
  3. Сурков К. А., Сурков Д. А., Вальвачёв А. Н. Программирование в среде Delphi. – Мн.: ООО "Попурри", 1977. – 640 с.
  4. Фаронов В. В. Программирование баз данных в Delphi 6. Учебный курс. – СПб.: Питер, 2002. –352 с.
  5. Хендерсон К. Руководство разработчика баз данных в Delphi. – К.: Диалектика, 1966. – 544 с.
  6. Хомоненко А. Д. идр. Delphi 7 / Под общ. ред. А. Д. Хомоненко. – СПб.: БХВ-Петербург, 2004. – 1216 с.



14