Рис. 7. Доля игрушек , проданных за определенный промежуток времени.
Рис. 7. Самый популярный вид игрушек для заданного возраста.
Рис. 7. Игрушки, поступившие от заданного поставщика, чья стоимость больше стоимости другой выбранной игрушки.
Рис. 7. Доля дешевых игрушек, поступивших от заданного поставщика.
Рис.3 Связи в БД
Рис. 21. Таблица «Postavshik» базы даных.
Рис. 21. Таблица «Tip» базы данных.
Для решения задачи в среде Visual FoxPro 6.0 были созданы следующие таблицы:
Таблица «Игрушки», внутренне имя – igrushki.dbf
Поле |
Тип поля |
Описание |
Id |
Integer(4) |
Уникальный идентификатор |
Nazvanie |
Character(25) |
Наименование игрушки |
Tip |
Integer(4) (Regular ) |
Идентификатор типа игрушки |
Postavshik |
Integer(4) (Regular ) |
Идентификатор поставщика |
Data_prodagi |
Date(8) |
Дата продажи |
Data_vipuska |
Date(8) |
Дата выпуска |
Ves |
Numeric(5,2) |
Вес |
Koll_prod |
Numeric(2,0) |
Количество проданных игрушек |
Stoimost |
Float(5,1) |
Цена |
Age_low |
Integer(4) |
Нижняя граница возраста |
Age_high |
Integer(4) |
Верхняя граница возраста |
Таблица «Типы», внутреннее имя – tip.dbf
Поле |
Тип поля |
Описание |
Id |
Integer(4) (primary) |
Уникальный идентификатор |
Avg_cost |
Float(5,3) |
Средняя стоимость по каждому типу |
Name_tip |
Character(25) |
Имя типа |
Таблица «Поставщики», внутренне имя – postavshik.dbf
Поле |
Тип поля |
Описание |
Id |
Integer(4) (primary) |
Уникальный идентификатор |
Name_postavshik |
Character(25) |
Имя поставщика |
Все запросы выполнены с помощью языка запросов SQL (Structured Query Language).
Сортировка по дате выпуска:
select DISTINCT igrushki.nazvanie as Название,;
igrushki.data_vipuska as Дата_выпуска;
from igrushki;
full join tip on igrushki.tip=tip.id;
full join postavshik on igrushki.postavshik=postavshik.id;
where tip.name_tip=ThisForm.Combo1.Value;
order by igrushki.data_vipuska
Сортировка по поставщику:
select DISTINCT igrushki.nazvanie as Название,;
postavshik.name_postavshik as Поставщик;
from prodagi;
full join igrushki on prodagi.id=igrushki.id;
full join tip on igrushki.tip=tip.id;
full join postavshik on igrushki.postavshik=postavshik.id;
where tip.name_tip=ThisForm.Combo1.Value;
order by postavshik.name_postavshik;
Сортировка по весу:
select DISTINCT igrushki.nazvanie as Название, igrushki.ves as Вес;
from igrushki;
full join tip on igrushki.tip=tip.id;
full join postavshik on igrushki.postavshik=postavshik.id;
where tip.name_tip=ThisForm.Combo1.Value;
group by igrushki.nazvanie;
order by igrushki.ves;
Сортировка по стоимости:
select DISTINCT igrushki.nazvanie as Название, max(igrushki.stoimost) as Цена;
from igrushki;
full join tip on igrushki.tip=tip.id;
full join postavshik on igrushki.postavshik=postavshik.id;
where tip.name_tip=ThisForm.Combo1.Value;
group by igrushki.nazvanie;
order by igrushki.stoimost
Уважаемый посетитель!
Чтобы распечатать файл, скачайте его (в формате Word).
Ссылка на скачивание - внизу страницы.