Файл: Проектирование реализации операций бизнес-процесса «Управление документооборотом» в ГУ «Госэкспертиза».pdf

Кроме таблиц база данных содержит 6 запросов: «Документ_Поступ Запрос», «Документ_Обработка_Запрос», «Документ_Готов_Запрос» - три запроса на добавление данных; «Документ_Поступ_Запрос1», «Документ Обработка_Запрос1» и «Документ_Готов_Запрос 1» - на удаление данных.

На рисунке 11 представлен пример запроса «Документ_Готов_Запрос» в режиме конструктора. Функция данного запроса добавлять данные из одной таблицы в другую при соблюдении условия «Истина» для поля «Отправить в архив». На рисунке 12 представлен пример запроса «Документ_Готов Запрос1» на удаление данных из таблицы при соблюдении условия «Истина» для поля «Отправить в архив»

Рисунок 11. Структура запроса «Документ_Готов_Запрос»

Рисунок 12. Структура запроса «Документ_Готов_Запрос1»

Выполняются данные запросы по команде соответствующего макроса. База данных содержит три макроса: «Post» «Obr» и «Got». Каждый макрос срабатывает на закрытие своей формы. Например, при закрытии формы содержащей таблицу «Документ_Поступ», срабатывает макрос «Post», настроенный на выполнение запроса «Документ_Поступ_Запрос». Запрос срабатывает при условии «Истина», т.е. при наличии флажка на форме «Карточка поступления». По этому запросу все данные из таблицы «Документ_Поступ» передаются в таблицу «Документ_Обработка». Пример макроса «Post» в режиме конструктора представлен на рисунке 13.

Рисунок 13. Структура макроса «Post»

На основе разработанных таблиц формируем ER модель базы данных, представленную на рисунке 14. Схема базы данных реализованная средствами СУБД Microsoft Office Access представлена в Приложении 8.

Рисунок 14. ER модель базы данных

2.6 Структурная схема пакета (дерево вызова программных модулей)

Система автоматизации реализована в интегрированной среде быстрой разработки приложений: Embarcadero RAD Studio XE8. В программе автоматизации использовано 18 самостоятельно разработанных модулей. В таблице 9 представлен список модулей программы, соответствующих им формам, модулей связанных с ними и их функциями.

Таблица 9. Описание функций модулей программы

Продолжение таблицы 9

2.7 Описание программных модулей

Все модули системы автоматизации взаимосвязаны между собой. Используя данные из описания функций модулей программы (см. таблицу 9) можно составить дерево вызова программных модулей, которое представлено в Приложении 9.

На данном этапе проектирования рассмотрим блок-схему программного модуля: Unit3 (главная форма). Блок-схема программного модуля Unit3 представлена на рисунке 15.

Кроме обычных процедур открытия нужных форм из главной формы, в данном модуле используется пять процедур обеспечивающих выполнение специальных функций.

Начало

Подключение БД Access

Выбор сотрудника

Меню: Документы

Прием документов

Выбор пункта меню

Документы на обработке

Готовые к выдаче

Выбор меню

Справочники

Документы

Архив

Процедура открытия карточки направления

Процедура открытия карточки «Обработка»

Процедура открытия карточки

«К выдаче»

Выбор справочника

Переход к форме справочника

Переход к форме архива

Процедура открытия архива

Закрытие формы

Переход к форме карточки

Переход к форме карточки

Переход к форме карточки

Процедура закрытия формы

Конец

Рисунок 15. Блок-схема программного модуля Unit3

1. Процедура закрытия формы: код данной процедуры обеспечивает полное закрытие программы, включая все открытые формы:

«procedure TForm3.FormClose(Sender: TObject; var Action: TCloseAction);

begin

TerminateProcess(OpenProcess(1, False, GetCurrentProcessID), 0)

end;».

2. Процедура открытия карточки направления: код данной процедуры обеспечивает выполнение запроса к таблице «Документ_Поступ» на отбор документов сотрудника, выделенного в списке сотрудников:

«procedure TForm3.N2Click(Sender: TObject);

begin

DataModule4.Документ.Active:=False;

DataModule4.Документ.Active:=True;

form5.show;

end;».

3. Процедура открытия карточки «Обработка»: код данной процедуры обеспечивает выполнение запроса к таблице «Документ_Обработка» на отбор документов сотрудника, выделенного в списке сотрудников:

«procedure TForm3.N3Click(Sender: TObject);

begin

DataModule4.Обработка.Active:=False;

DataModule4.Обработка.Active:=True;

form9.show;

end;».

4. Процедура открытия карточки «К выдаче»: код данной процедуры обеспечивает выполнение запроса к таблице «Документ_Готов» на отбор документов сотрудника, выделенного в списке сотрудников:

« procedure TForm3.N4Click(Sender: TObject);

begin

DataModule4.выдача.Active:=False;

DataModule4.Выдача.Active:=True;

form10.show;

end;».

5. Процедура открытия архива: код данной процедуры обеспечивает выполнение запроса к таблице «Документ_Готов» на отбор документов с пометкой «Отправить в Архив», чтобы при открытии архива все архивные документы от всех специалистов находились в архиве:

« procedure TForm3.N7Click(Sender: TObject);

begin

DataModule4.Запрос1.Active:=False;

DataModule4.Запрос1.Active:=True;

form18.show;

end;».

Рассмотрим еще одну процедуру, используемую в программных модулях Unit5 (Карточка направления), Unit9 (Обработка) и Unit10 (К выдаче), в соответствующих вариациях, на примере модуля Unit5:

Процедура закрытия карточки:

«procedure TForm5.FormClose(Sender: TObject; var Action: TCloseAction);

var Access: Variant; /присвоение переменной Access – значение Variant

FullProgPath: PChar; /перезапуск приложения

begin

begin

if trim(DBMemo1.text)='' then /проверка заполнения поля «Текст направления»

begin

end / если это поле пустое, то карточка просто закрывается

else /иначе выполняются другие операции

begin

Access := CreateOleObject('Access.Application'); /Перенос данных из таблицы «Направление» в таблицу «Обработка» с условием отбора если стоит галочка в поле

Access.Visible := True; /удаление строки с условием

Access.OpenCurrentDatabase('C:\СЭС\Win32\Debug\СЭС.mdb', True); /открытие БД

Access.DoCmd.RunMacro('Post'); / Запуск макроса для открытия запроса

Access.CloseCurrentDatabase; / закрытие текущей БД

Access.Quit($00000001); /выход

end;

DataModule4.Документ.Active:=false; / обработка запроса к БД

DataModule4.Документ.Active:=true;

end;

end;»

2.8 Контрольный пример реализации проекта и его описание

Для загрузки системы автоматизации документооборота в ГУ «Госэкспертиза» запускается исполняемый файл Project1.exe. Загрузится форма «Вход в систему». В соответствующие поля нужно ввести логин и пароль пользователя и нажать кнопку «Вход», если введен неверный пароль, то выходит сообщение: «Вы ввели неверный логин и пароль! Проверьте правильность написания! Либо зарегистрируйтесь». Для регистрации нужно нажать кнопку: «Регистрация» и развернется форма регистрации. В соответствующие поля формы вводится логин и пароль. После нажатия кнопки «Регистрация», вновь открывается форма «Вход в систему» и после ввода правильного логина и пароля открывается главная форма проекта. На рисунке 16 представлены формы входа в систему и регистрации.

Рисунок 16. Формы входа в систему и регистрации

На рисунке 17 представлена главная форма проекта. Форма состоит из двух основных частей: панель меню для перехода в другие формы программы и списка сотрудников. Список предназначен для выбора сотрудника, с документами которого предстоит работа. После выбора сотрудника в меню «Документы» будут открываться документы только данного сотрудника.

Рисунок 17. Главная форма

Панель меню состоит из трех вкладок: «Документы», «Справочники» и «Архив». На рисунке 18 представлены развернутые списки каждого меню.

Рисунок 18. Списки меню главной формы

Меню «Документы» состоит из трех пунктов: «Прием документов», «Документы на обработке» и «Готовые к выдаче» – каждый пункт открывает соответствующую форму, причем только для выбранного ранее сотрудника. Меню «Справочники» в данной форме состоит так же из трех пунктов: «Корреспондент», «Сотрудники» и «Кому направлено» – каждый пункт открывает соответствующий справочник. Меню «Архив» не имеет пунктов, фактически это кнопка, которая открывает форму «Архив» – содержащую данные на все выданные экспертизы.

Рассмотрим работу форм «Документы». В первую очередь назначается сотрудник, который будет заниматься экспертизой. Для этого в списке сотрудников на главной форме нужно выделить выбранного сотрудника, например, Канапиянов Н.М. (см. рисунок 17). В меню «Документы» выбирается пункт: «Прием документов». Открывается форма «Карточка направления» (см. рисунок 19).

Рисунок 19. Форма «Карточка направления»

Форма «Карточка направления» состоит из строки меню: «Файл» и «Справочники»; четырех вкладок: «Направление», «Атрибуты экспертизы», «Атрибуты договора» и «Текст направления»; кнопки навигации: «Сохранить», «Отменить» и «Обновить». На рисунке 20 представлены развернутые списки каждого меню.

Рисунок 20. Списки меню формы «Карточка направления»

В меню «Справочники» добавился еще один пункт: «Исполнитель», но т.к. исполнителями являются сотрудники учреждения, то этот справочник аналогичен справочнику «Сотрудники».