Разработка автоматизированного рабочего места кассира по продажи билетов в кассе аэрофлота

Форма для загрузки данных с формы нового клиента является составной многотабличной. Основная часть формы строиться на основе двух загружаемых таблиц – “Список пассажиров” и “Багаж пассажиров”.

Рис. 4. Макет  формы ввода-вывода для загрузки данных с формы регистрации нового клиента в таблицы “Список  пассажиров” и “Багаж пассажиров”

 

Подчиненная форма строиться на основе таблиц “Список пассажиров” и “Багаж пассажиров”. Включаемая форма связывается с основной по ключу Номер билета и Номер рейса. Таким образом, с одной экранной формы создается одна запись в таблице “Список пассажиров” и одна запись в таблице “Багаж пассажиров”

 

Реализация  запросов средствами Microsoft Access 2003:

Запрос, определяющий состав посадочной ведомости для определенного  рейса:

 

SELECT [Расписание рейсов].[Номер  рейса], [Список самолетов].[Бортовой  номер], [Список самолетов].[Марка  самолета], [Список самолетов].[Вид самолета], [Список пассажиров].[ФИО клиента], [Список пассажиров].[Номер билета], [Список пассажиров].[Полный номер паспорта], [Список пассажиров].[Место прописки клиента], [Багаж пассажиров].[Вес багажа]

FROM [Список самолетов] INNER JOIN (([Описание маршрута] INNER JOIN [Расписание рейсов] ON [Описание маршрута].[Название маршрута] = [Расписание рейсов].[Название маршрута]) INNER JOIN ([Багаж пассажиров] INNER JOIN [Список пассажиров] ON [Багаж пассажиров].[Номер билета] = [Список пассажиров].[Номер билета]) ON [Расписание рейсов].[Номер рейса] = [Список пассажиров].[Номер рейса]) ON [Список самолетов].[Бортовой номер] = [Расписание рейсов].[Бортовой номер]

WHERE ((([Расписание рейсов].[Номер  рейса])=[Введите номер рейса]));

 

Запрос, выводящий отчет  по доходам аэропорта за определенный период с группировкой по маршрутам:

SELECT [Описание маршрута].[Название  маршрута], [Расписание рейсов].[Номер  рейса], [Список самолетов].[Количество  пассажирских мест], Count([Список пассажиров]![ФИО клиента]) AS [Количество проданных билетов], [Описание маршрута].[Стоимость билета], [Расписание рейсов].[Количество возвращенных билетов], (Count([Список пассажиров]![ФИО клиента])-[Количество возвращенных билетов])*([Описание маршрута]![Стоимость билета]) AS [Выручка  по рейсам]

FROM [Список самолетов] INNER JOIN (([Описание маршрута] INNER JOIN [Расписание  рейсов] ON [Описание маршрута].[Название  маршрута] = [Расписание рейсов].[Название  маршрута]) INNER JOIN ([Багаж пассажиров] INNER JOIN [Список пассажиров] ON [Багаж пассажиров].[Номер билета] = [Список пассажиров].[Номер билета]) ON [Расписание рейсов].[Номер рейса] = [Список пассажиров].[Номер рейса]) ON [Список самолетов].[Бортовой номер] = [Расписание рейсов].[Бортовой номер]

GROUP BY [Описание маршрута].[Название маршрута], [Расписание рейсов].[Номер рейса], [Список самолетов].[Количество пассажирских мест], [Описание маршрута].[Стоимость билета], [Расписание рейсов].[Количество возвращенных билетов], [Расписание рейсов].[Дата вылета]

HAVING ((([Расписание рейсов].[Дата вылета]) Between #1/1/2008# And #1/5/2008#));

 

Запрос, определяющий наличие  свободных мест на определенном рейсе:

SELECT [Расписание рейсов].[Номер  рейса], [Количество пассажирских  мест]-(Count([Список пассажиров]![ФИО  клиента]))+[Количество возвращенных билетов] AS [Осталось свободных мест]

FROM [Список самолетов] INNER JOIN (([Описание маршрута] INNER JOIN [Расписание  рейсов] ON [Описание маршрута].[Название  маршрута] = [Расписание рейсов].[Название  маршрута]) INNER JOIN [Список пассажиров] ON [Расписание рейсов].[Номер рейса] = [Список пассажиров].[Номер рейса]) ON [Список самолетов].[Бортовой номер] = [Расписание рейсов].[Бортовой номер]

GROUP BY [Расписание рейсов].[Номер  рейса], [Список самолетов].[Количество  пассажирских мест], [Расписание рейсов].[Количество возвращенных билетов];

 

Запрос, определяющий ближайший  рейс до определенного места посадки:

SELECT [Расписание рейсов].[Номер  рейса], [Расписание рейсов].[Время  вылета], [НОВЫЙ Запрос на кол-во  свободных мест].[Осталось свободных мест], [Расписание рейсов].[Дата вылета]

FROM [Список самолетов] INNER JOIN (([Описание маршрута] INNER JOIN ([Расписание  рейсов] INNER JOIN [НОВЫЙ Запрос на  кол-во свободных мест] ON [Расписание  рейсов].[Номер рейса] = [НОВЫЙ Запрос  на кол-во свободных мест].[Номер рейса]) ON [Описание маршрута].[Название маршрута] = [Расписание рейсов].[Название маршрута]) INNER JOIN ([Багаж пассажиров] INNER JOIN [Список пассажиров] ON [Багаж пассажиров].[Номер билета] = [Список пассажиров].[Номер билета]) ON [Расписание рейсов].[Номер рейса] = [Список пассажиров].[Номер рейса]) ON [Список самолетов].[Бортовой номер] = [Расписание рейсов].[Бортовой номер]

WHERE ((([Расписание рейсов].[Дата  вылета])>[Введите нынешнюю дату]))

GROUP BY [Расписание рейсов].[Номер рейса], [Расписание рейсов].[Время вылета], [НОВЫЙ Запрос на кол-во свободных мест].[Осталось свободных мест], [Расписание рейсов].[Дата вылета], [Описание маршрута].[Место посадки]

HAVING ((([Описание маршрута].[Место  посадки])=[Введите требуемый аэропорт]));

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Глава 5. Разработка диалогового приложения пользователя.

 

Так как на кассира  аэропорта возлагаются обязанности  заполнения базы данных новыми записями клиентов, то форма работы для кассира будет только одна – на заполнения, изменения и удаление клиентов из базы данных. Создадим основную форму работы с базой данных. На ней разместим кнопки формы работы с базой данных и 3 кнопки запросов:

 

 

 

 

 

 

 

 

 

 

Заключение.

 

Разработанная база данных выполняет все возложенные на нее функции. Разработанная структура базы данных обеспечивает целостность данных. Заявленные в требовании к работе запросы и отчеты работают стабильно и обеспечивают весь заявленный функционал.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Список использованных источников

 

1. Бекаревич Ю. Microsoft Access 2003. БХВ-Петербург, 2004
2. Владимиров К.К. Основы создания реляционных СУБД. БХВ-Петербург, 2004
3. Дорогин П.З. Разработка и проектирование баз данных. БХВ-Петербург, 2001
4. Захарченко П.Ф. Поектирование и программирование запросов в Microsoft Access 2003. ЮСпро, 2000