Проект разработки программы для фирмы-перевозчика - Программирование, компьютеры и кибернетика дипломная работа

Главная

Программирование, компьютеры и кибернетика
Проект разработки программы для фирмы-перевозчика

Методика разработки, средства реализации, назначение и принципы работы информационной системы, выполненной в Microsoft Office Access, диспетчера транспортного отдела фирмы грузоперевозок. Порядок построения диаграммы потоков данных и различных моделей.


посмотреть текст работы


скачать работу можно здесь


полная информация о работе


весь список подобных работ


Нужна помощь с учёбой? Наши эксперты готовы помочь!
Нажимая на кнопку, вы соглашаетесь с
политикой обработки персональных данных

Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.
1.1 Назначение и область применения
1.2.2 Описание и обоснование входных и выходных данных
1.2.3 Информационная модель и ее описание
1.2.4 Описание и обоснование выбора состава технических и программных средств
1.2.6 Описание функциональных точек
3. Ожидаемые технико-экономические показатели
Источники, использованные при разработке
На настоящее время компьютеры проникли практически во все сферы человеческой деятельности. Современное общество невозможно представить себе без компьютера. Компьютеры используются как средство связи, как игровое устройство, средство обучения, но одной из важных задач компьютера является обработка, управление, хранение информации и выдача её по первому требованию пользователя.
Целью дипломного проекта является разработка информационной системы диспетчера транспортного отдела фирмы грузоперевозок. Основным назначением программы является автоматизация рабочего места диспетчера транспортного отдела. При использовании данного программного продукта, исключается необходимость заполнения в ручную большего количества бумажной документации и появляется защита от несанкционированного доступа. Также это программное обеспечение позволяет производить поиск уже обращавшихся клиентов по базе данных, заносить данные о новой машине, удалять информацию из базы данных о списанных машинах, выдавать накладную, изменять статус вернувшихся из поездки машин и водителей. Данное программное обеспечение предоставляет справку по работе с программой. Программа имеет интуитивно понятный и эргономичный интерфейс, несложный при овладении навыками работы с программой, что сокращает времени обучения работы с программой.
При разработке ИС решаются следующие задачи:
Построение диаграммы потоков данных, концептуальной и датологической модели;
Выбор средства реализации клиентской части ИС;
Разработка базы данных ИС в Microsoft Office Access.
1.1 Назначение и область применения
В настоящий момент времени на территории России существует очень много различных фирм грузоперевозок, нуждающихся в программном обеспечении, которое будет полностью или частично автоматизировать труд работника транспортного отдела, выполняя за него заполнение бланков как первичной, так и отчетной документации, контроль свободных машин, и многое другое.
Основными целями разработки системы могут служить:
сокращение времени обработки входной информации и получения результатных показателей;
повышение степени достоверности выходной информации;
снижение трудоемкости и количества ошибок при решении задачи.
В программе должны быть реализованы следующие функции:
ввод или выбор из имеющихся исходных данных клиента;
постановка на внутрифирменный учет машин;
удаление информации о списанных машинах из базы данных;
ввод и сохранение данных о перевозимом грузе;
ввод и сохранение данных о накладной;
изменение пароля доступа к программе;
предоставление справки о работе программы.
Штат сотрудников фирмы представлен: директором, работником отдела кадров, работником транспортного отдела, менеджером по работе с клиентами.
В должностные обязанности директора входит:
организация текущего и перспективного планирования деятельности фирмы;
проведение рекламных компаний по ознакомлению населения об условиях предоставления услуг фирмы;
разработку необходимой методической документации;
осуществление контроля качества за процессом оказания услуг;
обеспечение своевременного составления установленной отчетной документации.
Типовая схема организации представлена в виде схемы (Рис. 1)
Рисунок 1. Типовая схема организации.
Свои профессиональные обязанности директор фирмы грузоперевозок выполняет, взаимодействуя со следующим подразделениями фирмы (Таблица. 1)
Таблица 1. Подразделения фирмы грузоперевозок, с которыми взаимодействует директор
передача информации о поставленных на учет автомобилях;
передача информации о снятых с учета автомобилях;
передача информации о клиентах и поездках;
При организации работы фирмы грузоперевозок важным аспектом является мобильная, квалифицированная работа сотрудников, способных организовать процесс обслуживания клиентов как можно быстрее и качественней.
В обязанности работника транспортного отдела входят следующие функции:
контроль поступивших в распоряжение фирмы машин;
изменение статуса машин и водителей;
удаление информации из базы данных о списанных машинах;
сохранение информации о перевозимом грузе;
регистрация клиентов обратившихся в фирму;
В фирме грузоперевозок традиционно использовано программное обеспечение Microsoft Office и имеет следующие характеристики:вся информация находится в текстовых файлах формата Word, таблицах Excel или бумажных носителях;
отсутствует система защиты от несанкционированного доступа;
сбор аналитической информации производится путем анализа информации, хранящейся на бумажных носителях;
контроль поступления и убытия машин и водителей осуществляется путем регистрации информации на бумажных носителях;
Все выше перечисленные недостатки позволяют сделать вывод о необходимости автоматизации труда работника транспортного отдела фирмы грузоперевозок. Целью использования вычислительной техники является устранение всех вышеперечисленных недостатков, а так же автоматизация обработки и анализа первичной и промежуточной информации и представление итоговой информации в виде отчетов.
Деятельность работника транспортного отдела фирмы грузоперевозок - это процесс, происходящий во времени, который можно разделить на последовательные этапы:
этап формирования списков машин и водителей;
этап оформления документов клиента;
В каждом этапе происходят информационные процессы, которые сведены в таблицу (Таблица. 2)
Таблица 2. Информационные процессы этапов
Этап формирования списков машин и водителей
удаление информации о списанных машинах;
изменение статуса машин и водителей;
сбор анкетных и других данных у клиента и их систематизация;
Основными целями разработки системы могут служить:
сокращение времени обработки входной информации и получения результатных показателей;
повышение степени достоверности выходной информации;
снижение трудоемкости и количества ошибок при решении задачи.
В программе должны быть реализованы следующие функции:
ввод исходных данных клиента при оформлении аренды;
постановка на внутрифирменный учет машин;
вывод лицензионной карточки на печать;
удаление информации о списанных машинах из базы данных;
ввод и сохранение данных о перевозимом грузе;
ввод и сохранение данных о накладной;
изменение пароля доступа к программе;
изменение статуса машин и водителей;
предоставление справки о работе программы;
Выполнение перечисленных функций осуществлено следующим образом:
справка о работе программы (Рис. 2)
Автоматизация ввода данных первичной информации в базу данных с использованием экранных форм:
окно постановки на внутрифирменный учет машин (Рис. 4)
окно формирования накладной (Рис.5)
Ведение условно-постоянной информации, хранящейся в таблицах базы данных:
Рисунок. 3 Схема взаимосвязи программных модулей и информационных файлов
1.2.2 Описание и обоснование входных и выходных данных
Таблица 3. Перечень таблиц, хранящих входную информацию
Таблица 4. Перечень таблиц, хранящих результирующую информацию
Таблица 5. Перечень таблиц, хранящих служебную информацию
Таблица 6. Перечень форм ввода входной информации
Форма «Главная» вкладка «оформить новую машину»
Форма «Главная» вкладка «выдать накладную»
Рисунок. 4 Окно постановки на внутрифирменный учет машин
Рисунок. 5 Окно формирования накладной
Таблица 7. Перечень форм формирования выходной информации
Форма «Главная» вкладка «выдать накладную»
Таблица 8. Перечень форм формирования отчетов
Рисунок. 7 Отчет «Лицензионная карточка»
Таблица 9. Перечень форм формирования служебной информации
Рисунок. 8 Форма «Изменение пароля»
1.2.3 Информационная модель и ее описание
Проведя анализ предметной области путем изучения вышеперечисленной информации, были выявлены следующие внешние сущности:
Клиент, для которого осуществляется перевозка;
Информационная система разбита на четыре логических подсистемы:
система работы с машинами и водителями;
Потоки данных представлены в виде схемы и подробного словесного описания (Рис. 9)
Запрос на проверку прав доступа к программе:
Запрос от работника транспортного отдела системе администрирования на проверку прав доступа.
Запрос системой администрирования в таблицу пароль на проверку прав доступа.
Информация из таблицы «пароль» в систему администрирования о разрешении доступа к программе.
Информация из системы администрирования работнику транспортного отдела о праве доступа к программе.
Запрос от работника транспортного отдела в систему работы с машинами и водителями на добавление машины.
Запрос системой работы с машинами и водителями в таблицу «машины» на сохранение информации о машине.
Запрос системой работы с машинами и водителями в таблицу «лицензионная карточка» на сохранение информации о лицензионной карточки.
Информация из таблицы «машины» в систему формирования отчетов о добавленной машине.
Информация из таблицы «лицензионная карточка» в систему формирования отчетов о заполнении лицензионной карточки.
Лицензионная карточка работнику транспортного отдела из системы формирования отчетов.
Запрос на удаление информации из базы данных о списанной машине:
Запрос от работника транспортного отдела в систему работы с машинами и водителями на удаление информации о списанной машине.
Запрос системой работы с машинами и водителями в таблицу «машины» на удаление информации из базы данных о машине.
Запрос системой работы с машинами и водителями в таблицу «лицензионная карточка» на удаление информации о лицензионной карточке.
Информация из таблицы «машины» в систему работы с машинами и водителями о удалении информации о машине.
Информация из таблицы «лицензионная карточка» в систему работы с машинами и водителями о удалении информации о лицензионной карточке.
Информация из системы работы с машинами и водителями работнику транспортного отдела о удалении информации из базы данных о машине.
Запрос от клиента работнику транспортного отдела на оформление поездки.
Запрос клиенту от работника транспортного отдела на получение данных о клиенте.
Информация о клиенте работнику транспортного отдела.
Запрос от работника транспортного отдела в систему регистрации клиентов на регистрацию клиента.
Запрос системой регистрации клиентов в таблицу «клиенты» на сохранение данных о клиенте.
Информация из таблицы «клиенты» в систему регистрации клиентов о сохранении данных о клиенте.
Информация из системы регистрации клиентов работнику транспортного отдела о сохранении данных о клиенте.
Запрос от работника транспортного отдела в систему формирования поездок на выбор машины и водителя
Запрос из системы формирования поездок в таблицу «водители» на изменение статуса водителя.
Запрос из системы формирования поездок в таблицу «машины» на изменение статуса машины.
Информация из таблицы «водители» в систему формирования поездок о изменении статуса водителя.
Информация из таблицы «машины» в систему формирования поездок о изменении статуса машины.
Запрос системой формирования поездок в таблицу «поездки» на сохранение информации о поездке и о товаре.
Информация из таблицы «поездки» в систему формирования отчетов о поездке
Накладная из системы формирования отчетов работнику транспортного отдела.
Запрос на изменение статуса машины и водителя:
Запрос от водителя работнику транспортного отдела на изменение статуса машины и водителя.
Запрос от работника транспортного отдела в систему работы с машинами и водителями на изменение статуса машины и водителя.
Запрос системой работы с машинами и водителями в таблицу «водители» на изменение статуса водителя.
Запрос системой работы с машинами и водителями в таблицу «машины» на изменение статуса машины.
Информация из таблицы «водители» в систему работы с машинами и водителями об изменении статуса водителя.
Информация из таблицы «машины» в систему работы с машинами и водителями об изменении статуса машины.
Информация работнику транспортного отдела из системы работы с машинами и водителями об изменении статуса машины и водителя.
Информация от работника транспортного отдела водителю об изменении статуса машины и водителя.
Запрос на регистрацию администратора:
Запрос администратора в систему администрирования на проверку прав доступа к программе
Запрос системой администрирования в таблицу «пароль» на проверку прав доступа.
Информация из таблицы «пароль» в систему администрирования о правах доступа к программе.
Информация из системы администрирования администратору о праве доступа к программе.
Запрос от администратора в систему администрирования на изменение пароля.
Запрос системой администрирования в таблицу «пароль» на изменение пароля.
Информация из таблицы «пароль» в систему администрирования об изменении пароля.
Информация администратору из системы администрирования об изменении пароля.
Запрос администратора системе работы с машинами и водителями на редактирование информации о машине.
Запрос системой работы с машинами и водителями в таблицу «машины» на редактирование информации о машине.
Информация из таблицы «машины» в систему работы с машинами и водителями об изменении данных о машине.
Информация из системы работы с машинами и водителями администратору об изменении данных о машине.
На этапе анализа необходимо подробное исследование как будущих функциональных возможностей разрабатываемой системы, так и информации, необходимой для их выполнения. Поэтому особое внимание было уделено как полноте информации, так и поиску противоречивой, дублирующей или неиспользуемой информации. После проведения нормализации таблица «Поездки», была разделена на следующие таблицы:
Каждая сущность имеет неограниченное количество атрибутов, но, проанализировав требования к системе и осуществив детализацию хранилищ данных, будущую модель можно представить в виде связанных между собой отношениями сущностей:
Полученная модель данных графически представлена в виде инфологической модели (Рис. 10)
Датологическая модель данных строится на основе разработанной инфологической модели и наиболее приемлемой для дальнейшей разработки. (Рис. 11)
1.2.4 Описание и обоснование выбора состава технических и программных средств
Общую структуру информационной системы можно рассматривать как совокупность обеспечивающих подсистем. Техническое обеспечение - это комплекс технических средств, предназначенных для работы информационной системы. К настоящему времени сложились две основные формы организации технического обеспечения: централизованная и частично или полностью децентрализованная.
Перспективным подходом в настоящее время считается частично децентрализованный подход, применяя как персональные компьютеры, так и большие электронно-вычислительные машины с использованием распределенных сетей. Изучив предметную область и техническое оснащение фирмы грузоперевозок, а так же перспективные планы на будущее, был сделан вывод - применение сетевой технологии в данном случае требует существенные финансовые вложения. Существующее техническое оснащение: персональный компьютер класса Pentium IV, принтер марки Canon 100 и отсутствие компьютерных сетей позволяет сделать вывод, что наиболее приемлемой является децентрализованная форма организации технического обеспечения.
Программное обеспечение - совокупность программ для реализации целей и задач информационной системы, а также нормального функционирования комплекса технических средств. В состав программного обеспечения входят общесистемные и специальные программные продукты. К общесистемному программному обеспечению относятся комплексы программ, ориентированных на пользователей и предназначенных для типовых задач обработки информации. Информационное обеспечение, реально существующее на рабочем месте методиста - операционная система Windows ХР и Microsoft Office. В связи с этим тип файлов базы данных был выбран .mdb (MS Access).
Специального программного обеспечения для функционирования разрабатываемой информационной системы не требуется, кроме его исходного файла Start.exe и файла Baza.mdb. Подключение баз данных проведено с использованием технологии ADO, разработанной фирмой Microsoft и необходимые драйвера встроены в используемую операционную систему.
В реальных условиях проектирование - это поиск способа, который удовлетворяет требованиям функциональности системы средствами имеющихся технологий с учетом заданных ограничений. В настоящее время широкое распространение получила RAD-методология - методология быстрой разработки приложений. Данная методология охватывает все этапы жизненного цикла современных информационных систем.
RAD-технология позволяет при разработке и создании информационной системы применять спиральную модель жизненного цикла информационной системы, т.е. использовать прототипы. Возможность согласования прототипов системы с непосредственным будущим пользователем системы позволяет не терять общей картины проектируемой системы, контролировать требования заказчика и оперативно вносить необходимые корректировки функциональных возможностей системы. Визуальные инструменты RAD позволяют создавать современные пользовательские интерфейсы с минимальным написанием кодов программ.
Программные средства RAD-разработки делятся на универсальные и специализированные. Специализированные средства разработки ориентированы только на создание приложений баз данных и, как правило, привязаны к вполне определенным системам управления баз данных (Power Builder фирмы Sybase, Visual FoxPro фирмы Microsoft).
Среди универсальных систем визуального программирования наибольшее распространение получили: Borland Delphi, Borland C++, Visual Basic, с помощью которых можно разработать приложения практически любого типа, причем программы, разработанные такими средствами в состоянии взаимодействовать практически с любой системой управления базами данных. Возможности таких систем при разработке пользовательского интерфейса слились с созданием прототипов системы. При активном участии пользователя системы, способного корректировать как результаты расчетов, так и собственные требования к системе, сроки изготовления программы сокращаются. Наследованное универсальными системами событийного программирования предполагает описание различных событий различных объектов, установленных на форме-контейнере элементов управления. С помощью событийного программирования можно как обрабатывать информацию, хранящуюся в базе данных, так и создавать, редактировать, модифицировать, удалять объекты баз данных.
Как и любая технология, методология RAD имеет ряд своих недостатков и ограничений. Но при разработке относительно небольших систем, разрабатываемых под конкретную организацию, она достаточно эффективна.
Схема технологического процесса сбора, передачи, обработки и выдачи информации (Рис.12).
Рисунок 12. «Схема технологического процесса сбора, передачи, обработки и выдачи информации»
Алгоритм работы программы представлен в виде блок-схемы, демонстрирующей кнопки вызова форм. После запуска файла Start.exe на экране появляется форма «Регистрация» (блок 2), которая предлагает выбрать пользователя и через элемент MaskEdit ввести пароль.
«Справка» (блок 3) активизирует форму «Справка» (блок 4) для просмотра информации об особенностях работы программы. Переход на форму «регистрация» осуществляется посредством нажатия кнопки «Закрыть справку» (блок. 5);
Если в поле логин выбран пользователь - Администратор (блок. 7), введен корректный пароль, и нажата кнопка «Далее» (блок. 11), то программа открывает форму «Администрирование» (блок. 13)
«Корректировка машин» (блок 15) открывает форму «Редактирование машин» (блок. 16). Для возврата на форму «Администрирование» (блок. 13) необходимо нажать кнопку «На главную» (блок. 20);
«Просмотр выданных накладных» открывает форму «Накладные» (блок. 24);
«Смена пользователя» загружает форму «Регистрация» (блок. 2);
«Выход» осуществляет закрытие программы»;
Если в поле логин выбран пользователь - Транспортный отдел (блок. 8), введен корректный пароль, и нажата кнопка «Далее» (блок. 12), то программа открывает форму «Главная» (блок. 14)
«Печать лицензионной карточки» (блок 17) открывает отчет «Лицензионная карточка» (блок. 19);
«Печать накладной» (блок. 21) открывает отчет «Накладная» (блок. 23);
«Смена пользователя» (блок. 25) загружает форму «Регистрация» (блок. 2);
«Выход» (блок. 27) осуществляет закрытие программы.
Схема вызова форм программы представлена на рисунке (Рис.13).
Рисунок 13. «Схема вызова форм программы»
1.2.6 Описание функциональных точек
В проекте 8 форм, 19 не визуальных компонентов и 12 основных процедур обработки событий, которые в совокупности предназначены для автоматизации обслуживания клиентов фирмы грузоперевозок. Входные данные находятся в файле базы данных, поэтому описаны функциональные точки - формы и не визуальные компоненты связи наборов данных из базы данных и визуальных компонентов, расположенных на формах. Не визуальные компоненты представлены в виде рисунка (Рис. 14)
procedure TAdmin_Mashin.SpeedButton9Click - процедура изменения информации о машине:
procedure TAdmin_Mashin.SpeedButton9Click(Sender: TObject);
DateTimePicker1.Date:=strtodate(DBEdit6.Text);
DateTimePicker2.Date:=strtodate(DBEdit4.Text);
DBEdit1.Enabled:=True;//Активация поля ввода информации
DBEdit2.Enabled:=True;//Активация поля ввода информации
DBEdit3.Enabled:=True;//Активация поля ввода информации
DBEdit4.Enabled:=True;//Активация поля ввода информации
DBEdit5.Enabled:=True;//Активация поля ввода информации
DBEdit6.Enabled:=True;//Активация поля ввода информации
DBEdit10.Enabled:=True;//Активация поля ввода информации
DBEdit11.Enabled:=True;//Активация поля ввода информации
ComboBox1.Enabled:=true;//Активация поля ввода информации
SpeedButton1.Enabled:=False;//Деактивация кнопки
SpeedButton2.Enabled:=False;//Деактивация кнопки
SpeedButton3.Enabled:=True;//Активация кнопки
SpeedButton4.Enabled:=True;//Активация кнопки
SpeedButton9.Enabled:=False;//Деактивация кнопки
Pereregistratsiya.Enabled:=False;//Деактивация кнопки
DM.Lits_kart.Edit;//Изменение строки в таблице
DM.Mashiny.Edit;//Изменение строки в таблице
procedure TAdmin_Mashin.SpeedButton4Click - процедура сохранения информации в таблицу «Машины»:
procedure TAdmin_Mashin.SpeedButton4Click(Sender: TObject);
(DBEdit6.Text='') or(DBEdit4.Text='')or(DBEdit5.Text='')
or(DBEdit2.Text='') or (DBEdit3.Text='') or(DBEdit1.Text='')
or(DBEdit10.Text='') or(DBEdit1.Text='')
then ShowMessage('Заполните все поля')// вывод сообщения
DBEdit1.Enabled:=False; //Деактивация поля ввода информации
DBEdit2.Enabled:=False;//Деактивация поля ввода информации
DBEdit3.Enabled:=False;//Деактивация поля ввода информации
DBEdit4.Enabled:=False;//Деактивация поля ввода информации
DBEdit5.Enabled:=False;//Деактивация поля ввода информации
DBEdit6.Enabled:=False;//Деактивация поля ввода информации
DBEdit10.Enabled:=False;//Деактивация поля ввода информации
DBEdit11.Enabled:=False;//Деактивация поля ввода информации
DateTimePicker1.Enabled:=false;//Деактивация календаря
DateTimePicker2.Enabled:=false;//Деактивация календаря
SpeedButton1.Enabled:=True; //Активация кнопки
SpeedButton2.Enabled:=True; //Активация кнопки
SpeedButton3.Enabled:=False;//Деактивация кнопки
SpeedButton4.Enabled:=False; //Деактивация кнопки
SpeedButton9.Enabled:=True; //Активация кнопки
DBEdit30.Text:=ComboBox1.Text; //Перенос значения
ComboBox1.Enabled:=False; //Деактивация поля ввода информации
Pereregistratsiya.Enabled:=True; //Активация кнопки
DM.Lits_kart.Post;//Сохранение данных в таблицу
dm.Mashiny.FieldByName('№_лиценз_карт').AsInteger:=dm.Lits_kart.FieldByName('№_лиценз_карт').AsInteger;
DM.Mashiny.Post;//Сохранение данных в таблицу
procedure TAdmin_Mashin.VyhodClick - процедура выхода из программы:
procedure TAdmin_Mashin.VyhodClick(Sender: TObject);
if MessageDlg('Вы действительно хотите выйти из программы?', // вывод сообщения
mtConfirmation, [mbYes, mbNo], 0) = mrYes then
Application.Terminate; //закрытие программы
procedure TAdmin_Mashin.FormMouseMove - процедура изменения стиля надписи:
procedure TAdmin_Mashin.FormMouseMove(Sender: TObject; Shift: TShiftState;
Pereregistratsiya.Font.Color:=$00AD9612; //Изменение цвета надписи
SpeedButton2.Font.Size:=10; //Изменение размера шрифта надписи
SpeedButton2.Font.Style:=[fsBold,fsItalic]; //Изменение стиля надписи
SpeedButton1.Font.Size:=10; //Изменение размера шрифта надписи
SpeedButton1.Font.Style:=[fsBold,fsItalic]; //Изменение стиля надписи
SpeedButton9.Font.Size:=10;//Изменение размера шрифта надписи
SpeedButton9.Font.Style:=[fsBold,fsItalic]; //Изменение стиля надписи
SpeedButton3.Font.Size:=10;//Изменение размера шрифта надписи
SpeedButton3.Font.Style:=[fsBold,fsItalic]; //Изменение стиля надписи
SpeedButton4.Font.Size:=10;//Изменение размера шрифта надписи
SpeedButton4.Font.Style:=[fsBold,fsItalic];//Изменение стиля надписи
procedure TTransportnyi.SpeedButton7Click - процедура заполнения лицензионной карточки
procedure TTransportnyi.SpeedButton7Click(Sender: TObject);
Otchet_po_lits_kart.QRLabel9.Caption:= DBEdit6.Text; // Перенос значения
Otchet_po_lits_kart.QRLabel19.Caption:= DBEdit5.Text;// Перенос значения
Otchet_po_lits_kart.QRLabel2.Caption:= DBEdit12.Text;// Перенос значения
Otchet_po_lits_kart.QRLabel10.Caption:= DBEdit4.Text;// Перенос значения
Otchet_po_lits_kart.QRLabel11.Caption:= DBEdit2.Text;// Перенос значения
Otchet_po_lits_kart.QRLabel12.Caption:= DBEdit1.Text;// Перенос значения
Otchet_po_lits_kart.QRLabel14.Caption:= Administrirovanie.Edit1.Text;//
Otchet_po_lits_kart.QuickRep1.Preview; //Просмотр отчета
procedure TTransportnyi.SpeedButton15Click - процедура проверки свободного места в машине:
procedure TTransportnyi.SpeedButton15Click(Sender: TObject);
if n=4 then ShowMessage('В машине больше нет свободного места') //вывод сообщения
DBEdit20.SetFocus; //установка курсора
DM.Mater_sredst.Insert;//Заполнение табдицы материальные средства
DBEdit23.Text:=DBEdit25.Text;//перенос значения
SpeedButton13.Enabled:=True;//Активация кнопки
SpeedButton15.Enabled:=False;//Деактивация кнопки
ComboBox4.Enabled:=true; //Активация поля ввода
ComboBox4.Text:=''; // Очистка поля ввода
procedure TTransportnyi.SpeedButton13Click - процедура создания накладной
procedure TTransportnyi.SpeedButton13Click(Sender: TObject);
(DBEdit20.Text='') or(DBEdit21.Text='')or(DBEdit22.Text='')
then ShowMessage('Заполните все поля')// вывод сообщения
DM.Mater_sredst.Post; // Сохранение материальных средств
1:begin Otchet_nakladnaya.QRLabel33.Caption:='1';
Otchet_nakladnaya.QRLabel34.Caption:=DBEdit20.Text;// Перенос значения
Otchet_nakladnaya.QRLabel35.Caption:=DBEdit22.Text;// Перенос значения
Otchet_nakladnaya.QRLabel36.Caption:=DBEdit21.Text;end;// Перенос значения
2:begin Otchet_nakladnaya.QRLabel37.Caption:=inttostr(n);
Otchet_nakladnaya.QRLabel40.Caption:=DBEdit20.Text;// Перенос значения
Otchet_nakladnaya.QRLabel43.Caption:=DBEdit22.Text;// Перенос значения
Otchet_nakladnaya.QRLabel46.Caption:=DBEdit21.Text;end;// Перенос значения
3:begin Otchet_nakladnaya.QRLabel38.Caption:=inttostr(n);
Otchet_nakladnaya.QRLabel41.Caption:=DBEdit20.Text;// Перенос значения
Otchet_nakladnaya.QRLabel44.Caption:=DBEdit22.Text;// Перенос значения
Otchet_nakladnaya.QRLabel47.Caption:=DBEdit21.Text;end;// Перенос значения
4:begin Otchet_nakladnaya.QRLabel39.Caption:=inttostr(n);
Otchet_nakladnaya.QRLabel42.Caption:=DBEdit20.Text;// Перенос значения
Otchet_nakladnaya.QRLabel45.Caption:=DBEdit22.Text;// Перенос значения
Otchet_nakladnaya.QRLabel48.Caption:=DBEdit21.Text; end;// Перенос значения
ShowMessage('Данные о товаре сохранены'); //вывод сообщения
SpeedButton13.Enabled:=False;//Деактивация кнопки
SpeedButton15.Enabled:=True; //Активация кнопки
procedure TTransportnyi.SpeedButton11Click - процедура сохранения информации о накладной и о поездке:
procedure TTransportnyi.SpeedButton11Click(Sender: TObject);
(DBEdit15.Text='') or(DBEdit14.Text='')or(DBEdit13.Text='')
or(DBEdit16.Text='') or (DBEdit17.Text='') or(DBEdit18.Text='')
or(DBEdit19.Text='') or(DBEdit24.Text='')or(DBEdit20.Text='')
or(DBEdit21.Text='') or (DBEdit22.Text='') or(DBEdit23.Text='')
or(DBEdit27.Text='') or(DBEdit28.Text='')
then ShowMessage('Заполните все поля')// вывод сообщения
SpeedButton14.Enabled:=True; //Активация кнопки
DM.Poezdki.FieldByName('№_накладной').AsString:=DBEdit23.Text; // Сохранение информации в базу
DM.Poezdki.FieldByName('Ид_№_машины').AsString:=DBEdit29.Text; // Сохранение информации в базу
DM.Poezdki.FieldByName('Ид_№_водителя').AsString:=DBEdit26.Text; // Сохранение информации в базу
DM.Poezdki.FieldByName('Ид_№_клиента').AsString:=DM.ADOQuery1.FieldByName('Ид_№_клиента').AsString;// Сохранение информации в базу
DM.Poezdki.Post; // Сохранение данных в таблице поездки
DM.Mashiny.Edit; //Изменение статуса выбранной машины
DM.Mashiny.FieldByName('Статус').AsString:=DBEdit31.Text; // Изменение статуса машины
DM.Mashiny.Post; // Сохранение данных в таблице машины
DM.Voditeli.Edit; //Изменение статуса выбранного водителя
DM.Voditeli.FieldByName('Статус').AsString:=DBEdit31.Text; // Изменение статуса водителя
DM.Voditeli.Post; // Сохранение данных в таблице водители
Otchet_nakladnaya.QRLabel9.Caption:=DBEdit17.Text; // Перенос значения
Otchet_nakladnaya.QRLabel49.Caption:=IntToStr(n); // Перенос значения
Otchet_nakladnaya.QuickRep1.Preview;// просмотр формы отчета
DM.Mashiny.Filtered:=False; //Деактивация фильтра
DM.Mashiny.Filter:='Статус=True'; //Задание фильтра
DM.Mashiny.Filtered:=True; //Активация фильтра
DM.Voditeli.Filtered:=False; //Деактивация фильтра
DM.Voditeli.Filter:='Статус=True' ;//Задание фильтра;
DM.Voditeli.Filtered:=True;//Деактивация фильтра
if (DBEdit28.Text='') and (DBEdit29.Text='') then
ShowMessage('В данный момент нет свободных машин'); //Вывод сообщения
if (DBEdit26.Text='') and (DBEdit27.Text='') then
S
Проект разработки программы для фирмы-перевозчика дипломная работа. Программирование, компьютеры и кибернетика.
Типы Поведения Реферат
Курсовая работа по теме Расчет себестоимости технологического процесса восстановительного ремонта распределительного вала
Сочинение На Тему Согласны Ли Вы
Дипломная работа по теме Церковь и театр: история и перспективы взаимоотношений
Социальная Защита В Австралии Курсовая
Контрольная Работа No 1 Первоначальные Химические Понятия
Отчет по практике по теме Организация ремонтных работ в моторном участке АТП
Сочинение: Образ Чичикова
Реферат На Тему Характеристика Нью-Йорка
Правила Написания Эссе На Английском
Вступительная Часть Эссе
Доклад: Реформаторская деятельность Витте
Курсовая Работа На Тему Удельный Расход, Его Структура И Анализ Изменений
Реферат по теме Проблемы адаптации, связанные с потерей работы
Сочинение: Основные мотивы лирики Тютчева и Фета (Темы вечные в лирике Тютчева и Фета)
Курсовая работа по теме Кейнсианская и неокейнсианская концепция экономического развития
Реферат: Слагаемые производственной деятельности снабжение, производство и управленческая деятельность.
Реферат: Древняя индийская цивилизация
Сочинение Рассуждение О Природе Родного Края
Реферат по теме Особенности вулканизма и геодинамика области тройного сочленения Буве
Организация рекламной деятельности - Маркетинг, реклама и торговля контрольная работа
Русь и Волгоградская область в период феодальной раздробленности - История и исторические личности контрольная работа
Великобританія після Другої світової війни - История и исторические личности реферат