я полів у список важлива, тому що вона визначає порядок чергування полів у списку. Після того, як визначені потрібні поля/поле в список Index Fields натисніть ОК. У вікні запитується ім'я індексу. Слід ввести ім'я індексу і натиснути ОК. Не рекомендується складати назву індексу тільки з імен полів, оскільки такий спосіб іменування індексів використовується автоматично при створенні посилальної цілісності між таблицями.
Для наочності зв'язки між таблицями створимо нову форму, в якій будуть відображатися дані з першої і другої таблиць. Тут використані таблиці vrachi1 і Raspisanie. У підсумку отримаємо форму автоматичного виведення розкладу, в якій зазначено прізвище, ім'я, по батькові, № кабінету, ділянка та години прийому кожного лікаря.
. 2.6 Створення запитів
Отримати будь - які дані, що містяться в БД можна двома способами: за допомогою конструктора (SQL Builder) або програмно.
Для того щоб отримати будь-які дані в конструкторі, необхідно на форму додати елемент «TQuery», направити на нього курсор миші і натиснути ПКМ, потім вибрати «SQL Builder». У конструкторі вказати в «Database» - «man», а в полі «Table» - назва таблиць, з яких ми хочемо отримати інформацію.
Нам необхідно створити запит по категорії і за номером кабінету.
Щоб виконати цей запит програмно, необхідно на форму додати елементи «TQuery», «Ttable», «DBGrid» і пов'язати їх між собою. Причому в елементі «TQuery» вже немає необхідності прив'язувати його до якої-небудь таблиці. Елемент «DBGrid» необхідний, для виведення результату запиту.
Головний плюс у створенні програмного запиту полягає в тому, що ми можемо виконувати запит неодноразово, тобто в тілі запиту ми можемо вносити які-небудь зміни, не виходячи з вікна виведення результату запиту. Для цього додамо на форму ще 2 елемента - «Button» і «Edit.text», де перший елемент - це кнопка, а другий елемент - це поле введення тексту.
Розглянемо програму для цього запиту:
1. Програма запиту по категорії:
procedure TForm8.RadioButton1Click (Sender: TObject); (radiobutton1.Checked) and (edit1.text lt; gt; ) then.Close; .SQL.clear; .SQL.Add ( select familiya, imya, otchestvo,, god_post from vrachi1.dbf ) ;. SQL.Add ( where (kategoria= + edit1.text + ) );
query1.Open ;; end;
. Програма запиту за номером кабінету (який лікар працює в даному кабінеті):
procedure TForm8.RadioButton2Click (Sender: TObject); (radiobutton2.Checked) and (edit1.text lt; gt; ) then.Close; .SQL.clear; .SQL.Add ( select a.familiya, a.imya, a.otchestvo, b.n_kabineta from vrachi1.dbf a, raspisanie.dbf b ) ;. SQL.Add ( where (a.nomer=b.nomer) and ( n_kabineta= + edit1.text + ) ) ;. Open ;; end;
У результаті в таблиці з'являться Фамили Ім'я тільки тих працівників, які влаштувалися на роботу після 01.01.2005 року.
Код «SQL» KOD_SOTR, FAM_SOTR, IMA_SOTRsotrudniki.dbfDN_SOTR gt; 01.01.2005
Малюнок 7 - Запит
У результаті в таблиці з'являться код продажу, код товару, кількість товару, тип товару, марка товару тільки тих товарів, які були продані після 01.01.2010 року.
Код «SQL»
select KOD_PR, KOD_TOVAR, KOL_VO_PR, TIP_TOV, MARKA_TOV
from prodawi.dbf, tovaru.dbfDAT_PR gt; 01.01.2010
алгоритм утиліта фільтр запит
ВИСНОВОК
У ході виконання завдання була вивчена предметна область, на підставі якої був розроблений база даних управління діяльністю реєстратури поліклініки. Були створені форми введення даних про лікарів і пацієнтів, обчислювальний поле, фільтр, були з'єднані дві таблиці, створені запити, що задовольняють вимогам роботи реєстратури поліклініки. Поставлені завдання були виконані повністю.
СПИСОК ЛІТЕРАТУРИ
1.Брукс Ф.Міфіческій людино-місяць або як створюються програмні системи.- Пер. з анг.- СПб .: Символ-Плюс, 1999. - 304 с .: ил.
2.Романов Б.А DBase IV, призначення, функції, застосування.- М .: Наука, 1991. - 384 с.
.Бюрер К. Від ремесла до науки: пошук основних принципів розробки ПЗ.- М .: Наукова книга, 2004.
.Ліпаев В.В., Філінов Е.Н. Мобільність програм і даних у відкритих інформаційних системах.- М .: Наукова книга, 1997. - 368 с.
5. Маміконов А.Г. Методи розробки автоматизованих систем управління.- М .: Енергія, 1973.- 336 с.
ДОДАТОК
