Разработка ИС «Электронная Библиотека»

Автор работы: Пользователь скрыл имя, 19 Апреля 2012 в 22:29, курсовая работа

Краткое описание

Цель этой курсовой работы – проектирование ИС «Электронная Библиотека». Читатель просматривает каталог библиотеки и оформляет заявку на книгу. При этом вносятся изменения непосредственно в статус заявки книги, т.е. (обработка, выполнение и готова). При этом, каждая книга имеет свой артикул, свое название и описание. Соответственно, в одной заявке может быть сразу несколько книг, а значит, соответственно, может быть и несколько артикулов. Также указывается дата оформления и выдачи книг.

Содержание работы

1. Описание предметной области
2. Средства программной реализации
3. Разработка реляционной базы данных в среде ER-Win
3.1 Диаграмма сущностей с описанием
3.2 Диаграмма отношений между сущностями
3.3 Диаграмма ключевых атрибутов
3.4 Диаграмма всех атрибутов и сущностей
3.5 Физическое представление
3.6 Набор SQL-запросов, создающих структуру БД
4. Разработка и проектирование БД в среде Rational Rose
4.1 Диаграмма прецедентов
4.2 Описание потока событий
4.3 Диаграмма последовательностей
4.4 Диаграмма состояний
4.5 Диаграмма действий
4.6 Диаграмма классов
4.7 Набор SQL-запросов для создания структуры БД
5. Интерфейс БД
5.1 Форма «в столбец» на основе таблицы «товар»
5.2 Ленточная форма на основе таблицы «клиенты»
5.3 Форма на основе таблицы «заказы»
Заключение
Список литературы

Скачать целиком (276.46 Кб) Сколько стоит заказать работу?
Содержимое работы - 1 файл

наш курсовик - до sql запросов.doc

— 379.50 Кб (Скачать файл)


ФЕДЕРАЛЬНОЕ АГЕНТСТВО ПО ОБРАЗОВАНИЮ

Государственное образовательное учреждение высшего профессионального образования

САНКТ-ПЕТЕРБУРГСКИЙ ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ
АЭРОКОСМИЧЕСКОГО ПРИБОРОСТРОЕНИЯ

КАФЕДРА №82

КУРСОВАЯ РАБОТА 
ЗАЩИЩЕНА С ОЦЕНКОЙ

РУКОВОДИТЕЛЬ

 

 

 

 

 

должность, уч. степень

 

подпись, дата

 

инициалы, фамилия

 

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

 

 

Разработка ИС «Электронная Библиотека»

 

 

по дисциплине: ПРОЕКТИРОВАНИЕ ИНФОРМАЦИОННЫХ СИСТЕМ

 

 

РАБОТУ ВЫПОЛНИЛИ:

СТУДЕНТЫ  ГР.

 

 

              

 

 

 

 

 

подпись, дата

 

инициалы, фамилия

 

 

Санкт-Петербург
2010


Оглавление

 

Оглавление

1. Описание предметной области

2. Средства программной реализации

3. Разработка реляционной базы данных в среде ER-Win

3.1 Диаграмма сущностей с описанием

3.2 Диаграмма отношений между сущностями

3.3 Диаграмма ключевых атрибутов

3.4 Диаграмма всех атрибутов и сущностей

3.5 Физическое представление

3.6 Набор SQL-запросов, создающих структуру БД

4. Разработка и проектирование БД в среде Rational Rose

4.1 Диаграмма прецедентов

4.2 Описание потока событий

4.3 Диаграмма последовательностей

4.4 Диаграмма состояний

4.5 Диаграмма действий

4.6 Диаграмма классов

4.7 Набор SQL-запросов для создания структуры БД

5. Интерфейс БД

5.1 Форма «в столбец» на основе таблицы «товар»

5.2 Ленточная форма на основе таблицы «клиенты»

5.3 Форма на основе таблицы «заказы»

Заключение

Список литературы


 

1. О предметной области

 

Цель этой курсовой работы – проектирование ИС «Электронная Библиотека». Читатель просматривает каталог библиотеки и оформляет заявку на книгу. При этом вносятся изменения непосредственно в статус заявки книги, т.е. (обработка, выполнение и готова). При этом, каждая книга имеет свой артикул, свое название и описание. Соответственно, в одной заявке может быть сразу несколько книг, а значит, соответственно, может быть и несколько артикулов. Также указывается дата оформления и выдачи книг.

 

 

2. Средства программной реализации

 

Программная реализация электронной библиотеки выполнена с помощью следующих сред:

- ER-Win

- BP-Win

- Rational Rose

 

ER-Win - CASE-средство  разработки структуры базы данных. Сочетает графический интерфейс Windows, инструменты для построения ER-диаграмм, редакторы для создания логического и физического описания модели данных и поддержку ведущих реляционных СУБД и настольных баз данных. С помощью ER-Win можно создавать или проводить обратное проектирование (реинжиниринг) баз данных.

BPwin - инструмент для моделирования, анализа, документирования и оптимизации бизнес-процессов. AllFusion Process Modeler 7 можно использовать для графического представления бизнес-процессов. Графически представленная схема выполнения работ, обмена информацией, документооборота визуализирует модель бизнес-процесса. Графическое изложение этой информации позволяет перевести задачи управления организацией из области сложного ремесла в сферу инженерных технологий.

Rational Rose – популярное средство визуального моделирования объектно-ориентированных информационных систем. Работа продукта основана на универсальном языке моделирования UML (Universal Modeling Language), благодаря которому Rational Rose способен решать практически любые задачи в проектировании ИС: от анализа бизнес-процессов до кодогенерации на определенном языке программирования.


3. Разработка реляционной базы данных в среде ER-Win

 

 

3.1 Диаграмма сущностей с описанием

 

 

 

 

 

3.2 Диаграмма отношений между сущностями

 

 

 

 

 

 

 

 

 

 

 

 

3.3 Диаграмма ключевых атрибутов

 

 

 

3.4 Диаграмма всех атрибутов и сущностей

 

 

 

 

 

 

 

 

 

 

 

 

 

 

3.5 Физическое представление

 

 

 

3.6 Набор SQL-запросов, создающих структуру БД

 

'  Starting Access Basic DAO Session...

 

Dim ERwinWorkspace As Workspace

Dim ERwinDatabase As Database

Dim ERwinTableDef As TableDef

Dim ERwinQueryDef As QueryDef

Dim ERwinIndex As Index

Dim ERwinField As Field

Dim ERwinRelation As Relation

 

Set ERwinWorkspace = DBEngine.WorkSpaces(0)

 

Set ERwinDatabase = ERwinWorkspace.OpenDatabase(sERwinDatabase)

 

'  CREATE TABLE "заказы"

Set ERwinTableDef = ERwinDatabase.CreateTableDef("заказы")

Set ERwinField = ERwinTableDef.CreateField("kod_z", DB_LONG)

ERwinTableDef.Fields.Append ERwinField

Set ERwinField = ERwinTableDef.CreateField("data_z", DB_DATETIME)

ERwinTableDef.Fields.Append ERwinField

Set ERwinField = ERwinTableDef.CreateField("status", DB_TEXT, 20)

ERwinTableDef.Fields.Append ERwinField

Set ERwinField = ERwinTableDef.CreateField("cost", DB_CURRENCY)

ERwinTableDef.Fields.Append ERwinField

Set ERwinField = ERwinTableDef.CreateField("data_v", DB_DATETIME)

ERwinTableDef.Fields.Append ERwinField

Set ERwinField = ERwinTableDef.CreateField("kod_m", DB_LONG)

ERwinTableDef.Fields.Append ERwinField

ERwinDatabase.TableDefs.Append ERwinTableDef

Set ERwinField = ERwinTableDef.Fields("kod_z")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "kod zakaza:")

Set ERwinField = ERwinTableDef.Fields("data_v")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "дата выдачи:")

Set ERwinField = ERwinTableDef.Fields("data_z")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "дата заказа:")

Set ERwinField = ERwinTableDef.Fields("status")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "статус:")

Set ERwinField = ERwinTableDef.Fields("cost")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "стоимость:")

Set ERwinField = ERwinTableDef.Fields("kod_m")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "код магазина:")

 

'  CREATE INDEX "PrimaryKey"

 

Set ERwinTableDef = ERwinDatabase.TableDefs("заказы")

Set ERwinIndex = ERwinTableDef.CreateIndex("PrimaryKey")

Set ERwinField = ERwinIndex.CreateField("kod_z")

ERwinIndex.Fields.Append ERwinField

ERwinIndex.Primary = True

ERwinIndex.Clustered = True

ERwinTableDef.Indexes.Append ERwinIndex

 

'  CREATE TABLE "клиенты"

Set ERwinTableDef = ERwinDatabase.CreateTableDef("клиенты")

Set ERwinField = ERwinTableDef.CreateField("kod_klienta", DB_LONG)

ERwinTableDef.Fields.Append ERwinField

Set ERwinField = ERwinTableDef.CreateField("name", DB_TEXT, 20)

ERwinTableDef.Fields.Append ERwinField

Set ERwinField = ERwinTableDef.CreateField("e-mail", DB_TEXT, 20)

ERwinTableDef.Fields.Append ERwinField

Set ERwinField = ERwinTableDef.CreateField("phone", DB_LONG)

ERwinTableDef.Fields.Append ERwinField

ERwinDatabase.TableDefs.Append ERwinTableDef

Set ERwinField = ERwinTableDef.Fields("kod_klienta")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "код клиента:")

Set ERwinField = ERwinTableDef.Fields("name")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "имя:")

Set ERwinField = ERwinTableDef.Fields("phone")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "телефон:")

 

'  CREATE INDEX "PrimaryKey"

 

Set ERwinTableDef = ERwinDatabase.TableDefs("клиенты")

Set ERwinIndex = ERwinTableDef.CreateIndex("PrimaryKey")

Set ERwinField = ERwinIndex.CreateField("kod_klienta")

ERwinIndex.Fields.Append ERwinField

ERwinIndex.Primary = True

ERwinIndex.Clustered = True

ERwinTableDef.Indexes.Append ERwinIndex

 

'  CREATE TABLE "клиенты заказы"

Set ERwinTableDef = ERwinDatabase.CreateTableDef("клиенты заказы")

Set ERwinField = ERwinTableDef.CreateField("kod_klienta", DB_LONG)

ERwinField.Required = True

ERwinTableDef.Fields.Append ERwinField

Set ERwinField = ERwinTableDef.CreateField("kod_z", DB_LONG)

ERwinField.Required = True

ERwinTableDef.Fields.Append ERwinField

ERwinDatabase.TableDefs.Append ERwinTableDef

Set ERwinField = ERwinTableDef.Fields("kod_klienta")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "код клиента:")

Set ERwinField = ERwinTableDef.Fields("kod_z")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "kod zakaza:")

 

'  CREATE INDEX "PrimaryKey"

 

Set ERwinTableDef = ERwinDatabase.TableDefs("клиенты заказы")

Set ERwinIndex = ERwinTableDef.CreateIndex("PrimaryKey")

Set ERwinField = ERwinIndex.CreateField("kod_klienta")

ERwinIndex.Fields.Append ERwinField

Set ERwinField = ERwinIndex.CreateField("kod_z")

ERwinIndex.Fields.Append ERwinField

ERwinIndex.Primary = True

ERwinTableDef.Indexes.Append ERwinIndex

 

'  CREATE TABLE "магазин"

Set ERwinTableDef = ERwinDatabase.CreateTableDef("магазин")

Set ERwinField = ERwinTableDef.CreateField("kod_m", DB_LONG)

ERwinTableDef.Fields.Append ERwinField

Set ERwinField = ERwinTableDef.CreateField("adress", DB_TEXT, 20)

ERwinTableDef.Fields.Append ERwinField

Set ERwinField = ERwinTableDef.CreateField("phone", DB_LONG)

ERwinTableDef.Fields.Append ERwinField

ERwinDatabase.TableDefs.Append ERwinTableDef

Set ERwinField = ERwinTableDef.Fields("kod_m")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "код магазина:")

Set ERwinField = ERwinTableDef.Fields("adress")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "адрес:")

Set ERwinField = ERwinTableDef.Fields("phone")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "телефон:")

 

'  CREATE INDEX "PrimaryKey"

 

Set ERwinTableDef = ERwinDatabase.TableDefs("магазин")

Set ERwinIndex = ERwinTableDef.CreateIndex("PrimaryKey")

Set ERwinField = ERwinIndex.CreateField("kod_m")

ERwinIndex.Fields.Append ERwinField

ERwinIndex.Primary = True

ERwinIndex.Clustered = True

ERwinTableDef.Indexes.Append ERwinIndex

 

'  CREATE TABLE "товар"

Set ERwinTableDef = ERwinDatabase.CreateTableDef("товар")

Set ERwinField = ERwinTableDef.CreateField("artikul", DB_TEXT, 20)

ERwinTableDef.Fields.Append ERwinField

Set ERwinField = ERwinTableDef.CreateField("name", DB_TEXT, 20)

ERwinTableDef.Fields.Append ERwinField

Set ERwinField = ERwinTableDef.CreateField("avtor", DB_TEXT, 20)

ERwinTableDef.Fields.Append ERwinField

Set ERwinField = ERwinTableDef.CreateField("price", DB_CURRENCY)

ERwinTableDef.Fields.Append ERwinField

Set ERwinField = ERwinTableDef.CreateField("opisanie", DB_TEXT, 20)

ERwinTableDef.Fields.Append ERwinField

ERwinDatabase.TableDefs.Append ERwinTableDef

Set ERwinField = ERwinTableDef.Fields("artikul")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "артикул:")

Set ERwinField = ERwinTableDef.Fields("name")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "название:")

Set ERwinField = ERwinTableDef.Fields("avtor")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "автор:")

Set ERwinField = ERwinTableDef.Fields("price")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "цена:")

Set ERwinField = ERwinTableDef.Fields("opisanie")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "описание:")

 

'  CREATE INDEX "PrimaryKey"

 

Set ERwinTableDef = ERwinDatabase.TableDefs("товар")

Set ERwinIndex = ERwinTableDef.CreateIndex("PrimaryKey")

Set ERwinField = ERwinIndex.CreateField("artikul")

ERwinIndex.Fields.Append ERwinField

ERwinIndex.Primary = True

ERwinIndex.Clustered = True

ERwinTableDef.Indexes.Append ERwinIndex

 

'  CREATE TABLE "товар заказы"

Set ERwinTableDef = ERwinDatabase.CreateTableDef("товар заказы")

Set ERwinField = ERwinTableDef.CreateField("artikul", DB_TEXT, 20)

ERwinField.Required = True

ERwinTableDef.Fields.Append ERwinField

Set ERwinField = ERwinTableDef.CreateField("kod_z", DB_LONG)

ERwinField.Required = True

ERwinTableDef.Fields.Append ERwinField

Set ERwinField = ERwinTableDef.CreateField("kol-vo", DB_LONG)

ERwinTableDef.Fields.Append ERwinField

ERwinDatabase.TableDefs.Append ERwinTableDef

Set ERwinField = ERwinTableDef.Fields("artikul")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "артикул:")

Set ERwinField = ERwinTableDef.Fields("kod_z")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "kod zakaza:")

Set ERwinField = ERwinTableDef.Fields("kol-vo")

SetFieldProp (ERwinField, "Caption", DB_TEXT, "количество:")

 

'  CREATE INDEX "PrimaryKey"

 

Set ERwinTableDef = ERwinDatabase.TableDefs("товар заказы")

Set ERwinIndex = ERwinTableDef.CreateIndex("PrimaryKey")

Set ERwinField = ERwinIndex.CreateField("artikul")

ERwinIndex.Fields.Append ERwinField

Set ERwinField = ERwinIndex.CreateField("kod_z")

ERwinIndex.Fields.Append ERwinField

ERwinIndex.Primary = True

ERwinIndex.Clustered = True

ERwinTableDef.Indexes.Append ERwinIndex

 

'  CREATE RELATIONSHIP "выполняет"

Set ERwinRelation = ERwinDatabase.CreateRelation("выполняет", "магазин", "заказы")

Set ERwinField = ERwinRelation.CreateField("kod_m")

ERwinField.ForeignName = "kod_m"

ERwinRelation.Fields.Append ERwinField

ERwinDatabase.Relations.Append ERwinRelation

 

'  CREATE RELATIONSHIP "принадлежат"

Set ERwinRelation = ERwinDatabase.CreateRelation("принадлежат", "заказы", "клиенты заказы")

Set ERwinField = ERwinRelation.CreateField("kod_z")

ERwinField.ForeignName = "kod_z"

ERwinRelation.Fields.Append ERwinField

ERwinDatabase.Relations.Append ERwinRelation

 

'  CREATE RELATIONSHIP "делают заказ"

Set ERwinRelation = ERwinDatabase.CreateRelation("делают заказ", "клиенты", "клиенты заказы")

Set ERwinField = ERwinRelation.CreateField("kod_klienta")

ERwinField.ForeignName = "kod_klienta"

ERwinRelation.Fields.Append ERwinField

ERwinDatabase.Relations.Append ERwinRelation

 

'  CREATE RELATIONSHIP "включают"

Set ERwinRelation = ERwinDatabase.CreateRelation("включают", "заказы", "товар заказы")

Set ERwinField = ERwinRelation.CreateField("kod_z")

ERwinField.ForeignName = "kod_z"

ERwinRelation.Fields.Append ERwinField

ERwinDatabase.Relations.Append ERwinRelation

 

'  CREATE RELATIONSHIP "входит"

Set ERwinRelation = ERwinDatabase.CreateRelation("входит", "товар", "товар заказы")

Set ERwinField = ERwinRelation.CreateField("artikul")

ERwinField.ForeignName = "artikul"

ERwinRelation.Fields.Append ERwinField

Информация о работе Разработка ИС «Электронная Библиотека»