Автор работы: Пользователь скрыл имя, 17 Июня 2014 в 19:56, курсовая работа
На сегодняшний день деятельность большинства предприятий основана на использовании современных средств автоматизации, так как для приема, хранения, передачи информации на бумажных носителях требуются высокие затраты времени и труда специалистов. Информация, хранимая на бумажных носителях, может испортиться с течением времени, под воздействием внешних факторов. Такая информация часто не может быть восстановлена в соответствии с первоначальными документами. В современных условиях выполняется переход к автоматизированной обработке экономической информации и предпосылками для перехода к автоматизированной обработке являются:
- увеличение номенклатуры объема продукции (работ, услуг и т.д.);
- необходимость снижения затрат (времени, финансов и др. ресурсов) на производственную деятельность.
Таблица 6.2- Свойства компонентов формы AboutBox
Компонент и его имя |
Надпись |
Свойство |
Значение |
Метка, Lable1 |
Разработчик Уколкина Марина Анатольевна |
Caption |
Разработчик Уколкина Марина Анатольевна |
Font |
Monotipe Corvisa, 14pt | ||
Метка, Lable2 |
Учет пациентов и мед. услуг в стационаре |
Caption |
Учет пациентов и мед. услуг в стационаре |
Font |
Times New Roman, 22pt | ||
Метка, Lable3 |
База Данных |
Caption |
База Данных |
Font |
Times New Roman, 26pt | ||
Метка, Lable4 |
Пенза, 2011 |
Caption |
Пенза, 2011 |
Font |
Times New Roman, 16pt , | ||
Кнопка, OKButton |
ОК |
Caption |
ОК |
Font |
Times New Roman, 16pt |
Таблица 6.3 – Свойства компонентов формы Pacient
Компонент и его имя |
Надпись |
Свойство |
Значение |
1 |
2 |
3 |
4 |
Метка, Label1 |
Номер полиса |
Caption |
Номер полиса |
Font |
MonotipeCorvisa, 16pt | ||
Метка, Label2 |
Фамилия |
Caption |
Фамилия |
Font |
MonotipeCorvisa, 16pt | ||
Метка, Label3 |
Имя |
Caption |
Имя |
Font |
MonotipeCorvisa, 16pt |
Продолжение таблицы 6.3
1 |
2 |
3 |
4 |
Метка, Label4 |
Отчество |
Caption |
Отчество |
Font |
MonotipeCorvisa, 16pt | ||
Метка, Label5 |
Адрес |
Caption |
Адрес |
Font |
MonotipeCorvisa, 16pt | ||
Метка, Label6 |
Работа |
Caption |
Работа |
Font |
MonotipeCorvisa, 16pt | ||
Поле для ввода, DBEdit1 |
- |
Font |
TimeNewRoman, 11pt |
DataSource |
DataSource1 | ||
DataField |
NPolis | ||
Поле для ввода, DBEdit2 |
- |
Font |
TimeNewRoman, 11pt |
DataSource |
DataSource1 | ||
DataField |
NFamily | ||
Поле для ввода, DBEdit3 |
- |
Font |
TimeNewRoman, 11pt |
DataSource |
DataSource1 | ||
DataField |
NName | ||
Поле для ввода, DBEdit4 |
- |
Font |
TimeNewRoman, 11pt |
DataSource |
DataSource1 | ||
DataField |
NPatromyc | ||
Поле для ввода, DBEdit5 |
- |
Font |
TimeNewRoman, 11pt |
DataSource |
DataSource1 | ||
DataField |
NPlace | ||
Поле для ввода, DBEdit6 |
- |
Font |
TimeNewRoman, 11pt |
DataSource |
DataSource1 | ||
DataField |
NJob | ||
Источник данных, DataSource1 |
- |
DataSet |
Table1 |
Набор данных, Table1 |
- |
DatabaseName |
C:\BD\ |
TableName |
Pacient.db | ||
Навигационная панель управления, DBNavigator1 |
- |
DataSourse |
DataSource1 |
VisibleButtons |
[nbFirst,nbPrior,nbNext, |
Таблица 6.4 – Свойства компонентов формы Postupleniya.
Компонент и его имя |
Надпись |
Свойство |
Значение |
Метка, Label1 |
Номер полиса |
Caption |
Номер полиса |
Font |
Monotipe Corvisa, 18pt | ||
Метка, Label2 |
Дата поступления |
Caption |
Дата поступления |
Font |
Monotipe Corvisa, 18pt | ||
Метка, Label3 |
Дата выписки |
Caption |
Дата выписки |
Font |
Monotipe Corvisa, 18pt | ||
Метка, Label4 |
Оплата в день |
Caption |
Оплата в день |
Font |
Monotipe Corvisa, 18pt |
Продолжение таблицы 6.3
Компонент и его имя |
Надпись |
Свойство |
Значение |
Поле для ввода, DBEdit1 |
- |
Font |
TimeNewRoman, 11pt |
DataSource |
DataSource2 | ||
DataField |
NPolis | ||
Поле для ввода, DBEdit2 |
- |
Font |
TimeNewRoman, 11pt |
DataSource |
DataSource2 | ||
DataField |
NData_Postuplenie | ||
Поле для ввода, DBEdit4 |
- |
Font |
TimeNewRoman, 11pt |
DataSource |
DataSource2 | ||
DataField |
NData_Vipiska | ||
Поле для ввода, DBEdit5 |
- |
Font |
TimeNewRoman, 11pt |
DataSource |
DataSource2 | ||
DataField |
NOplata_za_1_day | ||
Источник данных, DataSource2 |
- |
DataSet |
Table2 |
Набор данных, Table2 |
- |
DatabaseName |
C:\BD\ |
TableName |
Med. uslugi.DB | ||
Навигационная панель управления, DBNavigator2 |
- |
DataSourse |
DataSource2 |
Visible Buttons |
[nbFirst,nbPrior,nbNext, |
Таблица 6.5 – Свойства компонентов формы BD.
Компонент и его имя |
Надпись |
Свойство |
Значение |
Источник данных, DataSource1 |
- |
DataSet |
Table1 |
Набор данных, Table1 |
- |
DatabaseName |
C:\BD\ |
TableName |
Pacient.db | ||
Навигационная панель управления, DBNavigator1 |
- |
DataSourse |
DataSource1 |
VisibleButtons |
[nbFirst,nbPrior,nbNext, | ||
Источник данных, DataSource2 |
- |
DataSet |
Table2 |
Набор данных, Table2 |
- |
DatabaseName |
C:\BD\ |
TableName |
Med. uslugi.DB | ||
Навигационная панель управления, DBNavigator2 |
- |
DataSourse |
DataSource2 |
VisibleButtons |
[nbFirst,nbPrior,nbNext, |
Продолжение таблицы 6.5
Компонент и его имя |
Надпись |
Свойство |
Значение |
Компонент визуализации данных, DBGrid1 |
- |
DataSource |
DataSource1 |
Font |
MS Sans Serif, 8pt | ||
ReadOnly |
False | ||
Компонент визуализации данных, DBGrid1 |
- |
DataSource |
DataSource1 |
Font |
MS Sans Serif, 8pt | ||
ReadOnly |
False | ||
Контейнер переключателей, RadioGroup1 |
- |
Font |
MS Sans Serif, 8pt |
Items |
По месту работы, по ФИО | ||
Контейнер переключателей, RadioGroup2 |
- |
Font |
MS Sans Serif, 8pt |
Items |
По дате поступления, по дате выписки | ||
Переключатель, RadioButton1 |
По месту работы |
Font |
MS Sans Serif, 8pt |
OnClick |
PacientSort | ||
Переключатель, RadioButton2 |
По ФИО |
Font |
MS Sans Serif, 8pt |
OnClick |
PacientSort | ||
Компонент и его имя |
Надпись |
Свойство |
Значение |
Переключатель, RadioButton3 |
По дате поступления |
Font |
MS Sans Serif, 8pt |
OnClick |
PostuplenieSort | ||
Переключатель, RadioButton4 |
По дате выписки |
Font |
|
OnClick |
PostuplenieSort | ||
Поле для ввода календарной даты, DateTimePicker1 |
- |
Font |
MS Sans Serif, 8pt |
Поле для ввода календарной даты, DateTimePicker2 |
- |
Font |
MS Sans Serif, 8pt |
Кнопка, Button1 |
Фильтр по выписке |
Caption |
Фильтр по выписке |
Font |
MS Sans Serif, 8pt | ||
OnClick |
Button1Click | ||
Кнопка, Button2 |
Фильтр по поступлению |
Caption |
Фильтр по поступлению |
Font |
MS Sans Serif, 8pt | ||
OnClick |
Button2Click |
Таблица 6.6 – Свойства компонентов формы D1
Компонент и его имя |
Надпись |
Свойство |
Значение |
Набор данных, Query1 |
- |
Active |
True |
DatabaseName |
C:\BD\ | ||
Name |
Query1 | ||
SQL |
SELECT Uslugi.NData_Postuplenie, count(Uslugi.NPolis) FROM "Med. uslugi.DB" Uslugi GROUP BY Uslugi.NData_Postuplenie | ||
Шаблон графика, DBChart1 |
- |
DataSet |
Query1 |
Таблица 6.7 – Свойства компонентов формы D2
Компонент и его имя |
Надпись |
Свойство |
Значение |
Набор данных, Query1 |
- |
Active |
True |
DatabaseName |
C:\BD\ | ||
Name |
Query1 | ||
SQL |
SELECT Uslugi.NSpisok, Pacient.NJob, sum((NData_Vipiska - NData_Postuplenie) * Uslugi.NOplata_za_1_day) FROM " C:\BD\Pacient.db" Pacient INNER JOIN " C:\BD\Med. uslugi.DB" Uslugi ON (Pacient.NPolis = Uslugi.NPolis) WHERE NData_Vipiska is not NULL Group By Uslugi.NSpisok, Pacient.NJob Order By Pacient.NJob | ||
Шаблон графика, DBChart1 |
- |
DataSet |
Query1 |
Таблица 6.8 – Свойства компонентов формы Ot1
Компонент и его имя |
Надпись |
Свойство |
Значение |
Набор данных, Query1 |
- |
Active |
True |
DatabaseName |
C:\BD\ | ||
Name |
Query1 | ||
SQL |
SELECT Pacient.NJob, Pacient.NFamily, Pacient.NName, Pacient.NPatromyc,sum((NData_ FROM " C:\BD\Pacient.db" Pacient INNER JOIN " C:\BD\Med. uslugi.DB" Uslugi ON (Pacient.NPolis = Uslugi.NPolis) WHERE NData_Vipiska is not NULL Group By Pacient.NJob, Pacient.NFamily, Pacient.NName, Pacient.NPatromyc Order By Pacient.NJob | ||
"заготовка отчёта", QuickRep1 |
- |
DataSet |
Query1 |
Name |
QuickRep1 | ||
Месторасположение компонентов, QRBand2 |
- |
Name |
QRBand2 |
BandType |
rbTitle | ||
Месторасположение компонентов, QRGroup1 |
- |
Name |
QRGroup1 |
Expression |
Query1.NJob | ||
Месторасположение компонентов, QRGroup2 |
- |
Name |
QRGroup2 |
Месторасположение компонентов, QRGroup3 |
- |
Name |
QRGroup3 |
Текстовая строка, QRLabel2 |
- |
Caption |
Отчет по предприятиям |
Font |
TimeNewRoman, 26pt | ||
Name |
QRLabel12 | ||
Color |
clRed | ||
Текстовая строка, QRLabel12 |
- |
Caption |
Сумма |
Font |
TimeNewRoman, 18pt | ||
Name |
QRLabel2 | ||
Color |
ClGreen | ||
Текстовая строка, QRLabel3 |
- |
Caption |
Организация |
Font |
TimeNewRoman, 12pt | ||
Name |
QRLabel3 | ||
Color |
ClGreen | ||
Текстовая строка, QRLabel4 |
- |
Caption |
Фамилия |
Font |
TimeNewRoman, 12pt | ||
Name |
QRLabel4 | ||
Color |
clGreen |
Продолжение таблицы 6.8
Компонент и его имя |
Надпись |
Свойство |
Значение |
Текстовая строка, QRLabel5 |
- |
Caption |
Имя |
Font |
TimeNewRoman, 12pt | ||
Name |
QRLabel5 | ||
Color |
clGreen | ||
Текстовая строка, QRLabel6 |
- |
Caption |
Отчество |
Font |
TimeNewRoman, 12pt | ||
Name |
QRLabel6 | ||
Color |
clGreen | ||
Вывод содержимого текстового поля, QRDBText1 |
- |
DataField |
NJob |
DataSet |
Query1 | ||
Font |
TimeNewRoman, 12pt | ||
Color |
clBlue | ||
Вывод содержимого текстового поля, QRDBText4 |
- |
DataField |
NFamily |
DataSet |
Query1 | ||
Font |
TimeNewRoman, 12pt | ||
Color |
clWindowText | ||
Вывод содержимого текстового поля, QRDBText5 |
- |
DataField |
NName |
DataSet |
Query1 | ||
Font |
TimeNewRoman, 12pt | ||
Color |
clWindowText | ||
Вывод содержимого текстового поля, QRDBText9 |
- |
DataField |
NPatromyc |
DataSet |
Query1 | ||
Font |
TimeNewRoman, 12pt | ||
Color |
clWindowText | ||
Вывод содержимого текстового поля, QRDBText10 |
- |
DataField |
SUM OF NData_Vipiska - |
DataSet |
Query1 | ||
Font |
TimeNewRoman, 12pt | ||
Color |
clWindowText | ||
Вывод содержимого текстового поля, QRDBText2 |
- |
DataField |
SUM OF NData_Vipiska - |
DataSet |
Query1 | ||
Font |
TimeNewRoman, 12pt | ||
Color |
clWindowText |
Информация о работе База данных со сведениями о пациентах и медицинских услугах в стационаре