Форма «Заказ сувенир/полиграфия»
Поможем в ✍️ написании учебной работы
Поможем с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой

Форма представлена на рис.3.5.8. Она предназначена для просмотра, ввода, редактирования и удаления данных о заказах, поиска нужной записи по названию продукции, сортировки данных по типу продукции.

Источником записей данной формы является таблица «Тип». Источником строк для имеющейся здесь подчиненной формы является Запрос «Тип», сформированный на основе таблицы «Заказ»:

SELECT Заказ.Код№, Заказ.Name,

Заказ.КодТип, Заказ.Шт, Заказ.Счет,

Заказ.Цена, Заказ.КодИзготов, Заказ.Срок,

Заказ.СШт, Заказ.Дата, Заказ.№

FROM Тип INNER JOIN Заказ ON Тип.КодТип = Заказ.КодТип

WHERE (((Заказ.КодТип)=[Forms]![Сувенир]![Тип]));

Поле со списком «ТипПродукции» - источником его строк является значение столбца «Тип» из таблицы «Тип». Команда Select-SQL:

SELECT Тип.КодТип, Тип.Тип FROM Тип;

Поле со списком «НазваниеВыставки» - источником его строк является значение столбца «Название» из таблицы «СписокВыставок». Команда Select-SQL:

SELECT СписокВыставок.№, СписокВыставок.Название

FROM СписокВыставок;

Поле со списком «Изготовитель» - источником его строк является значение столбцов «Изготовитель» из таблицы «Изготовитель». Команда Select-SQL:

SELECT Изготовитель.КодИзготов,

Изготовитель.Изготовитель, Изготовитель.Телефон

FROM Изготовитель;

Поле «Поиск» обеспечивает поиск записи по названию продукции с возможностью перехода на найденную запись;

Кнопка «Годовой отчет» - при нажатии вызывает отчет «Сувенир/полиграфия» (рис.3.6.3);

Кнопка «Выход» - при нажатии закрывает форму «Заказ сувенир/полиграфия».

Код обработчика событий элементов управления формы, представлен в приложении (пункт 8).

 

Форма «Сотрудник»

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

Источником записей для формы «Сотрудник» является таблица «Сотрудник». Источником строк для имеющейся здесь подчиненной формы с контактной информацией о сотруднике является Запрос «ВыборСотрудник», сформированный на основе таблицы «Сотрудник»:

SELECT Сотрудник.КодСотрудник,

Сотрудник.ФИО, Сотрудник.FIO,

Сотрудник.Должность, Сотрудник.Doljnost,

Сотрудник.ВнутрТелефон, Сотрудник.МобТелефон,

Сотрудник.Email,

FROM Сотрудник

WHERE (((Сотрудник.КодСотрудник)=[Forms]![Сотрудник]![ФИО]));

Источником строк для подчиненной формы с информацией о заказах визитных карточек является Запрос «ЗаказВизитка», сформированный на основе таблицы «Визитки»:

SELECT Визитки.№, Визитки.Шт,

Визитки.КодИзготов, Визитки.Счет,

Визитки.Цена, Визитки.Срок,

Визитки.КодСотрудник, Визитки.Дата

FROM Сотрудник INNER JOIN Визитки ON Сотрудник.КодСотрудник = Визитки.КодСотрудник

WHERE (((Визитки.КодСотрудник)=[Forms]![Сотрудник]![ФИО]));

Источником строк для подчиненной формы с информацией о клиентах является Запрос «ЗапросКлиент», сформированный на основе таблицы «СписокКлиентов»:

SELECT СписокКлиентов.Организация,

СписокКлиентов.Отчет, СписокКлиентов.Код№

FROM Сотрудник INNER JOIN СписокКлиентов ON

Сотрудник.КодСотрудник = СписокКлиентов.КодСотрудник

WHERE (((СписокКлиентов.КодСотрудник)=[Forms]![Сотрудник]![ФИО]));

Поле со списком «ФИО» - источником его строк является значение столбца «ФИО» из таблицы «Сотрудник». Команда Select-SQL:

SELECT Сотрудник.КодСотрудник,

Сотрудник.ФИО

FROM Сотрудник;

Кнопки «MAKET(RUS)» и «MAKET(ENG)» - при нажатии вызывают отчет «RUSВизитка» и отчет «ENGВизитка» соответственно (рис.3.6.4 (а), рис.3.6.4 (б));

Поле «Организация» - двойное нажатие кнопки на это поле вызывает открытие формы «Клиенты»;

Поле со списком «Изготовитель» - двойное нажатие кнопки на это поле вызывает открытие формы «Изготовитель». Источником строк для этого является значение столбца «Изготовитель» из таблицы «Изготовитель». Команда Select-SQL:

SELECT Изготовитель.КодИзготов,

Изготовитель.Изготовитель,

Изготовитель.Телефон

FROM Изготовитель;

Кнопка «Выход» - при нажатии закрывает форму «Сотрудник».

Код обработчика событий элементов управления формы, представлен в приложении (пункт 9).

 

Форма «Клиенты»

Форма представлена на рис.3.5.10. Она позволяет просматривать информацию о потенциальных клиентах, редактировать, добавлять и удалять записи.

Источником записей для формы «Клиенты» является Запрос «Клиент», построенный на основе таблицы «СписокКлиентов»:

SELECT СписокКлиентов.Код№,

СписокКлиентов.Организация, СписокКлиентов.Фамилия,

СписокКлиентов.ИО, СписокКлиентов.Адрес,

СписокКлиентов.Телефон, СписокКлиентов.Отправлено,

СписокКлиентов.КодСотрудник, СписокКлиентов.Отчет, СписокКлиентов.№,

FROM Сотрудник INNER JOIN СписокКлиентов ON

Сотрудник.КодСотрудник = СписокКлиентов.КодСотрудник

WHERE ((СписокКлиентов.Организация)=

[Forms]![Сотрудник]![Рассылка].[Form]![Организация]));

Поле со списком «Сотрудник» - источником его строк является значение столбца «ФИО» из таблицы «Сотрудник». Команда Select-SQL:

SELECT Сотрудник.КодСотрудник, Сотрудник.ФИО

FROM Сотрудник;

Поле со списком «НазваниеВыставки» - источником его строк является значение столбца «Название» из таблицы «СписокВыставок». Команда Select-SQL:

SELECT СписокВыставок.№, СписокВыставок.Название

FROM СписокВыставок;

Кнопка «Приглашение» - при нажатии вызывает отчет «Приглашение на выставку» (рис.3.6.5);

Кнопка «Удалить запись» - при нажатии удаляет запись из таблицы и закрывает форму «Клиенты»;

Кнопка «Отправить Инф. письмо» - при нажатии открывает отчет «Информационное письмо» (рис.3.6.6);

Код обработчика событий элементов управления формы, представлен в приложении (пункт 10).

 

Форма «Изготовитель»

Форма представлена на рис.3.5.11. Она позволяет просматривать контактную информацию изготовителя сувенирной/полиграфической продукции, редактировать, добавлять и удалять записи.

Источником записей для формы «Изготовитель» является Запрос «Изготов»:

SELECT Изготовитель.КодИзготов,

Изготовитель.Изготовитель, Изготовитель.Телефон,

Сотрудник.КодСотрудник, Изготовитель.[Контактное лицо]

FROM Сотрудник INNER JOIN (Изготовитель INNER JOIN Визитки ON Изготовитель.КодИзготов = Визитки.КодИзготов) ON Сотрудник.КодСотрудник = Визитки.КодСотрудник

WHERE (((Изготовитель.КодИзготов)=

[Forms]![Сотрудник]![Визитки].[Form]![КодИзготов]));

Кнопка «Удалить запись» - при нажатии удаляет запись из таблицы и закрывает форму «Изготовитель»;

Код обработчика событий элементов управления формы, представлен в приложении (пункт 11).

 

Описание отчетов

Отчет «Расходы на рекламу»

Отчет по расходам на размещение рекламы представлен на рис.3.6.1. Источником записей для формирования отчета является запрос «РекламаГод»:

SELECT НосителиРекламы.Название, НосителиРекламы.КодТипНосителя,

НосителиРекламы.КодТипРекламы, НосителиРекламы.Счет,

НосителиРекламы.Цена, НосителиРекламы.Комментарий,

НосителиРекламы.Дата, НосителиРекламы.ДатаПоказа,

НосителиРекламы.КодГод

FROM НосителиРекламы

WHERE (((Year([НосителиРекламы].[Дата]))=[ВВЕДИТЕ ГОД]));

 

Отчет «Выставки»

Отчет по всем выставкам за указанный год представлен на рис.3.6.2. Источником записей для формирования отчета является запрос «ВыставкиГод»:

SELECT СписокВыставок.Название,

СписокВыставок.[Дата проведения], СписокВыставок.КодГод, СписокВыставок.КодМесто, СписокВыставок.Отчёт, СписокВыставок.КодУчастие, СписокВыставок.КодОрганизатор,

СписокВыставок.№, ВыстРасход.Код№,

ВыстРасход.Услуга, ВыстРасход.Счет,

ВыстРасход.Цена, Год.Год

FROM (Год INNER JOIN СписокВыставок ON

Год.КодГод = СписокВыставок.КодГод)

LEFT JOIN ВыстРасход ON СписокВыставок.№ = ВыстРасход.Код№

WHERE (((Год.Год)=[ВВЕДИТЕ ГОД]))

ORDER BY СписокВыставок.Название;

 

Отчет «Сувенир/полиграфия»

Отчет по всем заказам сувенирной и полиграфической продукции за указанный год представлен на рис.3.6.3. Источником записей для формирования отчета является запрос «СувГод»:

SELECT Заказ.Name, Заказ.КодТип, Заказ.Шт, Заказ.Счет,

Заказ.Цена, Заказ.КодИзготов, Заказ.Дата, Заказ.Код№

FROM Тип INNER JOIN (СписокВыставок RIGHT JOIN (Изготовитель RIGHT JOIN Заказ ON Изготовитель.КодИзготов = Заказ.КодИзготов) ON СписокВыставок.№ = Заказ.Код№) ON Тип.КодТип = Заказ.КодТип

WHERE (((Year([Заказ].[Дата]))=[ВВЕДИТЕ ГОД]));

 

Дата: 2019-07-30, просмотров: 191.