Просмотр в режиме таблицы со связанной таблицей «Постановка_актер».
Все данные, полученные в варианте курсового проекта, успешно сохранены в разработанной базе данных и при необходимости к каждому из них можно обратиться с помощью запросов. Для примера мною были созданы несколько запросов:
Запрос 1.
Требуется вывести фамилии всех актеров, исполнивших роль Принца в «Лебедином озере» в различных постановках.
Текст на языке SQL.
SELECT Постановка_актер.Код_партии, Постановка_актер.Код_актера
FROM Постановка_актер
WHERE (((Постановка_актер.Код_партии)=78));
Результат выполнения запроса.
Запрос 2.
Требуется вывести в алфавитном порядке названия всех балетов, создателем которых является Игорь Моисеев.
Текст на языке SQL.
SELECT Создатели_балета.Код_создателя, Создатели_балета.Код_балета
FROM Создатели_балета
WHERE (((Создатели_балета.Код_создателя)=1))
ORDER BY Создатели_балета.Код_балета;
Результат выполнения запроса.
Запрос 3.
Требуется вывести названия всех балетов, музыку к которым написал Игорь Стравинский.
Текст на языке SQL.
SELECT Создатели_балета.Код_создателя, Создатели_балета.Код_балета
FROM Создатели_балета
WHERE (((Создатели_балета.Код_создателя)=13));
Результат выполнения запроса.
Запрос 4.
Требуется вывести названия всех балетов, созданных в 20 веке.
Текст на языке SQL.
SELECT Балет.Год_создания, Балет.Название
FROM Балет INNER JOIN Создатели_балета ON Балет.Код_балета = Создатели_балета.Код_балета
WHERE (((Балет.Год_создания)>1901))
ORDER BY Балет.Год_создания, Балет.Название;
Результат выполнения запроса.
Запрос 5.
Вывести все партии балета, заданного пользователем.
Текст на языке SQL.
SELECT Балет.Код_балета, [Хореографические партии].Партия
FROM Балет INNER JOIN [Хореографические партии] ON Балет.Код_балета = [Хореографические партии].Код_балета
WHERE (((Балет.Код_балета)=[Введите код балета]))
ORDER BY [Хореографические партии].Партия;
Результат выполнения запроса.
Запрос 6.
Вывести фамилии актеров и их партии в балетах, поставленных в заданном городе.
Текст на языке SQL.
SELECT Постановка.Город, Постановка_актер.Код_актера, Постановка_актер.Код_партии, Постановка.Код_балета
FROM Постановка INNER JOIN Постановка_актер ON Постановка.Код_постановки = Постановка_актер.Код_постановки
WHERE (((Постановка.Город)=[Введите город постановки]));
Результат выполнения запроса.
Запрос 7.
Создать новую таблицу, в которую в алфавитном порядке поместить ФИО актеров, а также название балета и их партию.
Текст на языке SQL.
SELECT Актеры.Фамилия, Актеры.Имя, Актеры.Отчество, Балет.Название, [Хореографические партии].Партия INTO новая
FROM (Создатели INNER JOIN (((Балет INNER JOIN Постановка ON Балет.Код_балета = Постановка.Код_балета) INNER JOIN (Актеры INNER JOIN Постановка_актер ON Актеры.Код_актера = Постановка_актер.Код_актера) ON Постановка.Код_постановки = Постановка_актер.Код_постановки) INNER JOIN Создатели_балета ON Балет.Код_балета = Создатели_балета.Код_балета) ON Создатели.Код_создателя = Создатели_балета.Код_создателя) INNER JOIN [Хореографические партии] ON ([Хореографические партии].Код_партии = Постановка_актер.Код_партии) AND (Балет.Код_балета = [Хореографические партии].Код_балета)
GROUP BY Актеры.Фамилия, Актеры.Имя, Актеры.Отчество, Балет.Название, [Хореографические партии].Партия
ORDER BY Актеры.Фамилия;
Результат выполнения запроса.
Тексты макросов (макрокоманда и список ее аргументов).
1. Закрыть меню
Аналогично выглядят макрокоманды и список их аргументов для макросов 2-7, меняется лишь имя объекта.
2. Закрыть форму «Актеры»
3. Закрыть форму «Балет»
4. Закрыть форму «Постановка»
5. Закрыть форму «Создатели»
6. Закрыть форму «Создатели_балета»
7. Закрыть форму «Хореографические партии»
8. Открыть отчет «Актеры»
Уважаемый посетитель!
Чтобы распечатать файл, скачайте его (в формате Word).
Ссылка на скачивание - внизу страницы.