Последняя версия DataExpress 22.3.12

Изображение Скачать | Изображение Что нового?

БД для стоматологической клиники.

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

Модератор: Разработчики баз данных

Аватара пользователя
SirWolf
Знаток
Сообщения: 432
Зарегистрирован: 16 апр 2017, 09:17
Откуда: Краснодар
Благодарил (а): 40 раз
Поблагодарили: 68 раз

БД для стоматологической клиники.

Сообщение SirWolf » 27 авг 2017, 10:18

Хочу поблагодарить пользователей форума за помощь в создании.
Идея - создать БД для учета пациентов клиники.
На текущий момент БД умеет:
- Вести картотеку пациентов
- Составлять планы лечения
- Вести карты пациентов
- Вести финансовую часть (Оплаты, учет доходов расходов по разным статьям, авансы)
- Считать Зарплаты врачей
- Создавать планы обзвонов пациентов
- Возможность создание шаблонов для заполнения медицинских карт
- Админ панель для разных ролей пользователей
- Справочник Диагнозов
- Наряды и Ортопедические карты
- Шаблоны всех ИДС, Договоров
- Зубная формула
- Отчеты по финансам, заполнениям, расходам

Не умеет:
- Создавать график записи пациентов (для онлайна самое простое гугл таблицы или календарь)

Логика программы не простая, так как заточена под определенные потребности. С радостью отвечу на вопросы по БД. И с радостью приму критику и помощь по разработке и оптимизации.
Отдельное спасибо YurAnt.

Пароль для:
Администратор - 1
Врач - 123
Главный врач - 123456

Для пароля разработчика пишите в личку.

История обновлений
upd от 04/09/17
- добавлен алгоритм подсчета процентов/рублей (отдельная функция, большое спасибо YurAnt за терпение и помощь)
- добавлена страница о клинике, в которую вносится информация для последующего печатания в шаблонах
- мелкие исправления в интерфейсе
- добавлен актуальный прайс (берет из прайса ценники и фильтрует в зависимости от условий (условия будут позже в зависимости от потребностей))
- изменен протокол операций, добавлены галочки и поля с последующим выведением в шаблон
- исправлены кнопки печати (для уникальности добавляется к имени файла время (знаю что фигня, но пока так))
upd от 30/09/17
- Форма обзовна пациента основана на заполненных картах
- Изменен алгоритм подбора пациентов по дням роджденья (скорость выросла в разы и нагрузка на базу уменьштлась)
- К форме обзовона добавлены отсроченные вызовы по имплантам с разбивкой на категории
- Мелкие изменения в интерфейсе (для низких разрешений)

upd от 30/10/17
- Изменен глобально интерфейс программы - Административная панель. Из нее доступ к разным формам и компонентам в зависимости от роли. Существено разгружена сеть.
- В общем интерфейсе добавлены быстрые оплаты и прочие информационные "фичи".
- Добавлен справочник стомат диагнозов по МКБ.
- Изменена структура формирования счета, теперь можно добавлять счета, даже если предыдущий счет был оплачен полностью.
- Добавлена форма наряда для техника.
- В процессе завершения тестирования ортопедическая карта.
- Добавлен ряд отчетов для отслеживания жизнедеятельности клиники.
- Мелкие изменения в дизайнах всех окон и скриптах.
- Добавлены/исправлены шаблоны договоров и печатных форм.
- Добавлена форма с данными о клинике и вывод всех данных в договора и формы печати. (Я точно стану адвокатом.)

upd от 18/11/17
- Изменены скрипты кнопок
- Изменены настройки для нарядов и техников
- Добавлена закладка на админ панель для быстрого доступа к основным настройкам
- Оптимизирован поиск (теперь не перегружает запросы,я надюсь на это по крайней мере)
- Изменен справочник и он же немного наполнен

upd от 27/11/17
- Добавлена (совместно с YurAnt)система авансов (можно добавлять как вручную, так и в полуавтоматическом режиме работает)
- Мелкие изменения интерфейса и логике форм (Так например: Врач видит несколько другую инфу о пациентах нежели админ в административной панели.)
- Добавлено в карту пациента поле 'Сокращенного описания манипуляции' для большей информативности.
- Теперь после заполнения карты программа сама заполняет поле врача в данных пациента.
- Изменена система маркеров первичных и вторичных пациентов, статистика с ними осталась та же.

upd от4/12/17
- Найдена не значительная ошибка в авансах - исправлена
- Доработан Протокол операций
- Добавлены маркеры в оплаты для статистики посещаемости
- Мелкие изменения в интерфейсе и карте пациента
- Название DentalExpress

upd от1/2/18
Довольно крупный апдейт
- Добавлена панель Администратора (вынесены функции необходимые админу - актуальные оплаты, должники, обработка фото и т.д)
- Добавлена панель Врача (оставлены только врачебные функции)
- Изменена форма оплаты (расчет сдачи, автоматическое создание авансов, списание с аванса как частично так и полностью.)
- Отдельная функция закрытия кассы по определенному периоду
- Переработан план лечения, сделан более вариабельным и гибким
- Вагон мелких правок, которые выплыли в процессе тестирования в полевых условиях
- валюты так и не сделал

upd от15/3/18

- Реализованы валюты
- Изменены формы: Карта пациента, План лечения, Административная панель, Административная панель врач
- Изменены формулы расчета зарплат
- Изменены шаблоны (об ошибках сообщать)
- Изменения в интерфейсе и механике работы (надеюсь, к лучшему)
- Формула зубов перенесена в план лечения

upd от 02/2/19
- Изменения расчета зарплат
- Изменение интерфейсов
- Добавлена запись пациентов
- вагон мелких правок и недочетов

upd от 03/09/19
- Изменены интерфейсы врачей, администраторов
- Добавлены формы учета графиков ассистентов
- Формы и отчеты по зарплатам всех сотрудников
- Направления на РН
- Формы учета технической работы и отправки материалов технику
- Формы прибавки и удержания зарплат
- Исправлены ошибки в подсчетах зарплат
- Очень много мелких исправлений
- Обновлены и добавлены шаблоны, если какой-то потерян, пишите
- Добавлены актуальные плагины по скрытию элементов интерфейса от Develop-Soft
- Отдельная благодарность Develop-Soft за терпение и правку ошибок, так же за замечательный скрипт по превращению полей запроса в кнопки

upd от 11/09/19
- исправлены мелкие неточности интерфейса
- незначительно изменен интерфейс Администратора И Главного врача
- изменен план лечения (спаисбо Develop-Soft за скрипт)
- изменена папка шаблонов (сортировка внутри)
- изменения в запросах формы оплат и многих других
upd от 26/12/19
- Добавлены рассрочки
- Добавлены продажи и учет товаров
- Доработки расписания
- Правки интерфейса и мелочи

upd от 24/08/20
- Доработаны планы лечения (убраны планы лечения по специальностям, теперь каждой манипуляции можно назначить отдельно тип)
- Добавлены смены администраторов и несколько вариантов подсчета ЗП администраторов согласно сменам
- Расчет нагрузки доктора
- Обновлены скрипты согласно актуальным версиям
- Статистика убыточности/доходности
- Изменения в структуре прайса (старые не потеряются, нужно просто указать принадлежность манипуляции для плана лечения)
- Правки интерфейса и мелочи
upd от 01/02/21
- Добавил (вернул) в карту пациента кнопку для сохранения карты с ФИО в .docx
- Исправил работу с авансами, когда задваивались в отчетах по инкассации. Переделаны немного отчеты и формы связанные с нимим
- Администраторам добавил кнопку для папки Админа (хранится в папке пациентов в каталоге Admin)
- Администраторам добавил кнопку "Поставщики", для ведения информации по закупкам
- В карте пациента хранилась большая таблица с первых версий (до июня 2018), где ранее заполнялись счета пациента. С июня 2018 вынесена в отдельную форму. Эта таблица удалена за ненадобностью
- Убрано все что отвечало за закупки и заказы товаров (за ненадобностью). Возможно переделаю в более удобную версию.
- Обновлены шаблоны(если что-то потерял, пишите)
upd от 05/02/21
- В карту пациента добавлена "Явка"
- Изменения в шаблонах карт пациента
- Перенос кнопки "Сохранить" (теперь над счетом пациента), перенос кнопки "Обработать фото"(теперь в вкладке примечание)
upd от 10/03/2021
- Изменен интерфейс Данных пациента
- Добавлена Анкета здоровья
- Добавлены заметки пациента
- Добавлено окно вывода Заметок и Анкеты на экране Врача
- Добавлено работа с заказами и соответствующие кнопки Администратору и Врачу
- Исправлена проверка на уникальность, теперь проверяет ФИО + Дата рождения

upd от 30/07/2021
-Добавлены формы по контролю ортопедических работ
-Добавлены отчеты для контроля поставщиков
-Много мелких исправлений


Скрины под спойлером
1.jpg
1.jpg (362.46 КБ) 32484 просмотра

2.jpg
2.jpg (323.91 КБ) 32484 просмотра

3.jpg
3.jpg (393.92 КБ) 32484 просмотра

4.jpg
4.jpg (318.63 КБ) 32484 просмотра

5.jpg
5.jpg (116.21 КБ) 32484 просмотра

6.jpg
6.jpg (182.86 КБ) 32484 просмотра

Последняя версия:
upd от 30/07/21


На кофе, что бы не заснуть при редактировании шаблонов.


В планах написать инструкцию и хелпы.


Шаблоны(если чего-то не хватает, пишите в личку)
templates.rar
(1.53 МБ) 1144 скачивания

P.S.Спасибо за кофе
По сути нет большой разницы, что считать пропуска, зубы или яйца. rausNT (с)


Аватара пользователя
YurAnt
Эксперт
Сообщения: 3352
Зарегистрирован: 13 апр 2017, 08:57
Поблагодарили: 17 раз

Re: БД для стоматологической клиники.

Сообщение YurAnt » 02 фев 2018, 15:49

Это выполняется с помощью функции dr_FilterMainPanel из модуля drts

sashi4kin
Заглянувший
Сообщения: 3
Зарегистрирован: 02 фев 2018, 14:08

Re: БД для стоматологической клиники.

Сообщение sashi4kin » 02 фев 2018, 17:07

YurAnt писал(а):Это выполняется с помощью функции dr_FilterMainPanel из модуля drts


Прочитал про dr_FilterMainPanel. Я так понял эта функция добавляет поле поиска на главную панель.
Мне интересно вот про это поле поиска
1.jpg
1.jpg (53.63 КБ) 2097 просмотров


Быть может это функция dr_FilterPanel ?

Аватара пользователя
YurAnt
Эксперт
Сообщения: 3352
Зарегистрирован: 13 апр 2017, 08:57
Поблагодарили: 17 раз

Re: БД для стоматологической клиники.

Сообщение YurAnt » 02 фев 2018, 17:23

Возможно.. Но, SirWolf из своей базы франкенштейна мутит... Может и чистый скрипт.

drts
Эксперт
Сообщения: 410
Зарегистрирован: 29 окт 2016, 23:35
Откуда: Новороссийск
Благодарил (а): 52 раза
Поблагодарили: 20 раз

Re: БД для стоматологической клиники.

Сообщение drts » 02 фев 2018, 17:36

Нет. Dr_filter_panel (или как там её) добавляет фильтрацию в окно выбора объекта. Это я точно знаю. А у Волка, я думаю что-то типа фильтрации в запросе.

sashi4kin
Заглянувший
Сообщения: 3
Зарегистрирован: 02 фев 2018, 14:08

Re: БД для стоматологической клиники.

Сообщение sashi4kin » 02 фев 2018, 17:37

YurAnt писал(а):Возможно.. Но, SifWolf из своей базы франкенштейна мутит... Может и чистый скрипт.


Тогда стоит подождать ответа автора. И поэкспериментировать с dr_FilterPanel.

А пока в свою БД включил ваше решение из этой темы
Re: Поиск (Пост YurAnt #8421)

Спасибо вам за него!)

Dr_filter_panel (или как там её) добавляет фильтрацию в окно выбора объекта.


Ну вот, даже и экспериментировать не придется.

Аватара пользователя
YurAnt
Эксперт
Сообщения: 3352
Зарегистрирован: 13 апр 2017, 08:57
Поблагодарили: 17 раз

Re: БД для стоматологической клиники.

Сообщение YurAnt » 02 фев 2018, 17:52

drts писал(а):..Dr_filter_panel ..(или как там её)

:lol:

drts
Эксперт
Сообщения: 410
Зарегистрирован: 29 окт 2016, 23:35
Откуда: Новороссийск
Благодарил (а): 52 раза
Поблагодарили: 20 раз

Re: БД для стоматологической клиники.

Сообщение drts » 02 фев 2018, 18:28

YurAnt писал(а):
drts писал(а):..Dr_filter_panel ..(или как там её)

:lol:

Я, после обновления объекта в новых версиях, так проникся удобством этой фишки, что в
повыбрасывал из базы drts- поиск, оставив только глобальный поиск в главной строке. Развивается проект, крутяк)))

Аватара пользователя
YurAnt
Эксперт
Сообщения: 3352
Зарегистрирован: 13 апр 2017, 08:57
Поблагодарили: 17 раз

Re: БД для стоматологической клиники.

Сообщение YurAnt » 02 фев 2018, 18:41

Еще бы свойства "приоткрылись" - было бы еще круче...

Аватара пользователя
SirWolf
Знаток
Сообщения: 432
Зарегистрирован: 16 апр 2017, 09:17
Откуда: Краснодар
Благодарил (а): 40 раз
Поблагодарили: 68 раз

Re: БД для стоматологической клиники.

Сообщение SirWolf » 02 фев 2018, 19:15

dxVrachPosk (Self['Поиск Поле']) - поле поиска
dxQueryGrid5 - сам запрос
self['Фильтр Дни'] - поле фильтра по дням или месяцам


Код: Выделить всё

 // Поиск
procedure Poisk (Sender: TObject; var Key: Word; Shift: TShiftState);
begin
 If length(dxVrachPosk.Text)>=3 then // количество символов с которго начинается поиск
 begin
 dxQueryGrid5.ManualRefresh:=true;
 self['Фильтр Дни']:='Все время';
 Self['Поиск Поле']:=dxVrachPosk.Text;
 dxQueryGrid5.Refresh;
 end;
  If length(dxVrachPosk.Text)=0 then  // если убрать все символы
  begin
    self['Фильтр Дни']:='Сегодня';
    dxQueryGrid5.ManualRefresh:=False;
    Self['Поиск Поле']:=dxVrachPosk.Text;
    dxQueryGrid5.Refresh;
  end
end;

procedure Form_Create;
begin
dxVrachPosk.OnKeyDown:=@Poisk;
end;

Да никакого франкенштейна.

Аватара пользователя
SirWolf
Знаток
Сообщения: 432
Зарегистрирован: 16 апр 2017, 09:17
Откуда: Краснодар
Благодарил (а): 40 раз
Поблагодарили: 68 раз

Re: БД для стоматологической клиники.

Сообщение SirWolf » 02 фев 2018, 19:25

В самом пациенте есть поле [Поиск] для поиска, осталось от DRTS, которое генерирует "ключ" для поиска вида:

Код: Выделить всё

cstr([Фамилия])+' '+ cstr ([Имя]) + ' ' +cstr ([Отчество]) + ' ' +
REPLACEALL(REPLACEALL(REPLACEALL(REPLACEALL([Телефон Пациента],'-',''),'(',''),')',''),' ','')

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

Код: Выделить всё

[?!Поиск]==[Поиск Поле] &

{[!Дата последнего визита]>= iif ([Фильтр Дни]= 'Сегодня',date,
  iif ([Фильтр Дни]= 'Вчера',addday(date,-1),
    iif ([Фильтр Дни]= '7 дней',addday(date,-7),
      iif ([Фильтр Дни]= 'Месяц',addday(date,-31),
'01.01.2001'))))
&
[!Дата последнего визита]<=iif ([Фильтр Дни]= 'Сегодня',date,
  iif ([Фильтр Дни]= 'Вчера',addday(date,-1),
    iif ([Фильтр Дни]= '7 дней',date,
      iif ([Фильтр Дни]= 'Месяц',date,
date))))
}


В итоге мы имеем срипт который меняет условия фильтрации запроса [?!Поиск]==[Поиск Поле], и дабы не перегружать запрос еще и ручное отключение обновления dxQueryGrid5.ManualRefresh:=true;.


Вернуться в «Готовые базы данных (бесплатные)»