Введення
Система управління базами даних (СКБД) - це програмне забезпечення, за допомогою якого користувачі можуть визначати, створювати і підтримувати базу даних, а також здійснювати до неї контрольований доступ.
База даних (БД) - сукупність відомостей, що зберігаються в запам'ятовуючих пристроях ЕОМ, виступаюча в якості вихідних даних при вирішенні різних завдань.
Головна мета створення баз даних полягає в об'єднанні функцій оновлення, ведення і поповнення збереженої інформації, а також довідкової функції. Основне характерна властивість бази даних - її незалежність від робочих програм, з якими вона взаємодіє. Ця незалежність проявляється в можливості зміни змісту, обсягу та організації збереженої інформації без зміни робочих програм, що користуються даною інформацією. Для забезпечення незалежності бази даних необхідно зберігати опис накопиченої інформації разом із самою інформацією і забезпечити можливість колективного доступу до будь-якої частини збережених відомостей.
Мета курсового проекту: створити інформаційну систему «Клініка».
Завдання:
1. Створити ЗНФ;
2. Створити БД «статистика матчів» в програмі IBExpert;
. Створити додаток в Lazarus.
1. Постановка завдання
Необхідно створити СУБД «Клініка» і додаток в Lazarus. Необхідно привести до третьої нормальної форми: П.І.Б лікаря, Спеціалізація, П.І.Б пацієнта, День Реєстраційний номер, Адреса, Дата народження, Номер поліса, Діагноз, Дата прийому, Страхова карта, Дата початок лікарняного Дата виписки.
управління користувач програма
2. Опис алгоритму
.1 Створення 3НФ
Створена 3НФ показана на малюнку 1.
Малюнок 1 - 3НФ
.2 Створення таблиць
Створення таблиць починається з таблиці, яка не має зовнішніх ключів. Запити на створення таблиць виглядати наступним чином:
Таблиця №1table vrah
(IDvrah numeric not null primary key, varchar (200), varchar (50));
Зовнішній ключ IDvrah пов'язує поточну таблицю з таблицею vrah по її первинному ключу IDvrah.
Таблиця №2table pacient
(IDpacient numeric not null primary key, varchar (200), varchar (30), varchar (50), varchar (50),
nompol varchar (20));
Для автоматичного заповнення значеннями ключових полів використовуються тригери і генератори. Запит на їх створення виглядає наступним чином:
Тригер до таблиці №1
create generator vrah_id_gen ;; term ^; trigger set_vrah_id for vrahbefore insert position 0 as (new.IDvrah is null) then.IDvrah=gen_id (vrah_id_gen, 1) ;; ^ term; ^;
Тригер до таблиці №2generator pacient_id_gen ;; term ^; trigger set_pacient_id for pacientbefore insert position 0 as (new.IDpacient is null) then.IDpacient=gen_id (pacient_id_gen, 1) ;; ^
set term; ^
commit;
Решта таблиці і тригери робляться аналогічним чином, як на прикладі 1 і 2.
3. Створення програми
Для того щоб створити додаток необхідно, створити новий проект (Файл gt; Створити ... gt; з групи «Проект» вибираємо «Додаток»). Додамо модуль даних (Файл gt; Створити ... gt; з групи «Модуль» вибираємо «Модуль даних»).
.1 Модуль даних
Додаємо в DataModule1 TIBConnection, TSQLTransaction і чотири компоненти TSQLQuery зі вкладки SQLdb. Додамо чотири компоненти TDataSource зі вкладки Data Access. (як показано на малюнку 2)
Малюнок 2 - додавання компонентів
Задаємо у властивості IBConnection1
DatabaseName C: BD BD.GDB Transaction SQLTransaction1 LoginPrompt False Dialect 3 CharSet UTF - 8 UserName SYSDBA Password masterkey
Задаємо у властивості SQLTransaction1
Database IBConnection1 DefaultAction caCommit Params write read_committed rec_version nowait
