Информационная система медицинская регистратура

Система реализована через интегрированную среду разработки Borland Delphi 7, запрограммированную на языке Object Pascal с функциями Microsoft Access и выполняет следующие задачи:

• -    Ведение учета пациентов, которые приходят к специалисту;

• -    Возможность быстрого поиска нужных данных по определенным критериям;

• -    Представление данных о пациентах;

• -    Ведение медицинских карт;

• -    Возможность настройки программы под индивидуальное место регистрации медицинского учреждения [4].

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

Описание программных форм

В разработанной программе используется 31 форма. Есть 9 основных объектов, в том числе и главная. Основные формы: список пациентов, медкарта, специалисты, список специалистов по отделениям, график работы, натсройка графика, отделения "специалистов" и отделения "пациентов". Остальные объекты являются вторичными - входные данные для выполнения запросов и критериев поиска. Шаблоны включают AdoTable, DBGrid и другие стандартные компоненты.

Как упоминалось выше, программа имеет 31 объект. Доступ к ним осуществляется в базовой форме. Некоторые формы имеют собственные дочерние формы.

Когда программа запускается, обрабатывается процедура:

procedure TMainForm1.FormCreate (Sender: TObject);

Эта процедура добавляется в базу данных. Соединение выглядит следующим образом:

AdoConnection3.Connected: = false;

AdoConnection3.ConnectionsString:      =      '      Provider     =

AdoConnection3.Connected: = true;

У базовой формы имеется такое свойство как FormStyle, которое соответствует fsMDISForm. Это означает, что форма является родительской формой для всех других объектов в проекте. В других объектах свойство FormStyle совпадает с fxsMDISChild [12]. Это означает, что эти формы являются основными формами по отношению к дочерним формам. Поэтому, чтобы открыть дочернюю форму, следует нужно сделать следующее:

Form1: = TGurnalForm.Creates (Self);

Form1.Caption: = 'Journal Disease';

Все значения данных полей суммируются, формируя итоговую запись в БД. Для сохранения медицинской карты необходимо нажать кнопку «Ок», где произойдет сохранение медицинской карты в базу данных:

Gemodinamik, Pls, Givt, BolGivt, Peristalt, Gaz, Stul, pohki, Mocheispusk, Diur, It)' + 'VALUE ('''+ss+''', ''' + datetostr(date) + ''', ''' + Edit3.Text + ''', ''' + Edit5.Text + ''', ''' + edit7.Text + ''', ''' + Edit9.Text + ''', ''' + Edit11.Text + ''', ''' + Combobox12.Text +  ''',  '''  + Combobox15.Text +  '''…  +  ''',  '''  +

Сохранение данных пациента в базу данных выполняется аналогично записи медицинской карты.

Руководство пользователя

После запуска файла "Registrature" отображается экранная заставка с названием работы и предложением нажать кнопку "Вход. После нажатия кнопки "Войти" откроется основная форма, которая позволит получить доступ ко всем другим формам.

Основная форма содержит изображение специалиста-врача, а также главное меню. Главное меню содержит элементы: база данных пациентов, база данных специалистов-врачей, таблицы, каталоги, отчеты. Каждое меню имеет свои собственные элементы.

Меню "База данных пациентов" содержит следующие элементы: список и медкарта.

Меню "База специалистов-врачей" содержит такие элементы как общий список и список специалистов по самим отделениям.

Меню "Расписание" содержит непосредственно ссылку на расписание и его настройку.

Меню "Справочники" содержит два элемента:  "Справочники специалистов " и "Справочник пациентов".

Меню "Отчеты " содержит элементы "по специалистам " и "по пациентам".

Нажав на кнопку "Список пациентов" открываем форму списка пациентов медицинского учреждения (см. рис. 2).

Рисунок 2 – Форма данных пациентов

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

Этот программный продукт упрощает работу специалистов и делает их продуктивными. Интерфейс программы удобен и понятен неквалифицированным пользователям.