Создание и заполнение базы данных «Кондитерские изделия», страница 2

Некоторые пункты меню включают в себя подпункты, которые приведены ниже:

Рис. 3. Подпункты меню


Данные

Для демонстрации работы базы данных, в неё были внесены следующие данные:

Рис. 4. Содержимое таблицы izdelie

Рис. 5. Содержимое таблицы hranenie

Рис.6. Содержимое таблицы postavka

Рис.7. Содержимое таблицы klient

Формы и запросы, используемые для ввода информации

В данном разделе рассматриваются используемые формы и программные коды, реализующие соответствующие функции:

Главное меню

Рис. 8. Главное меню

Код метода Click кнопок «Просмотр таблиц», «Редактирования таблиц», «Запросы», «Выход»:

RELEASE WINDOWS

DO FORM ".\form2.scx"

------------------------------------

RELEASE WINDOWS

DO FORM ".\form3.scx"

------------------------------------

RELEASE WINDOWS

DO FORM ".\form8.scx"

------------------------------------

RELEASE WINDOWS


Просмотр таблиц

Рис. 9. Просмотр таблиц

Код метода Click кнопок «Кондитерские изделия», «Информация о хранении», «Информация о поставщиках», «Информация о клиентуре», «Назад»:

DO izdelie.qpr

------------------------------------

DO hranenie.qpr

------------------------------------

DO postavka.qpr

------------------------------------

DO klient.qpr

------------------------------------

RELEASE WINDOWS

DO FORM form1.scx

Содержимое вышеперечисленных запросов в порядке следования:

SELECT Izdelie.название, Izdelie.вид, Izdelie.дата_изг,;

  Izdelie.место_изг, Izdelie.цена_руб, Izdelie.вес_грамм;

 FROM izdelie

------------------------------------

SELECT Hranenie.название, Hranenie.дата_изг, Hranenie.т_хранения,;

  Hranenie.хран_дней, Hranenie.порча_дней;

 FROM hranenie

------------------------------------

SELECT Postavka.название, Postavka.фирма, Postavka.кол_во, Postavka.брак,;

  Postavka.город;

 FROM postavka

------------------------------------

SELECT Klient.фио, Klient.город_отпр, Klient.название, Klient.колво_мес,;

  Klient.колво_3мес, Klient.колво_6мес;

 FROM klient


Форма для редактирования таблиц

Рис. 10. Редактирование

Код метода Click кнопок «Кондитерские изделия», «Информация о хранении», «Информация о поставщиках», «Информация о клиентуре», «Назад»:

RELEASE WINDOWS

DO FORM ".\form4.scx"

------------------------------------

RELEASE WINDOWS

DO FORM ".\form5.scx"

------------------------------------

RELEASE WINDOWS

DO FORM ".\form6.scx"

------------------------------------

RELEASE WINDOWS

DO FORM ".\form7.scx"

------------------------------------

RELEASE WINDOWS

DO FORM form1.scx

Рис.11.Форма для редактирования первой таблицы

Код метода Click кнопок «Показать таблицу», «Назад»:

DO izdelie.qpr

------------------------------------

RELEASE WINDOWS

DO FORM form3.scx

Содержимое запроса izdelie.qpr описано выше. Блок кнопок Top…Exit – это элемент класса MS Fox Pro wizbtns, называемыйtxtbtns.

С помощью данного окна выполняется редактирование таблицы «Кондитерские изделия».

Предусмотрен вывод отчета на экран по нажатию кнопки «Print». Код кнопки «Print»:

REPORT FORM ".\izdelie.frx" PREVIEW

Рис.12. Пример отчета


Рис.13.Форма для редактирования второй таблицы

Рис.14.Форма для редактирования третей таблицы

Рис.15.Форма для редактирования четвертой таблицы

Форма запросов

Рис. 16. Форма запросов

Код метода Click кнопок в порядке следования:

RELEASE WINDOWS

DO FORM ".\form9.scx"

------------------------------------

RELEASE WINDOWS

DO FORM ".\form10.scx"

------------------------------------

RELEASE WINDOWS

DO FORM ".\form11.scx"

.

.

.

RELEASE WINDOWS

DO FORM ".\form21.scx"

------------------------------------

RELEASE WINDOWS

DO FORM ".\form1.scx"


Отсортированные списки

Рис 17. Меню запроса

Код метода Click кнопок «По дате изготовления», «В алфавитном порядке», «По весу изделия», «По стоимости изделия», «Назад»:

DO query1.qpr