Разработка базы данных "Аптека" для ГУЗ НО "Медицинский информационно-аналитический центр"
Создание базы данных для учета лекарственных средств и изделий медицинского назначения в аптеках стационаров. Требования к программному продукту. Способ организации данных. Начало работы с приложением. Экономическая эффективность внедрения разработки.
| Рубрика | Программирование, компьютеры и кибернетика |
| Вид | дипломная работа |
| Язык | русский |
| Дата добавления | 10.10.2015 |
| Размер файла | 2,6 M |
Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже
Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.
StatusBar1. Canvas. TextOut (Rect. Left, Rect. Top, 'Срок годности')
end
Else
begin
IBQry1. RecNo: =RowN;
if Panel = StatusBar. Panels [0] then
StatusBar1. Canvas. TextOut (Rect. Left,Rect. Top, IBQry1. FieldByName ('NumOfNomenkl'). asString)
Else
if Panel = StatusBar. Panels [1] then
StatusBar1. Canvas. TextOut (Rect. Left,Rect. Top, IBQry1. FieldByName ('NameOfIstFinansir'). asString)
Else
if Panel = StatusBar. Panels [2] then
StatusBar1. Canvas. TextOut (Rect. Left,Rect. Top, IBQry1. FieldByName ('NameOfKontr'). asString)
Else
if Panel = StatusBar. Panels [3] then
StatusBar1. Canvas. TextOut (Rect. Left,Rect. Top, IBQry1. FieldByName ('SeriaNom'). asString)
Else
if Panel = StatusBar. Panels [4] then
StatusBar1. Canvas. TextOut (Rect. Left,Rect. Top, IBQry1. FieldByName ('SrokDeistvSertif'). asString)
Else
if Panel = StatusBar. Panels [5] then
StatusBar1. Canvas. TextOut (Rect. Left,Rect. Top, IBQry1. FieldByName ('SrokG'). asString)
end;
end;
procedure TFormVed. BoxDblClick (Sender: TObject);
var I: Integer;
begin
If (Sender as TCheckListBox). Name='IstFnBox' then
begin
For I: =0 To Length (mIstFin) - 1 do
If IFFlag=0 Then IstFnBox. Checked [I]: =True
Else IstFnBox. Checked [I]: =False;
If IFFlag=0 Then IFFlag: =1
Else IFFlag: =0;
end;
If (Sender as TCheckListBox). Name='GrupBox' then
begin
For I: =0 To Length (mGrup) - 1 do
If GrupFl=0 Then GrupBox. Checked [I]: =True
Else GrupBox. Checked [I]: =False;
If GrupFl=0 Then GrupFl: =1
Else GrupFl: =0;
end;
end;
end.
Размещено на Allbest.ru
Подобные документы
Назначение базы данных для обеспечения работы автобусного парка. Основные возможности админпанели. Выполняемые базой данных и приложением функции. Инфологическое моделирование данных. Описание разработанного web-приложения. Проектирование базы данных.
курсовая работа [2,2 M], добавлен 01.02.2013Основные свойства времени и способы его представления. Временная логика предикатов А. Тейза. Учет временного фактора при разработке баз данных. Разработка концепции базы данных на основе реляционной системы управления. Требования к программному продукту.
дипломная работа [2,8 M], добавлен 02.10.2016Медицинский диагностический центр: информационная система управления данными, минимальные системные требования к аппаратному обеспечению, создание таблиц путем ввода данных. Отчеты базы данных: создание отчетов различными способами, мастер диаграмм.
реферат [588,6 K], добавлен 03.06.2011Разработка базы данных для информационной поддержки деятельности аптеки с целью автоматизированного ведения данных о лекарствах аптеки. Проектирование схемы базы данных с помощью средства разработки структуры базы данных Microsoft SQL Server 2008.
курсовая работа [3,6 M], добавлен 18.06.2012Создание базы данных с помощью ACCESS для автоматизации работы базы отдыха. Оценка возможностей пользователей при работе с данной базой. Построение информационно-логической модели базы данных. Разработка запросов для корректировки и выборки данных.
курсовая работа [1,1 M], добавлен 19.10.2010Характеристика, классификация и структура баз данных. Модель базы данных в Delphi. Разработка базы данных для вуза с целью облегчения процесса поиска нужной информации о студенте. Требования к техническому, методическому и программному обеспечению.
курсовая работа [1,0 M], добавлен 18.08.2009Создание информационно-аналитической системы (базы данных) "Реализация кондитерских изделий". Использование методов сортировка, добавление абонентов, удаление, изменение, поиск данных, фильтрация, диапазон. Среда разработки - язык программирования Delphi.
курсовая работа [761,7 K], добавлен 10.04.2011Анализ существующих разработок и выбор стратегии автоматизации делопроизводства взаимоотношении поставщиков лекарственных препаратов с аптекой. Разработка проекта базы данных аптеки "Ригла". Обоснование экономической эффективности разработки базы данных.
дипломная работа [3,0 M], добавлен 19.09.2013Возможности извлечения информации из баз данных. Программы для создания и обработки базы данных и создания пользовательского интерфейса. Обоснование выбора программных средств для реализации. Создание базы данных, интерфейса и базы данных к интерфейсу.
курсовая работа [2,9 M], добавлен 24.03.2023Этапы создания и разработки базы данных. Построение модели предметной области. Разработка даталогической и физической моделей данных, способы обработки данных о сотрудниках организации. Проектирование приложений пользователя. Создание кнопочной формы.
курсовая работа [2,1 M], добавлен 14.02.2011
