Разработка автоматизированной информационной системы «Поликлиника»

 

Записка к курсовому проекту

 

 

по дисциплине «Программирование»

на тему «Разработка автоматизированной информационной системы «Поликлиника»»

 

 

 

СОДЕРЖАНИЕ

Введение ……………………………………………………………………....3

1. Постановка задачи ………………………………………………………...4

2. Разработка алгоритма решения задачи …………………………………..5

3. Разработка программы …………………………………………………….6

3.1. Инструкция пользователя……………………………………...……6

3.2. Инструкция программисту………………………………………….7

4. Результаты тестирования программы ……………………………………8

Заключение ……………………………………………………………………11

Список использованной литературы…………………………………………12

 

КП. АС553. 655313. 01 81 00

вВедение

 

Развитие общества всегда сопровождалось усложнением и интенсификацией  связей во всех областях деятельности человека, постоянным накоплением знаний, повышением наукоемкости производимой обществом продукции. В ходе такого процесса информация и знания постепенно приобрели характер самостоятельных видов ресурсов общества — информационных ресурсов, обеспечивающих экономию практически всех видов общественных ресурсов (материальных, интеллектуальных, трудовых и т.д.). Это привело к тому, что уже на современном этапе темпы дальнейшего развития общества определяются совершенствованием его информационной инфраструктуры, эффективностью формирования, размещения и использования информационных ресурсов.

 

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

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

 

 

 

КП. АС553. 655313. 01 81 00

 

1. Постановка задачи

 

Программа должна создавать  базу поликлиника. Информация хранится в файле ma.dat. Информация о каждом  пациенте поликлиники вводится в диалоге по запросам программы в базу. Можно вывести список всех пациентов поликлиники в отсортированном по алфавиту порядке.

 

Информация о каждом пациенте состоит из следующих полей:

• номер страхового свидетельства
• Ф.И.О. пациента
• пол пациента
• дата рождения
• домашний адрес
• домашний телефон

 

Программа содержит следующие  процедуры и функции:

- Зарегистрировать (регистрирует новых пациентов);

-Вывести (выводит весь список пациентов поликлиники, отсортированный по алфавиту);

- Найти (находит пациентов  поликлиники по номеру свидетельства);

- Конец (завершает  программу).

Указанные функции и  процедуры выбираются из меню.

 

Пункт «зарегистрировать» вносит информацию о новом пациенте.

Ввод данных по каждому  новому пациенту выполняется отдельно в диалоге, инициатором которого является программа.

 

КП. АС553. 655313. 01 81 00

2. Разработка алгоритма решения задачи

 

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

Ввод данных в программу  осуществляется в диалоге по запросам программы. Оператор программы передвигается  по пунктам меню с помощью клавиш «стрелка вверх», «стрелка вниз» и инициирует запуск той или иной процедуры нажатием клавиш «Enter».

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

Меню состоит из четырех пунктов, расположенных в следующей последовательности:

- Зарегистрировать;

- Вывести;

- Найти;

- Конец.

Описание каждого пункта меню рассматривается в разделе  «4.1. Инструкция пользователя».

 

Данные хранятся в  файле ma.dat. Структура файла представляет собой массив записей со следующими атрибутами:

• номер страхового свидетельства
• Ф.И.О.
• домашний телефон
• домашний адрес
• пол пациента
• дата рождения.

 

Перемещение по пунктам  меню осуществляется клавишами «стрелка вверх» и «стрелка вниз». Открывается необходимый пункт нажатием «Enter». Выход из программы осуществляется путем выбора соответствующего пункта или нажатия клавиши «Esc».

 

 

КП. АС553. 655313.  01 81 00

 

3. Разработка программы

 

3.1. Инструкция пользователя

 

Процедура пункта «Зарегистрировать» позволяет зарегистрировать новых пациентов для последующей работы с ним. Для каждого пациента заполняются следующие атрибуты:

• номер страхового свидетельства
• Ф.И.О.
• домашний телефон
• домашний адрес
• пол пациента
• дата рождения.

Данные сохраняются в файле ma.dat. Ввод данных по каждому новому пациенту выполняется отдельно в диалоге, инициатором которого является программа.

 

Процедура пункта «Вывести» позволяет просмотреть весь перечень пациентов, находящихся в данный момент в компьютерной базе данных поликлиники. Список пациентов сортируется по алфавиту. Данные о пациентах берутся из файла ma.dat.

 

Процедура пункта «Найти» позволяет найти пациентов поликлиники по номеру страхового свидетельства. Если записей в файле нет, программой будет выдано соответствующее сообщение. Данные о пациентах берутся из файла ma.dat.

 

Процедура «Конец» осуществляет выход из программы. Аналог данной процедуре – нажатие клавиши «Esc» в главном меню.

 

 

3.2. Инструкция программисту

 

       Прежде  всего, подключаем модуль crt - позволяющий эффективнее     управлять режимами экрана, расширенными кодами клавиатуры и цветом.

      Далее  описываем массив записей файла  «ma.dat»:

 

• regnom: строковое поле, обозначает номер страхового свидетельства пациента;
• name: строковое поле, обозначает фамилию, имя, отчество пациента;
• tel: строковое поле, обозначает домашний телефон пациента;
• adr: строковое поле, обозначает домашний адрес пациента;
• pol: строковое поле, обозначает пол пациента;
• data: строковое поле, обозначает дата рождения пациента.

 

Глобальная переменная массив menu строкового типа с количеством элементов от 1 до 4, хранит названия пунктов меню.

Символьная переменная ch  выведенный символ.

Переменные k обозначают положение курсора.

baza переменная файла  с базой.

Переменная buf имеет тип записи ma.

p,top,t,n - файловая переменная.

 

Программа содержит 6 процедур (Menutoscr, Spisok_file, File_spisok, Priem, Spisoc,Poisk).

Процедура Menutoscr вводит меню на экран.

Процедура Priem предназначена для регистрации нового пациента.

Процедура Spisoc выводит на экран все записи из файла ma.dat. Сортировка записей осуществляется в помощью процедуры Sortirovka.

Процедура Poisk предназначена для поиска пациентов.

Процедуры Spisok_file, File_spisok предназначены вывода данных из списка в файл, а также из файла в список.

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

Для каждого пункта меню присваиваются свои процедуры или  функции.

При выходе производится закрытие файла «ma.dat».

 

 

4. Результаты тестирования программы

 

Меню программы

 

 

 

 

Регистрация нового пациента

 

 

 

 

 

 

 

 

 

 

 

Вывод всего списка пациентов  поликлиники, отсортированного по алфавиту

 

 

 

 

 

Поиск пациента по введенному номеру страхового свидетельства 

 

 

 

Поиск пациента по введенному номеру страхового свидетельства

(вариант, когда пациент  не зарегистрирован в базе  данных)

 

 

 

КП. АС553. 655313. 01 81 00

Заключение

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

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

 

КП. АС553. 655313. 01 81 00

 

Список использованной литературы

 

1. Емелина Е.И. Основы программирования на языке Паскаль. – М: Финансы и статистика, 1997.- 208 с.: ил.
2. Попов А.А. Турбо Паскаль для школьников – М: Издательство Март 1996.
3. Фаронов В.В. Турбо Паскаль «Основы Турбо Паскаля» - М.: Учебно-инженерный центр, 1992.
4. Фаронов В.В. Турбо Паскаль 7.0. Начальный курс. Учебное пособие. Издание 7-е, переработанное. – М.: «Нолидж», 2000. – 576 с., ил.