Создание базы данных "Кондитерские изделия"

Размещено на http://www.allbest.ru/

Задание

Основная база данных "Кондитерские изделия". Сформировать несколько таблиц. Предусмотреть: меню, печать на экран, ввод данных, редактирование, просмотр данных. Реализовать с использованием нескольких таблиц следующие типы запросов:

¦ Для каждого вида кондитерского изделия указать сведения о нем (наименование, дата выпуска, место изготовления, цена, вес и т.п.).

¦ Для каждого вида товара указать сведения о поставщике (наименование, регулярность поставок, процент бракованной продукции т.д.).

¦ Для каждого вида товара выдать список, отсортированный:

¦ по дате выпуска,

¦ в алфавитном порядке,

¦ по весу,

¦ по стоимости.

¦ Найти самое дорогое кондитерское изделие, самое дешевое, среднюю стоимость.

¦ Найти товар с ценой свыше 5 руб. (и любая другая сумма, т.е. предусмотреть ввод цены с клавиатуры).

¦ Найти количество товара, проданного за определенный период (месяц, 3 месяца, 6 месяцев), среднюю стоимость, за тот же период - самое дорогое кондитерское изделие, самое дешевое, вес.

¦ Найти долю товара, поступившего от заданного поставщика (ввод поставщика) от общего числа поставщиков.

¦ Найти все кондитерские изделия с заданной датой выпуска (ввод даты).

¦ Найти все кондитерские изделия с заданным весом (ввод), чья стоимость находится в заданных пределах (ввод интервала).

¦ Найти все кондитерские изделия, поступившие от заданного поставщика (ввод поставщика), чья стоимость больше заданной (ввод стоимости).

¦ Найти все кондитерские изделия заданного производителя (выбор).

¦ Найти долю дешевого товара (меньше заданного, ввод ограничения) от общего числа товара.

¦ При заданной (ввод) температуре определить, какие виды продукции портятся, как быстро.

¦ Для каждого клиента составить список продукции, которая закупается, указать цену, количество, качество и т.д.

¦ Для стоимости в заданных (ввод интервала) пределах составить список товара, которые можно закупить, указав количество, качество.



Оглавление

1. Структура базы данных и таблиц

2. Запросы к базе данных и интерфейс пользователя

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

4. Поиск по цене



1. Структура базы данных и таблиц

Структура базы данных

В базе данных konditerсозданы 4 основных таблицы:

izdelie- таблица, в которой хранятся основные сведения о кондитерских изделиях (название, вид, дата изготовления, место изготовления и т.д.);

hranenie - таблица, в которой хранятся сведения о хранении кондитерского изделия;

postavka- таблица, в которой хранятся сведения о поставщиках;

klient - таблица, в которой хранятся сведения о клиентуре.

Рис. 1. База данных

Также есть 3 вспомогательные таблицы, используемые для формирования запросов:

zapros_stoimost- содержит минимальную, максимальную и среднюю стоимость изделий;

table3 - содержит минимальную, максимальную и среднюю стоимость изделий поступивших за определенный период;

table5 - содержит общее количество поставленного товара.

Структура таблиц

Таблица izdelie содержит следующие поля:

· Название;

· Вид;

· Дата_изг;

· Место_изг;

· Цена_руб;

· Вес_грамм.

Таблица hranenie содержит следующие поля:

· Название;

· Дата_изг;

· Т_хранения;

· Хран_дней

· Порча_дней.

Таблица postavka содержит следующие поля:

· Название;

· Фирма;

· Кол_во;

· Брак;

· Город.

Таблица klient содержит следующие поля:

· ФИО;

· Город_отпр;

· Название;

· Колво_мес;

· Колво_3мес;

· Колво_6мес.

2. Запросы к базе данных и интерфейс пользователя

Интерфейс пользователя

Одним из средств управления базой данных является меню. С помощью него можно просматривать и редактировать данные, а также можно перейти в пользовательскую форму.

Рис. 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

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

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

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

FROM izdelie

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

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

FROM hranenie

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

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

Postavka.город;

FROM postavka

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

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

FROM klient

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

Код метода 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"



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

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

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

DO query1.qpr

DO query2.qpr

DO query3.qpr

DO query4.qpr

RELEASE WINDOWS

DO FORM ".\form8.scx"

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

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

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

FROM izdelie;

ORDER BY Izdelie.дата_изг

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

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

FROM izdelie;

ORDER BY Izdelie.название

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

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

FROM izdelie;

ORDER BY Izdelie.вес_грамм

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

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

FROM izdelie;

ORDER BY Izdelie.цена_руб

Рис 18. Пример работы запроса (сортировка по дате изготовления)

Рис 19. Пример работы запроса (сортировка в алфавитном порядке)

Рис 20. Пример работы запроса (сортировка по весу)



Рис 21. Пример работы запроса (сортировка по цене)

4. Поиск по цене

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

Код метода Click кнопок «Самое дорогое», «Самое дешевое», «Средняя цена», «Стоимости отдельно», «Назад»:

DO query7.qpr

DO query6.qpr

DO query8.qpr

DO query5.qpr

BROWSE

RELEASE WINDOWS

DO FORM ".\form8.scx"

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

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

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

FROM ;

izdelie,;

zapros_stoimost;

WHERE Izdelie.цена_руб = Zapros_stoimost.max_цена_р

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

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

FROM ;

izdelie,;

zapros_stoimost;

WHERE Izdelie.цена_руб = Zapros_stoimost.min_цена_р

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

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

FROM ;

izdelie,;

zapros_stoimost;

WHERE Izdelie.цена_руб = Zapros_stoimost.avg_цена_р

SELECT MIN(Izdelie.цена_руб), MAX(Izdelie.цена_руб),;

AVG(Izdelie.цена_руб);

FROM ;

izdelie;

INTO TABLE zapros_stoimost.dbf

Рис. 23. Результат (max)

Рис. 24. Результат (min)

Рис. 25. Результат (avg)



Рис. 26. Результат (стоимости отдельно)

Товар с ценой выше заданной

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

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

cena = thisform.text1.value

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

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

FROM ;

izdelie;

WHERE Izdelie.цена_руб> ( cena );

ORDER BY Izdelie.цена_руб

RELEASE WINDOWS

DO FORM ".\form8.scx"

Рис. 28. Результат



Количество товара, проданного за период

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

Код метода Initэлемента ComboBox:

this.List(1)="1"

this.List(2)="3"

this.List(3)="6"

Код метода Click кнопки «Найти количество товара …», «Минимальная стоимость…», «Средняя стоимость…», «Максимальная стоимость…», «Стоимости отдельно», «Назад»:

y = thisform.combo1.value

IF y == '1'

SELECT SUM(Klient.колво_мес) FROM klient

ENDIF

IF y == '3'

SELECT SUM(Klient.колво_3мес) FROM klient

ENDIF

IF y == '6'

SELECT SUM(Klient.колво_6мес) FROM klient

ENDIF

y = thisform.combo1.value

IF y == '1'

SELECT Izdelie.название, Table3.min_exp_3 AS общая_стоимость,;

Размещено на Allbest.ru

...