Практическая часть

2.1 Oпиcaниe пpeдмeтнoй oблacти.

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

Заполняется медицинская карта в регистратуре, затем используется врачом для внесения даты приема, жалобы пациента, предполагаемого диагноза, назначение лечения.

Информация, заполняемая регистратурой:

· Информация о пациентах.

· Информация о врачах.

· Сведения о приемах.

Информация о пациентах содержит сведения:

· Фамилия, Имя, Отчество

· Дата рождения

· Номер участка, к которому он относится

Информация о врачах содержит:

· Фамилия, Имя, Отчество

· Специализация

· Участок

· Часы работы

Сведения о приёме содержат:

· Врач

· Пациент

· Дата приёма

· Жалоба

· Диагноз

· Осмотр

· Назначения

2.2. Создание Базы данных

База данных «Медицинская карта» является реляционной. Следовательно были coздaны cлeдующиe таблицы:

Таблица «Пациенты», которая предназначена для хранения информации о пациентах. Эта таблица содержит пять полей. Для отношения был определен первичный ключ. Ключ состоит из атрибута «Код больного» (рис.1)

Рис.1 Таблица «Пациенты».

Таблица «Врачи», которая предназначена для хранения информации о врачах. Эта таблица содержит пять полей. Для отношения был определен первичный ключ. Ключ состоит из атрибута: «Код врача» (рис.2)

Рис.2 Таблица «Врачи»

Таблица «Диагнозы», которая предназначена для хранения информации о диагнозах пациента. Эта таблица содержит два поля. Для отношения был определен первичный ключ. Ключ состоит из атрибута: «Код диагноза» (рис.3)

Рис.3 Таблица «Диагнозы»

Таблица «Приём». Эта таблица содержит пять полей. Для таблицы был определен ключевой атрибут – «Код больного» (рис.4)

Рис.4 Таблица «Приём»

Создание межтабличных связей.
Связь между таблицами необходима для того, чтобы иметь доступ ко всей информации, введенной в разные таблицы. Используя ключевые поля, создаем межтабличные связи (Рис.5).

Рис.5 Межтабличная связь

2.3 Создание форм

Формы обеспечивают пользователям возможность ввода данных без необходи­мости знать, как устроена таблица. Одна форма может содержать данные из многих таблиц, благодаря чему обеспечивается возможность ввода данных в разные таблицы из одного места. Макет формы создаем таким образом, чтобы форма на экране выглядела точно так же, как и первоис­точник.

Для удобства занесения данных о пациенте, создаём форму " Пациенты" (Рис.6)

Рис.6 Форма " Пациенты"

Для удобства занесения данных о враче, создаём форму " Врачи" (Рис.7)

Рис.7 Форма " Врачи"

Для удобства занесения данных о диагнозах, создаём форму " Диагнозы" (Рис.8)

Рис.8 Форма " Диагнозы"

Для удобства занесения данных о приёме, создаём форму " Приём" (Рис.9)

Рис.9 Форма " Приём"

2.4 Создание меню пользователей.

Для удобства работы пользователей было создано меню в следующем виде:

пользователь «Регистратура»

пользователь «Врач»

Рис.10 «Меню»

Для работы пользователей создаются макросы в виде запросов.

Пункт меню заполнение медицинской карты выполняет макрос «заполнение», который использует запрос «заполнение».

Результат запроса представлен на рис.6

Пункт меню «Приём» выполняет макрос «заполнение приёма», который использует запрос «заполнение приёма».

Результат запроса предоставлен на рис.9

Пункт меню «Новый врач» выполняет макрос «заполнение формы врачи», который использует запрос «заполнение формы врачи».

Результат запроса предоставлен на рис.7

Пункт меню «Выдача талона» выполняет макрос «По ФИО больного», который использует запрос «По ФИО больного».

**********************

SELECT Пациенты.ФИО, Приём.[Дата приёма], Диагнозы.[Название диагноза], Пациенты.Участок, Врачи.ФИО, Приём.Жалоба, Приём.Осмотр

FROM Диагнозы INNER JOIN (Врачи INNER JOIN (Пациенты INNER JOIN Приём ON Пациенты.[Код больного]=Приём.[Код больного]) ON Врачи.[Код врача]=Приём.[Код врача]) ON Диагнозы.[Код диагноза]=Приём.[Код диагноза]

WHERE (((Пациенты.ФИО)=[]));

Результат запроса представлен на рис.11

Рис.11 «Печать талона»

Пункт меню «Предыдущий приём» выполняет макрос «Предыдущий приём», который использует запрос «Предыдущий приём».

SELECT Диагнозы.[Название диагноза], Приём.[Дата приёма], Приём.Назначение

FROM (Пациенты INNER JOIN Врачи ON Пациенты.Участок=Врачи.Участок) INNER JOIN (Диагнозы INNER JOIN Приём ON Диагнозы.[Код диагноза]=Приём.[Код диагноза]) ON Врачи.[Код врача]=Приём.[Код врача]

WHERE (((Врачи.ФИО)=[]));

Результат запроса представлен на рис.12

Рис.12 «Предыдущий приём»