Курсовые работы / ПРИС П _7
.pdf
1.4 Модели данных по стандарту IDEF.1X диаграммы "сущность-связь"
Для наглядного представления информационной системы разработаны два вида схем данных: логическая (рисунок 2.1)и физическая (рисунок 2.2).
Рисунок 2.1 – Логическая схема данных
Рисунок 2.1 – Физическая схема данных
1.5Описание таблиц базы данных
Для работоспособности информационной системы нужно создать в MSOfficeAccess 9 таблиц и программы в Delphi 7 с необходимым количеством окон, для вывода информации, меню.
Схема данных моделируемой базы данных представлена на рисунке 2.3.
11
Рисунок 2.3 – Схема данных
Таблица avto необходима для хранения информации об автомобилях, марка, номера, грузоподъемность, типи содержит в себе 6 полей (рисунок 2.3).
Рисунок 2.3 – Таблица avto
Таблица Водители необходима для хванения информации о сотрудниках, содержит полей (рисунок 2.4).
12
Рисунок 2.4 – Таблица Водители
Таблица Маршруты необходима для хранения о направлениях, ценах и времени в пути и содержит в себе 6 полей (рисунок 2.5).
Рисунок 2.5 – Таблица Маршруты
Таблица Груз хранит информацию о грузах и его хакактеристиках и содержит в себе 5 полей (рисунок 2.6).
Рисунок 2.6 – Таблица Груз
Таблица klassсодержит информацию о уровне водителей и состоит из двух полей (рисунок 2.7).
13
Рисунок 2.7 – Таблица klass
Таблица passсодержит данные о пользователях и паролях и состоит из трех
полей(рисунок 2.8).
Рисунок 2.8 – Таблица pass
Таблица reisхранит данные о совершенных рейсах и состоит из 9 полей (рисунок 2.9).
Рисунок 2.9 – Таблица reis
Таблица SlozM хранит данные о уровне сложности маршрутов и содержит 2 поля (рисунок 2.10).
14
Рисунок 2.10 – ТаблицаSlozM
Таблица Trebov хранит данные о требованиях к грузам и состоит из двух полей (рисунок 2.11).
Рисунок 2.11 – Таблица Trebov
Для исключения некорректного ввода данных, в некоторых полях есть автоподбор.
1.6 Дерево программных модулей
Данный проект состоит из 15 Units и соответственно из 15 модуля. На рисунке 2.12 представлен ProjectManager – состав модулей нашего проекта [3].
Рисунок 2.12ProjectManager На рисунке 2.13 представлено дерево модулей.
15
Рисунок 2.13 – Дерево модулей
1.7 Схемы взаимосвязей модулей и массивов данных На рисунке представлена схема взаимосвязи модулей и массивов данных.
1.8Блок-схема построения отчета об совершенных рейсах за заданный период
сподсчетом общей суммы
16
Рассмотрим модуль, который отвечает за создание отчета «Водители, совершившие перевозки за период». Листингданногомодуляпредставленниже.
procedure Totch1.Button2Click(Sender: TObject); begin
close;
end;
procedure Totch1.Button1Click(Sender: TObject); var dataN,dataK:string;
begin data_d:=dtp1.date; main.perdate; dataN:=data_s; data_d:=dtp2.date; main.perdate; dataK:=data_s;
if cb.Visible=true then begin
if cb.Text='' then begin
showmessage('Вы не выбрали маршрут'); exit;
end;
Vodila.Panel1.Enabled:=false;
Vodila.Panel2.Enabled:=false; id_kl:='0';
if dm.vod.Active=true then dm.vod.Active:=false; dm.vod.CommandText:='SELECT DISTINCT id_vod,fio_vod,dr_vod,nazv_kl,staz_vod,tel_vod FROM Klass,Vodila,reis WHERE (id_kl = id_kl_vod) AND (id_kl_vod >= '+id_kl+') AND (id_vod = id_vod_r) AND(id_mn_r in (select id_mn FROM Marsh WHERE nazv_mn = "'+cb.Text+'")) AND (data_r Between #'+dataN+'# AND #'+dataK+'#)';
dm.vod.Active:=true;
Vodila.ShowModal; end
else begin
if tm=0 then begin
if dm.edit.Active=true then dm.edit.Active:=false;
dm.edit.CommandText:='SELECT fio_vod,sum(km_mn) FROM Vodila,reis,marsh WHERE (id_vod = id_vod_r) AND (id_mn = id_mn_r) AND (data_r Between #'+dataN+'# AND #'+dataK+'#) GROUP BY fio_vod ORDER BY sum(km_mn) desc';
dm.edit.Active:=true;
showmessage('Водитель: '+dm.Edit.Fields[0].AsString+' проехал '+dm.Edit.Fields[1].AsString+' км.');
end else begin
dm.edit.Active:=false;
dm.edit.CommandText:='SELECT nazv_mn,sum(st_r) FROM marsh,reis WHERE (id_mn = id_mn_r) AND (data_r Between #'+dataN+'# AND #'+dataK+'#) GROUP BY nazv_mn ORDER BY sum(st_r) desc';
dm.edit.Active:=true;
showmessage('Маршрут: '+dm.Edit.Fields[0].AsString+' Принес '+dm.Edit.Fields[1].AsString+' руб.');
end;
end;
end;
procedure Totch1.FormShow(Sender: TObject); begin
dtp1.Date:=date;
dtp2.Date:=date;
cb.Clear;
if dm.Edit.Active=true then dm.Edit.Active:=false; dm.Edit.CommandText:='Select nazv_mn FROM marsh';
dm.Edit.Active:=true; While not dm.Edit.Eof do begin
otch1.cb.Items.Add(dm.Edit.Fields[0].AsString);
dm.Edit.Next;
end;
end;
end.
Блок схема алгоритма представлена на рисунке 3.1.
17
Рисунок 3.1 – Блок-схема алгоритма
1.9 Инструкция пользователя по установке программного продукта и работе с системой
Требования к аппаратным средствам:
-процессор Pentium 1700 Hz и выше;
-объем оперативной памяти – 128 Мб и более;
-объем свободной памяти – 100 Мб и более. Требуемые программные средства: -MSAccess 2000 (и выше версии);
-MSWord 2000 (и выше версии).
Установка программы осуществляется следующим образом:
1.Создать папку.
18
2.Скопировать в созданную папку программу Gruz.exe, базу данных
base.mdb, а также конфигурационный файл options.ini, в котором указать путь к этой базе данных [4].
При запуске программы появляется окно идентификации пользователя, показанное на рисунке 3.2.
Рисунок 3.2 – Идентификация пользователя
Система включает 3 пользователей, у каждого из которых свой пароль, по умолчанию они следующие:
-Администратор – «1»;
-Менеджер – «2»;
-Гость – пустой пароль.
После входа в систему перед пользователем появляется главное окно программы, представленное на рисунке 3.3. У разных пользователей разные полномочия в данной системе (рисунок 3.4-3.5)
Рисунок 3.3 – Главная форма
19
Рисунок 3.4 – Меню для пользователя Администратор
Рисунок 3.5 – Меню для пользователя Гость Меню главной формы состоит из следующих пунктов, которые описаны ниже. 1. Программа:
-Выход – приложение закрывается. 2. Справочники:
-Характеристика груза – справочник, содержащий информацию о всех зарактеристиках груза. При нажатии на данный пункт меню открывается форма, представленная на рисунке 3.6.
20