Операції з нерухомістю
МІНІСТЕРСТВО ОСВІТИ І НАУКИ
УКРАЇНИ
КРИВОРІЗЬКИЙ КОЛЕДЖ
НАЦІОНАЛЬНОГО АВІАЦІЙНОГО УНІВЕРСИТЕТУ
Відділення комп’ютерної та
програмної інженерії
Циклова комісія
професійно-орієнтованих дисциплін
Курсова робота
з дисципліни «Основи баз
даних і знань»
«Операції з нерухомістю»
для напрямків підготовки (спеціальностей):
.05010301 «Програмування для електронно-обчислювальної
техніки і автоматизованих систем»
Виконав:
курсант 4-го курсу 387 групи
Гайдаренко В.Ю.
Керівник: Приходько І.О.
Кривий Ріг 2010
Завдання
на виконання курсової роботи
Тема
курсової роботи:
Администрация агентства недвижимости заказала разработку информационной
системы для отдела работы с клиентами. Система предназначена для обработки
данных о квартирах, которые покупает и продает агентство, расценках на
квартиры, расценках на оказываемые услуги, о покупателях и совершенных
сделках.. Система должна выдавать отчеты по запросу менеджера:
прайс-лист на квартиры (возможно с группировкой по различным признакам), на
услуги, отчеты по возможным вариантам сделок для покупателей и продавцов.
Термін виконання роботи: з 01.09.2010 р. по 14.12.2010 р.
Етапи роботи над КР:
Стадії та етапи
робот
|
Зміст робот
|
Термін виконання
|
Вступна частина
|
Актуальність,
визначення об’єкту, предмету, мети, постановка задач та методів їх
розв’язання.
|
30.09.2010
|
Описання предметної
області
|
Визначення
сутностей, їх атрибутів, зв’язків між ними. Основні теоретичні положення.
|
16.10.2010
|
Проектування бази
даних
|
Побудова
інфологічної моделі та фізичне проектування структури таблиць бази даних.
|
21.10.2010
|
Проектування
інтерфейсу програми
|
Створення головного
меню, панелі інструментів та форм додавання, редагування і вилучення записів
з таблиць бази даних.
|
04.11.2010
|
Організація пошуку
та фільтрації
|
Розробка форм для
організації простого та складного пошуку записів в таблицях бази даних, а
також організація фільтрації даних.
|
18.11.2010
|
Розробка звітності.
|
Формування звітів
за допомогою мови запитів SQL.
|
25.11.2010
|
Оформлення курсової
роботи
|
Підведення
підсумків проведеного дослідження та оформлення курсової роботи у
відповідності з критеріями.
|
02.12.2010
|
Завдання видав __________ (Приходько І.О.) “__” ______ 201___
р.
Завдання прийняв до виконання ______________________________
Курсова робота захищена з оцінкою __________________________
Голова комісії ____________ (Андрусевич Н.В.) “___” _______
201__ р.
Члени комісії __________ ___________________
__________ ___________________
Зміст
I. Теоретична частина
.1 Постановка завдання
.2 Описання предметної області
.3 Проектування бази даних
.4 Описання функцій користувача. Практична частина
.1 Інтерфейс користувача
.2 Лістинг програми
Висновок
Література
I.
Теоретична частина
.1
Постановка завдання
Автоматизація виробництва - вищий рівень розвитку машинної техніки,
коли регулювання й управління
<#"656102.files/image001.gif">
Рис. 1.3.1
Таблиця 1.3.1
Інфологічна модель бази даних «Каталог агентства нерухомості»
побудованою мовою «Таблиці-зв’язки»
Створимо таблицю для відомості, яка складатиметься з шести
полів:
Рис. 1.3.2 Фізична структура сутності «Відомість»
Друга таблиця зберігатиме дані вузлів
Рис. 1.3.3 Фізична структура сутності «Операція»
Рис. 1.3.4 Фізична структура сутності «Назначення»
Рис. 1.3.5 Фізична структура сутності «Власність»
Рис. 1.3.6 Фізична структура сутності «Розташування»
Рис. 1.3.7 Фізична структура сутності «Нерухомість»
Рис. 1.3.8 Фізична структура сутності «Клієнти»
1.4
Описання функцій користувача
На останок слід зупинитися на функціональності нашого
майбутнього програмного забезпечення, яке повинно автоматизувати швидкий пошук
квартир які на даний час вільні або здаються.. Отже, наш додаток повинен
виконувати наступні функції:
- додавання клієнта в базу даних, що передбачає
внесення інформації про його ФІО,адрес його, паспортні дані;
- редагування інформації клієнта: у випадку зміни
клієнтом адреси проживання або прізвища виникає необхідність у уточнені його
даних;
додавання та редагування інформації про нерухомість;
додавання інформації про операцій, на значення якщо
форма зайнялася новим видом діяльності;
програма обов’язково повинна бути дружньою до
інтерфейсу операційної системи - повинна мати головне меню та віконну
технологію в цілому;
II.
Практична частина
.1
Інтерфейс користувача
На малюнку нижче представлена головна форма додатку по
автоматизації роботи клієнтів.
Головне меню «Показать таблицы» містить команди: Вид
операции, Назначение, Собственность, Расположение які відображають другорядні
форми.
Друге меню «Послуги» містить свідчення про наш магазин та про
послуги, що він надає.
Третє меню «Звіт» виводить звіт про клієнтів та про закази.
Рис. 2.1.1 Головне вікно програми «Форма клієнту»
Форма для роботи зі звітом має наступний вигляд:
Рис. 2.1.2 Вікно для роботи з таблицею «Звіт»
Рис. 2.1.3 Вікно для роботи з таблицею «Нерухомість»
Для додавання даних до таблиці потрібно заповнити усі поля та
нажати на клавішу «Добавити». Відбудеться додавання даних у таблицю із
додаванням номерну на одиницю більшого ніж був. Для позбавлення від певного
запису виділяємо потрібну строку та жмемо на «Удалить».
Рис. 2.1.4 Вікно для роботи з таблицею «Назначение»
Для того, щоб добавити данні у таблицю «Нанзначения» потрібно
записати потрібне нам значення до вільної строки та натиснути на додавання.
Аналогічним чином відбувається додавання даних до таблиць операцій,
приватності, розташування.
Рис. 2.1.5 Вікно для роботи з таблицею «Розташування»
Рис. 2.1.6 Вікно друкування звіту
Нижче приведений звіт виконаний на основі даних про клієнтів,
що користуються послугами фірми.
Рис. 2.1.7 Вікно друкування звіту про клієнтів
2.2
Лістинг програми
автоматизація нерухомість атрибут інтерфейс
//Unit1.pasTForm1.DBGrid2CellClick(Column: TColumn);.Text:=
dm1.QKlient.FieldValues ['fam'];.Text:= dm1.QKlient.FieldValues
['name'];.Text:= dm1.QKlient.FieldValues ['name2'];.Text:=
dm1.QKlient.FieldValues ['strana'];.Text:= dm1.QKlient.FieldValues
['gorod'];.Text:= dm1.QKlient.FieldValues ['yl'];.Text:=
dm1.QKlient.FieldValues ['dom_kv'];.Text:= dm1.QKlient.FieldValues
['n_pasp'];.Text:= dm1.QKlient.FieldValues ['seria'];.Text:=
dm1.QKlient.FieldValues ['id_nomer'];;
...Добавление записи та редактирование
procedure TForm1.Button2Click(Sender: TObject);n,s:
string;.Qklient.Last;:=inttostr(dm1.Qklient.FieldValues['n']+1);:='insert into
klient
values("'+n+'","'+edit1.text+'","'+edit2.text+'","'+edit3.text+'","'+edit4.text+'","'+edit5.text+'","'+edit6.text+'","'+edit7.text+'","'+edit8.text+'","'+edit9.text+'","'+edit10.text+'");';.Qklient.Close;.Qklient.SQL.Clear;.Qklient.SQL.Add(s);
//
showmessage(s);.Qklient.ExecSQL;.Qklient.Close;.Qklient.SQL.Clear;.Qklient.SQL.Add('select
n,fam ||name ||name2 as FIO,fam,name,name2,Strana,gorod,yl,dom_kv,N_pasp,seria,ID_nomer
from klient');.Qklient.Open
;.Qklient.Last;:=inttostr(dm1.Qklient.FieldValues['n']+1);;
//Удаление записиTForm1.Button5Click(Sender: TObject);n :
integer;:=dm1.Qklient.FieldValues
['n'];.Qklient.Close;.Qklient.SQL.Clear;.Qklient.SQL.Add('delete from klient
where n='+inttostr(n));.Qklient.ExecSQL;
;.Qklient.Close;.Qklient.SQL.Clear;.Qklient.SQL.Add('select n,fam ||name
||name2 as FIO,fam,name,name2,Strana,gorod,yl,dom_kv,N_pasp,seria,ID_nomer from
klient');.Qklient.Open ;; if edit1.Text= table1.FieldByName('name').AsString
then:=1;;.next;;
//Фильтрация данняхTForm1.Button7Click(Sender:
TObject);RadioButton1.Checked=true then.Qklient.Close;.Qklient.SQL.Clear;.Qklient.SQL.Add('select
n,fam ||name ||name2 as
FIO,fam,name,name2,Strana,gorod,yl,dom_kv,N_pasp,seria,ID_nomer from klient
where
fam="'+edit14.text+'"');.Qklient.Open;.Text:='';RadioButton2.Checked=true
then.Qklient.Close;.Qklient.SQL.Clear;.Qklient.SQL.Add('select n,fam ||name
||name2 as FIO,fam,name,name2,Strana,gorod,yl,dom_kv,N_pasp,seria,ID_nomer from
klient where
ID_nomer="'+edit14.text+'"');.Qklient.Open;.Text:='';RadioButton3.Checked=true
then.Qklient.Close;.Qklient.SQL.Clear;.Qklient.SQL.Add('select n,fam ||name
||name2 as FIO,fam,name,name2,Strana,gorod,yl,dom_kv,N_pasp,seria,ID_nomer from
klient where
gorod="'+edit14.text+'"');.Qklient.Open;.Text:='';RadioButton4.Checked=true
then.Qklient.Close;.Qklient.SQL.Clear;.Qklient.SQL.Add('select n,fam ||name
||name2 as FIO,fam,name,name2,Strana,gorod,yl,dom_kv,N_pasp,seria,ID_nomer from
klient where fam BETWEEN'+quotedstr(edit15.Text)+'
AND'+quotedstr(edit17.Text));.Qklient.Open;.Text:='';;;
//пошукTForm1.Button10Click(Sender:
TObject);.qklient.Locate('fam',edit18.Text,[]);.Text:='';;
//Показать отчеTForm1.MSWord1Click(Sender:
TObject);.QuickRep1.PreviewModal;;
//фильтрация на вкладке
НедвижимостьTForm1.Button11Click(Sender: TObject);RadioButton5.Checked=true
then.QNedv.Close;.QNedv.SQL.Clear;.QNedv.SQL.Add('select * from nedvij where
n_oper="'+inttostr(strtoint(DBLookupComboBox7.KeyValue))+'"');.QNedv.Open;RadioButton6.Checked=true
then.QNedv.Close;.QNedv.SQL.Clear;.QNedv.SQL.Add('select * from nedvij where
n_nazn="'+inttostr (strtoint(DBLookupComboBox7.KeyValue))+'"');.QNedv.Open;RadioButton7.Checked=true
then.QNedv.Close;.QNedv.SQL.Clear;.QNedv.SQL.Add('select * from nedvij where
n_sobstv="'+inttostr (strtoint(DBLookupComboBox7.KeyValue))+'"');.QNedv.Open;;;TForm1.RadioButton5Click(Sender:
TObject);.ListSource:=DM1.DSvid;.KeyField:='N';.ListField:='Name';;TForm1.RadioButton6Click(Sender:
TObject);.ListSource:=DM1.DSNazn;.KeyField:='N';.ListField:='Name';;TForm1.RadioButton7Click(Sender:
TObject);.ListSource:=DM1.DSSobstv;.KeyField:='N';.ListField:='Name';;
Висновок
Ця курсова робота розглядаю практичну реалізацію для
підприємства нерухомості програми автоматизуючи процес додавання, пошуку та
фільтрації даних за критеріями. Для реалізації цієї програми я використав
можливості оболонки Borland Delphi 7, а також СУБД BDE для DB dBASE IV та мова
запитів SQL.
У програмі на першому модулі розглядаюся 3 основні таблиці,
які мають функції додавання, редагування та видалення інформації з них.
Предметна область мого технічного завдання може бути
необмеженої, якщо до неї включити все Українську мережу нерухомості,
організувати співробітництво з іншими схожими агентствами. Тому в межах моєї
курсової роботи обмежена кількість сутностей, які до того ж є ключовими в даній
предметній області.
Всі завдання поставлені нами на початку дослідження були
виконані. Також біли реалізовані наступні функції:
ü Додавання, редагування та вилучення
клієнтів та інформації про помешкання;
ü Зберігання, редагування та вилучення
інформації по помешкання,а також зберігання дати ;
ü Були розроблені форми, які
відповідають стандартам операційної системи Windows;
ü Було організовано фільтрацію та пошук
по всій моїй базі даних;
Дана реалізована мною програма не є остаточною версією для
роботи з БД нерухомості, та буде поступово змінюватися у процесі пізнання мови
SQL та баз даних.
Література
1.
Конспект лекцій з предмету «Основи баз даних та знань»
2. Антифеев
Дм.Д. Современные средства построения корпоративных систем поддержки принятия
управленческих решений "Терн", М., 2001
3.
Рогач І. Ф., Сендзюк М. А., Антонюк В. А. Інформаційні системи у
фінансово-кредитних установах: Навч. посібник. - 2-ге вид.,
.
Савчук Т.О. Організація баз даних і знань. Вінниця: ВДТУ, 2000 р.
.
Кельдер Т.Л. Системи обробки економічної інформації. Курс лекцій.
6. Степанов
Ю.Л. Разработка приложений баз данных для СУБД Sybase SQL Anywhere.
Санкт-Петербургский филиал Военного университета ПВО. Электронная версия - http://www.cіtforum.elcat.kg/database/sql_any/іndex.shtml