Файл: Разработка автоматизированной информационной системы «Страховая фирма».pdf

Для организации запроса в Delphi необходимо на форму поместить следующие компоненты:(в свойстве ConnectionString прописать путь к базе данных «Страховая компания»);(в свойстве DataSet поставить значение ADOQuery1);(необходимо открыть окно свойства Items и прописать нужные запросы:COUNT(*) AS Количество договоров FROM Договоры;AVG(Страховая сумма) AS Средняя_страховая_сумма FROM Договоры;Наименование FROM Виды_страхования WHERE Наименование LIKE С%;

Запрос также добавить в свойство SQL компонента ADOQuery1.; в обработчике событий записать следующий код Edit1.Text:=ListBox1.Items[ListBox1.ItemIndex];(в свойстве DataSource ставим значение равным DataSource1); (в кнопке прописываем код:

ADOQuery1.SQL.Text:=Edit1.Text;.Active:=True;.ExecSQL;

except('Ошибка выполнения запроса!');.

Первый запрос выводит количество договоров. Второй запрос показывает среднюю страховую сумму. Третий запрос выводит наименования начинающиеся на «С».

В результате проведенной работы сформированы запросы к базе данных «Страховая компания».

2.5 Формирование отчетов

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

Для организации отчета в Delphi необходимо на форму поместить следующие компоненты:

Выбрать с вкладки ADO компонент ADOConnection, в свойстве ConnectionString прописать путь к базе данных «Страховая компания».(в свойстве Connection выбрать компонент ADOConnection1, в свойстве TableName выбрать наименование нужной таблицы, свойство Active изменить на True);с вкладки QReport (в свойстве DataSet значение ADOTable1);(свойство BandType установить значение rbTitle); на QRBand1 установить TQRLabel(в свойство Caption прописать заголовок отчёта);(в свойстве BandType установить значение rbDetail); на полосе QRBand2 установить столько компонентов TQRDBText сколько полей таблицы нужно отобразить в отчёте. Связать эти компоненты с полями начальных данных - Код вида страхования, Наименование. Для этого в свойстве DataSet каждого компонента QRDBText установить значение ADOTable, а в свойство DataField имя соответствующего поля;(в свойстве BandType установить значение rbColumnHeader); на полосе QRBand3 установить компоненты TQRLabel соответственно заголовкам полей;(в свойстве BandType установить значение rbPageHeader, а свойство Frame.DrawTop сделать равным True);(в свойстве BandType установить значение rbPageFooter, а свойство Frame.DrawBottom сделать равным True);

В компоненте QRBand5 установит 2 компонента TQRSysData(в свойстве Data первого из них установить значение qrsDate, второго - qrsPageNumber).

В результате проведенной работы сформированы отчеты к базе данных «Страховая компания».

Реализация информационной системы успешно завершена. Разработка информационной системы позволила создать программный продукт для базы данных «Страховая компания».

ЗАКЛЮЧЕНИЕ

АИС, на сегодняшний день, стали не просто средством оптимизации внутренних процессов организации, а насущной необходимостью в условиях жесткой конкуренции. Именно автоматизация системы дает новые возможности любой организации по ускорению работы, позволяет опередить конкурентов при принятии как оперативных, так и стратегических решений.

Созданная информационная система «Страховая фирма» может свободно применяться в практических целях, как в небольших офисах, организациях так и на предприятиях. Информационная система позволяет отслеживать информацию о расходах в организации: кем были произведены расходы, для какого отдела, точная дата и сумма расхода.

Готовый программный продукт также может легко использоваться в других сферах деятельности.

Все поставленные задачи решены:

- проанализировать предметную область;

- определены назначение и функции ИС;

- спроектирована база данных «Страховая компания»;

- реализовать базу данных в среде MS Access;

- осуществить доступ к данным;

- разработать прикладную программу доступа к базе данных в среде Delphi;

- оформлена курсовая работа в соответствии с заданными требованиями.

- Цель курсовой работы достигнута - создана информационная система «Страховая фирма».

Использование информационной системы "Страховая фирма" позволит повысить качество обслуживания клиентов, что даст страховой компании преимущества перед конкурентами на рынке страховых услуг. А так же использование прикладного программного продукта значительно сократит объем ручного рутинного труда при подготовке администраторами отчетных документов.

СПИСОК ИСТОЧНИКОВ

• Новожилов О. П. Информатика. Учебник. М.: Юрайт, 2017. 620 с.
• Хлебников А. А. Информатика. Учебник. М.: Феникс, 2019. 448 с.
• Информатика для экономистов. Учебник для СПО / ред. Поляков В. П. М.: Юрайт, 2019. 524 с.
• Софронова Н. В., Бельчусов А. А. Теория и методика обучения информатике. Учебное пособие. М.: Юрайт, 2020. 402 с.
• Филимонова Е. В. Информатика и информационные технологии в профессиональной деятельности. Учебник. М.: Юстиция, 2019. 216 с.
• Грошев А. С., Закляков П. В. Информатика. Учебник. М.: ДМК Пресс, 2019. 674с
• Беляева Т. М., Кудинов А. Т., Пальянова Н. В. Правовая информатика. Учебник и практикум для прикладного бакалавриата / ред. Чубукова С. Г. М.: Юрайт, 2019. 314 с.
• Трофимов В. В. Информатика. Учебник для академического бакалавриата. В 2-х томах. Том 2. М.: Юрайт, 2019. 406 с.
• ов А. М., Сотников В. Н., Нагаева Е. И. Информатика Учебник / ред. Попов А. М. М.: Юрайт, 2018. 512 с.
• Информатика для экономистов. Учебник для бакалавриата и специалитета / ред. Поляков В. П. М.: Юрайт, 2019. 524 с.
• Гасумова С. Е. Социальная информатика. Учебник и практикум для вузов. М.: Юрайт, 2019. 284 с.
• Вдовин, В.М. Информатика/ В.М. Вдовин, Л.Е. Суркова. — М.: Дашков и К, 2017. — 248 c.
• Волкова В.Н. Информатика для экономистов. — М.: Юрайт, 2086. — 504 с.
• Гришин, А.В. Информатика для экономистов : практическое руководство / А.В. Гришин. — М.: Радио и связь, 2020. — 176 c.
• Есаулова, С.П.Информатика: Учебное пособие / С.П. Есаулова. — М.: Дашков и К, 2012. — 152 c.