Файл: Проектирование реализации операций бизнес-процесса «Предоставление рекламных услуг»..pdf

СУБД Paradox для DOS первоначально разрабатывалась компанией Ansa-Software, которая была поглощена фирмой Borland в сентябре 1987 года. Наиболее распространены были версии 3.5 и 4.5. Версии до 3.5 включительно основывались на исходной 1.0; версии 4.0 и 4.5 были созданы заново с использованием Borland C++, и включали новую схему использования памяти.

Paradox для Windows, несмотря на то, что использует часть кода DOS-версии — другой продукт, разрабатываемый другой командой программистов.

По легенде названием БД обязана тому, что работала гораздо быстрее, чем должна была по расчётам создателей.

как использование деловой графики в DOS-приложениях, обновление данных в приложениях при многопользовательской работе, визуальные средства построения запросов, на основе интерфейса QBE - Query by Example (запрос по образцу), средства статистического анализа данных, а также средства визуального построения интерфейсов пользовательских приложений с автоматической генерацией кода на языке программирования PAL (Paradox Application Language).

Windows-версии СУБД Paradox, помимо перечисленных выше сервисов, позволяют также манипулировать данными других форматов, в частности dBase и данными, хранящимися в серверных СУБД. Такую возможность пользователи Paradox получили благодаря использованию библиотеки Borland Database Engine и драйверов SQL Links. Это позволило использовать Paradox в качестве универсального средства управления различными базами данных (существенно облегченная версия Paradox 7 под названием Database Desktop по-прежнему входит в состав Borland Delphi и Borland C++Builder именно с этой целью). Что же касается базового формата данных, используемого в этом продукте, то он обладает теми же недостатками, что и все форматы данных настольных СУБД, и поэтому при возможности его стараются заменить на серверную СУБД, даже сохранив сам Paradox как средство разработки приложений и манипуляции данными^[8].

2 ГЛАВА. ПРОЕКТНАЯ ЧАСТЬ

2.1. Информационная модель и её описание.

Информационная модель представляет собой модель объекта, представленная в виде информации, описывающей существенные для данного рассмотрения параметры и переменные величины объекта, связи между ними, входы и выходы объекта и позволяющая путём подачи на модель информации об изменениях входных величин моделировать возможные состояния объекта^[9].

Информационная модель разработанной программы показана на рисунке 4.

---

Рисунок 4. Информационная модель

2.2. Характеристика нормативно-справочной, входной и оперативной информации

Входная информация – это информация, которая вводится пользователем программы.

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

• Классификатор статей – вводятся статьи (темы), согласно которым создаются рекламные ролики;
• Фирмы заказчики – вводятся данные о фирме заказчике;
• Производители рекламы – вводятся данные о фирме, то есть о том, кто является производителем рекламы.

2.3. Характеристика результатной информации.

В данном случае результатом является заполненная база данных, так как в данном случае создается программа для работы с данными.

Результативная информация – представляет собой отчеты, которые формируются на основании данных, с которыми работает программа. Примером отчета является – отчет вывода информации по категориям.

2.4. Общие положения (дерево функций и сценарий диалога).

Программа создается для одного пользователя – работника фирмы, которые принимает заказы от клиентов.

Дерево функций данной программы показано на рисунке 5.

Рисунок 5 Дерево функций программы

Сценарий диалога программы представлен на рисунке 6.

Рисунок 6. Сценарий функций программы

2.5. Характеристика базы данных.

Как было отмечено выше, БД была разработана в СУБД Парадокс.

Созданная БД состоит из четырех таблиц - data, fCtr, fzakaz, kl, описание которых представлено в Таблицах 1 - 4.

Таблица 1. Структура записей таблицы «data»

№ п/п	Имя поля в таблице	Тип данных	Размер поля	Ключевое поле
1	Id производителя рекламы	Числовой (INT)	Длинное целое	Да
2	Название	Текстовый	100	Нет
3	Описание	Текстовый	100	Нет

Таблица 2. Структура записей таблицы «fCtr»

№ п/п	Имя поля в таблице	Тип данных	Размер поля	Ключевое поле
1	Id статьи	Числовой (INT)	Длинное целое	Да
2	Название	Текстовый	100	Нет
3	Описание	Текстовый	100	Нет

---

Таблица 3. Структура записей таблицы «fzakaz»

№ п/п	Имя поля в таблице	Тип данных	Размер поля	Ключевое поле
1	Номер заказа	Числовой (INT)	Длинное целое	Да
2	Id производителя	Текстовый	100	Нет
3	Id заказчика	Текстовый	100	Нет
4	Id статьи	Текстовый	100	Нет

Таблица 4. Структура записей таблицы «kl»

№ п/п	Имя поля в таблице	Тип данных	Размер поля	Ключевое поле
1	Id заказчика	Числовой (INT)	Длинное целое	Да
2	Название	Текстовый	100	Нет
3	Описание	Текстовый	100	Нет

2.6. Структурная схема пакета (дерево вызова программных модулей).

Условно дерево вызова программных модулей показано на рисунке 7:

Рисунок 7. Дерево вызова программных модулей

2.7 Описание программных модулей.

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

Модуль main – главный модуль программы, на котором находятся

Модуль stat – модуль добавления нового заказчика.

Модуль data – модуль добавления новой статьи.

Модуль proizvod – модуль добавления нового производителя.

Модуль zacaz – модуль добавления нового заказа.

Модуль About – модуль выводит информацию о разработчике программы.

• 1. Контрольный пример реализации проекта и его описание.

После запуска программы откроется окно, представленное на рисунке 8.

Рисунок 8. Общий вид программы

Добавим еще одну статью, для этого следует нажать на кнопку , в результате откроется окно, которое показано на рисунке 9.

Рисунок 9. Окно «Классификатор статей»

Для того, что бы добавить нового заказчика, следует нажат на кнопку , в результате откроется окно показанное на рисунке 10.

Рисунок 10. Окно «Фирмы Заказчики»

Для того, что бы добавить нового производителя рекламы следует нажать на кнопку , в результате откроется окно показанное на рисунке 11.

---

Рисунок 11. Окно «Фирмы Производители рекламы»

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

ЗАКЛЮЧЕНИЕ

Цель курсовой работы – это разработка программы для автоматизации работы рекламной фирмы. Поставленная цель была выполнена.

Разработка и внедрение программы по автоматизации в данном направление является необходимость для любой фирмы, не зависимо от ее размеров. Создание программы, с базой данных обусловлено необходимостью вести автоматизированный учет и хранение сведений обо всех заказчиках, и их заказах. Вся эта информация необходима для нормального функционирования фирмы.

Проектирование приложения осуществляется под управлением СУБД Парадокс.

В процессе разработки была использована нормализованная реляционная модель. Проведение нормализации позволило спроектировать базу данных, в которой нет избыточных (ненужных) данных и противоречий. Также была обеспечена целостность данных, которая способствовала адекватности отражаемых сведений.

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

СПИСОК ЛИТЕРАТУРЫ

1. Иванова И.Д. Информатика. Базы данных. Системы управления базами данных. Microsoft Асеева: Теоретические основы, примеры и задания, практические работы [текст]: учебник / И. Д. Иванова, М. М. Корниенко.— Харьков: Издательство «Ранок». 2009.— с. 35
2. Delphi сегодня - интервью с Всеволодом Леоновым. Часть 1. [онлайн] – URL: http://blogerator.org/page/delphi-segodnja-intervju-s-vsevolodom-leonovym-embarcadero-delphi-xe-paskal-1 (дата обращения 17.03.2017)
3. Paradox. [онлайн] – URL: http://www.mssoft.ru/Makers/Corel/Paradox/ (дата обращения 17.03.2017)
4. Иллюстрированный самоучитель по SQL для начинающих. Основы реляционных баз данных. Модели баз данных. [онлайн] – URL: http://samoychiteli.ru/document29123.html (дата обращения 12.03.2017)
5. Информационная модель. [онлайн] – URL: https://ru.wikipedia.org/wiki
6. СУБД - система управления базами данных. [онлайн] – URL: http://inphormatika.ru/lectures/subd.html (дата обращения 17.03.2017)
7. Часто задаваемые общие вопросы по Borland Delphi. [онлайн] – URL:http://www.hardline.ru/1/4/519/885-1.html#3 (дата обращения 17.03.2017)
8. Что такое автоматизация? [онлайн] – URL: https://elhow.ru/ucheba/opredelenija/a/chto-takoe-avtomatizacija?utm_source=users&utm_medium=ct&utm_campaign=ct (дата обращения 12.03.2017)

---

ПРИЛОЖЕНИЯ

unit main;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls, DBCtrls, ExtCtrls, Grids, DBGrids, ComCtrls, Buttons,

ImgList;

type

TForm1 = class(TForm)

Panel1: TPanel;

DBNavigator1: TDBNavigator;

DBGrid1: TDBGrid;

Splitter1: TSplitter;

DBMemo1: TDBMemo;

ImageList1: TImageList;

SpeedButton1: TSpeedButton;

SpeedButton2: TSpeedButton;

SpeedButton3: TSpeedButton;

SpeedButton4: TSpeedButton;

StatusBar1: TStatusBar;

Label1: TLabel;

ComboBox1: TComboBox;

BitBtn1: TBitBtn;

procedure SpeedButton1Click(Sender: TObject);

procedure SpeedButton2Click(Sender: TObject);

procedure SpeedButton3Click(Sender: TObject);

procedure SpeedButton4Click(Sender: TObject);

procedure FormShow(Sender: TObject);

procedure ComboBox1Change(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

implementation

uses data, stat, zakaz, proizvod, about, DBTables, DB;

{$R *.dfm}

procedure TForm1.SpeedButton1Click(Sender: TObject);

begin

stat.Form2.ShowModal;

end;

procedure TForm1.SpeedButton2Click(Sender: TObject);

begin

zakaz.Form3.ShowModal;

end;

procedure TForm1.SpeedButton3Click(Sender: TObject);

begin

proizvod.Form4.ShowModal;

end;

procedure TForm1.SpeedButton4Click(Sender: TObject);

begin

about.AboutBox.ShowModal;

end;

procedure TForm1.FormShow(Sender: TObject);

begin

data.DatMod.Tkl.First;

while data.DatMod.Tkl.Eof=False do

begin

ComboBox1.Items.Add(data.DatMod.Tkl.Fields[1].AsString);

data.DatMod.Tkl.Next;

end;

ComboBox1.Items.Insert(0,'Без фильтра');

ComboBox1.ItemIndex:=0;

end;

procedure TForm1.ComboBox1Change(Sender: TObject);

var

n:integer;

str:string;

begin

str:=ComboBox1.Text;

data.DatMod.Tkl.First;

while data.DatMod.Tkl.Eof=False do

begin

if str=data.DatMod.Tkl.Fields[1].AsString Then n:=data.DatMod.Tkl.Fields[0].AsInteger;

data.DatMod.Tkl.Next;

end;

str:=IntToStr(n);

if ComboBox1.ItemIndex=0 then

begin

data.DatMod.Tdata.Filtered:=false;

end

else

begin

data.DatMod.Tdata.Filtered:=false;

data.DatMod.Tdata.Filter:='Topic='+str+'';

data.DatMod.Tdata.Filtered:=true;

end;

end;

end.

1. Что такое автоматизация? [онлайн] – URL: https://elhow.ru/ucheba/opredelenija/a/chto-takoe-avtomatizacija?utm_source=users&utm_medium=ct&utm_campaign=ct (дата обращения 12.03.2017) ↑

2. Иллюстрированный самоучитель по SQL для начинающих. Основы реляционных баз данных. Модели баз данных. [онлайн] – URL: http://samoychiteli.ru/document29123.html (дата обращения 12.03.2017) ↑

3. Иванова И.Д. Информатика. Базы данных. Системы управления базами данных. Microsoft Асеева: Теоретические основы, примеры и задания, практические работы [текст]: учебник / И. Д. Иванова, М. М. Корниенко.— Харьков: Издательство «Ранок». 2009.— с. 35 ↑

4. Иллюстрированный самоучитель по SQL для начинающих. Основы реляционных баз данных. Модели баз данных. [онлайн] – URL: http://samoychiteli.ru/document29123.html (дата обращения 12.03.2017) ↑

5. Delphi сегодня - интервью с Всеволодом Леоновым. Часть 1. [онлайн] – URL: http://blogerator.org/page/delphi-segodnja-intervju-s-vsevolodom-leonovym-embarcadero-delphi-xe-paskal-1 (дата обращения 17.03.2017) ↑

6. Часто задаваемые общие вопросы по Borland Delphi. [онлайн] – URL:http://www.hardline.ru/1/4/519/885-1.html#3 (дата обращения 17.03.2017) ↑

7. СУБД - система управления базами данных. [онлайн] – URL: http://inphormatika.ru/lectures/subd.html (дата обращения 17.03.2017) ↑

8. Paradox. [онлайн] – URL: http://www.mssoft.ru/Makers/Corel/Paradox/ (дата обращения 17.03.2017) ↑

9. Информационная модель. [онлайн] – URL: https://ru.wikipedia.org/wiki/

---