Проектирование (разработка технического проекта)
Возникает диалог ERwin/BPwin Import, в котором отображаются сущности и атрибуты, имеющиеся в BPX файле, но отсутствующие в модели ERwin; имена работ, ассоциированных с сущностями и атрибутами, на основе которых будут созданы предметные области модели данных. После щелчка по кнопке Import на экране появятся четыре сущности с заданными ранее атрибутами. Далее определим типы связей между сущностями… Читать ещё >
Проектирование (разработка технического проекта) (реферат, курсовая, диплом, контрольная)
В первой главе было разработано Техническое задание. В нем были изложены требования к проектируемой системе. На основании этих требований спроектируем архитектуру системы.
Разобьем систему на отдельные модули:
Проектируемая система состоит из 3 модулей: каталог документов, список сотрудников, список отделов.
- 1. Каталог документов является основным модулем системы. В этом модуле происходит ввод и удаление информации о поступающих документах. Выходным документом является отчет о документах.
- 2. Список сотрудников — не менее важный модуль. Здесь хранятся данные о сотрудниках, данные о документе с которым работал сотрудник и в каком отделе он работает.
- 3. Список отделов является лишь информационным модулем. В нем представлены названия отделов и их контактные телефоны.
Технический проект
Разработаем логическую модель архитектуры системы.
Для начала определим основные сущности. Для редактирования сущностей следует выбрать пункт меню Dictionary/Entity. Появится диалог Entity Dictionary — словарь сущностей. Для экспорта в Erwin в этом словаре следует создать новую сущность, которая может быть использована для ассоциации со стрелками сразу же после создания. Сущностями являются основные объекты предметной области, которые могут интересовать пользователя. Для создаваемого проекта выделим следующие сущности: документы, сотрудники, отделы (Рис.4).
Рис. 4. Словарь сущностей
Далее определим атрибуты сущностей. Атрибут должен описывать свойство, качество, идентификатор или характеристику сущности. Для редактирования атрибутов предварительно созданных сущностей служит словарь атрибутов (пункт меню Dictionary/Entity/Attribute). (Рис.5).
Колонка Entity диалога Attribute Dictionary служит для связывания созданного атрибута с сущностью. В раскрывающемся списке, который появляется, когда фокус установлен на поле Entity таблицы, показываются только те сущности, которые созданы в диалоге Entity Dictionary.
Для экспорта данных в BPwin следует выбрать меню File/Export/Erwin 4.0(BPX) и указать файл в который будет выгружена информация о модели.
В Erwin следует выбрать меню File/Import/BPwin и указать файл *.BPX, в который была выгружена информация о модели.
Возникает диалог ERwin/BPwin Import, в котором отображаются сущности и атрибуты, имеющиеся в BPX файле, но отсутствующие в модели ERwin; имена работ, ассоциированных с сущностями и атрибутами, на основе которых будут созданы предметные области модели данных. После щелчка по кнопке Import на экране появятся четыре сущности с заданными ранее атрибутами.
Далее определим типы связей между сущностями. Сущность документы связана с сущностью сотрудники связью один ко многим. То есть один документ обрабатывается многими сотрудниками. Сущность Отделы также связана с сущностью сотрудники связью один ко многим. То есть один отдел содержит много сотрудников.
На основании логической модели сформируем физическую модель. В физической модели сущности являются таблицами базы данных, а их атрибуты — полями. (Рис.6).
Рис. 6. Физическая модель данных
После построения логической и физической моделей необходимо создать скрипт на языке SQL.
Для этого на физическом уровне модели выберем пункт меню Choose DataBase и в открывшемся окне выберем Access 97. Далее выберем пункт меню DataBase Connection, в котором указываем путь предварительно созданной БД и нажать Connect. Затем в пункте меню Tools/Forward Engineer/Schema Generation. После выставления в нужных полях «галочек» нажимаем кнопку Generate. При этом программа будет останавливаться на каждой ошибке при генерации. Чтобы продолжить генерацию следует нажать кнопку Continue. В результате получается скрипт SQL.
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 («C:Documents and SettingsSeregaРабочий столшвецов. mdb»).
' CREATE TABLE «Документы» .
Set ERwinTableDef = ERwinDatabase. CreateTableDef («Документы»).
Set ERwinField = ERwinTableDef. CreateField («Хозяйство», DB_TEXT, 18).
ERwinTableDef.Fields.Append ERwinField.
Set ERwinField = ERwinTableDef. CreateField («Дата», DB_DATETIME).
ERwinTableDef.Fields.Append ERwinField.
Set ERwinField = ERwinTableDef. CreateField («Название», DB_TEXT, 18).
ERwinTableDef.Fields.Append ERwinField.
Set ERwinField = ERwinTableDef. CreateField («Номер документа», DB_LONG).
ERwinField.Required = True.
ERwinTableDef.Fields.Append ERwinField.
Set ERwinField = ERwinTableDef. CreateField («Сумма», DB_LONG).
ERwinTableDef.Fields.Append ERwinField.
Set ERwinField = ERwinTableDef. CreateField («Ответственное лицо», DB_TEXT, 18).
ERwinTableDef.Fields.Append ERwinField.
ERwinDatabase.TableDefs.Append ERwinTableDef.
' CREATE INDEX «PrimaryKey» .
Set ERwinTableDef = ERwinDatabase. TableDefs («Документы»).
Set ERwinIndex = ERwinTableDef. CreateIndex («PrimaryKey»).
Set ERwinField = ERwinIndex. CreateField («Номер документа»).
ERwinIndex.Fields.Append ERwinField.
ERwinIndex.Primary = True.
ERwinTableDef.Indexes.Append ERwinIndex.
' CREATE TABLE «Отделы» .
Set ERwinTableDef = ERwinDatabase. CreateTableDef («Отделы»).
Set ERwinField = ERwinTableDef. CreateField («Телефон», DB_LONG).
ERwinTableDef.Fields.Append ERwinField.
Set ERwinField = ERwinTableDef. CreateField («Название отдела», DB_TEXT, 18).
ERwinTableDef.Fields.Append ERwinField.
Set ERwinField = ERwinTableDef. CreateField («Код отдела», DB_LONG).
ERwinField.Required = True.
ERwinTableDef.Fields.Append ERwinField.
ERwinDatabase.TableDefs.Append ERwinTableDef.
' CREATE INDEX «PrimaryKey» .
Set ERwinTableDef = ERwinDatabase. TableDefs («Отделы»).
Set ERwinIndex = ERwinTableDef. CreateIndex («PrimaryKey»).
Set ERwinField = ERwinIndex. CreateField («Код отдела»).
ERwinIndex.Fields.Append ERwinField.
ERwinIndex.Primary = True.
ERwinTableDef.Indexes.Append ERwinIndex.
' CREATE TABLE «Сотрудники» .
Set ERwinTableDef = ERwinDatabase. CreateTableDef («Сотрудники»).
Set ERwinField = ERwinTableDef. CreateField («Должность», DB_TEXT, 18).
ERwinTableDef.Fields.Append ERwinField.
Set ERwinField = ERwinTableDef. CreateField («Номер документа», DB_LONG).
ERwinField.Required = True.
ERwinTableDef.Fields.Append ERwinField.
Set ERwinField = ERwinTableDef. CreateField («Код отдела», DB_LONG).
ERwinField.Required = True.
ERwinTableDef.Fields.Append ERwinField.
Set ERwinField = ERwinTableDef. CreateField («Отчество», DB_TEXT, 18).
ERwinTableDef.Fields.Append ERwinField.
Set ERwinField = ERwinTableDef. CreateField («Имя», DB_TEXT, 18).
ERwinTableDef.Fields.Append ERwinField.
Set ERwinField = ERwinTableDef. CreateField («Дата рождения», DB_DATETIME).
ERwinTableDef.Fields.Append ERwinField.
Set ERwinField = ERwinTableDef. CreateField («Фамилия», DB_TEXT, 18).
ERwinTableDef.Fields.Append ERwinField.
Set ERwinField = ERwinTableDef. CreateField («Табельный номер», DB_LONG).
ERwinField.Required = True.
ERwinTableDef.Fields.Append ERwinField.
ERwinDatabase.TableDefs.Append ERwinTableDef.
' CREATE INDEX «PrimaryKey» .
Set ERwinTableDef = ERwinDatabase. TableDefs («Сотрудники»).
Set ERwinIndex = ERwinTableDef. CreateIndex («PrimaryKey»).
Set ERwinField = ERwinIndex. CreateField («Табельный номер»).
ERwinIndex.Fields.Append ERwinField.
Set ERwinField = ERwinIndex. CreateField («Номер документа»).
ERwinIndex.Fields.Append ERwinField.
Set ERwinField = ERwinIndex. CreateField («Код отдела»).
ERwinIndex.Fields.Append ERwinField.
ERwinIndex.Primary = True.
ERwinTableDef.Indexes.Append ERwinIndex.
' CREATE INDEX «XIF3Сотрудники» .
Set ERwinTableDef = ERwinDatabase. TableDefs («Сотрудники»).
Set ERwinIndex = ERwinTableDef. CreateIndex («XIF3Сотрудники»).
Set ERwinField = ERwinIndex. CreateField («Номер документа»).
ERwinIndex.Fields.Append ERwinField.
ERwinTableDef.Indexes.Append ERwinIndex.
' CREATE INDEX «XIF4Сотрудники» .
Set ERwinTableDef = ERwinDatabase. TableDefs («Сотрудники»).
Set ERwinIndex = ERwinTableDef. CreateIndex («XIF4Сотрудники»).
Set ERwinField = ERwinIndex. CreateField («Код отдела»).
ERwinIndex.Fields.Append ERwinField.
ERwinTableDef.Indexes.Append ERwinIndex.
' DELETE RELATIONSHIP «содержат» .
ERwinDatabase.Relations.Delete «содержат» .
' CREATE RELATIONSHIP «содержат» .
Set ERwinRelation = ERwinDatabase. CreateRelation («содержат», «Отделы», «Сотрудники»).
Set ERwinField = ERwinRelation. CreateField («Код отдела»).
ERwinField.ForeignName = «Код отдела» .
ERwinRelation.Fields.Append ERwinField.
ERwinDatabase.Relations.Append ERwinRelation.
' DELETE RELATIONSHIP «обрабатывают» .
ERwinDatabase.Relations.Delete «обрабатывают» .
' CREATE RELATIONSHIP «обрабатывают» .
Set ERwinRelation = ERwinDatabase. CreateRelation («обрабатывают», «Документы», «Сотрудники»).
Set ERwinField = ERwinRelation. CreateField («Номер документа»).
ERwinField.ForeignName = «Номер документа» .
ERwinRelation.Fields.Append ERwinField.
ERwinDatabase.Relations.Append ERwinRelation.
ERwinDatabase.Close.
ERwinWorkspace.Close.
' Terminating Access Basic DAO Session…
После того, как была построена физическая модель данных, можно представить себе как будет выглядеть будущая база данных. А на основании базы данных должно быть создано приложение на языке Visual Basic для управления этой базой. Ниже приведен прототип пользовательского интерфейса (Рис. 7).
Рис. 7. Экранная форма