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

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

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

Рис. 2. 2. Дерево функций

В разработанной программе предусмотрены два пользователя – Менеджер и Дизайнер. Дерево диалога изображено на рисунке 2.3

Рис. 2. 3. Дерево диалога

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

Описание таблиц базы данных

В таб. 2.10 описаны характеристики таблицы Целевая аудитория

Таблица 2.10

Целевая аудитория

В таб. 2.11 описаны характеристики таблицы Место размещения

Таблица 2.11

Место размещения

В таб. 2.12 описаны характеристики справочника Вид рекламы

Таблица 2.12

Вид рекламы

В таб. 2.13 описаны характеристики справочника Заказчик

Таблица 2.13

Заказчик

В таб. 2.5 описаны характеристики справочника Сотрудник

Таблица 2.14

Сотрудник

В таб. 2.15 описаны характеристики справочника Реклама

Таблица 2.15

Реклама

В таб. 2.16 описаны характеристики таблицы Заказ

Таблица 2.16

Заказ

В таб. 2.17 описаны характеристики таблицы Разработка

Таблица 2.17

Разработка

В таб. 2.18 описаны характеристики таблицы Разработка

Таблица 2.18

Размещение

Получили схему данных

Рис 2.4 Схема данных

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

Описание пакета (дерево вызова программных модулей) Дерево программных на рисунке 2.5.

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

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

Схема программных модулей собой разделение процесса решения на отдельные преобразования информации, модулями [15 с.105]. Дерево модулей отражает структуру программы указанием типов модулей:

• тип – передача управления модулю с в вызывающий ;
• тип Р – управления без .

Дерево программных для исходящих представлено для входящих на рисунке 2.6 .

Рисунок 2.6 Главное окно программы

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

Посте запуска конфигурации открывается Главное окно программы (рис 2.7)

Рисунок 2.7 Авторизация

Далее заносим данные в справочники ( рис. 2.8)

Рисунок 2.8 Заполнение справочной информации

Затем оформляем заказ (рис 2.9)

Рисунок 2.9 Заполнение документов

Получили следующие отчеты: (рис.2.10)

Рисунок 2.10 Отчеты

Заключение

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

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

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

Список использованной литературы

1. ГОСТ 34.602-89. «Комплекс стандартов на автоматизированные системы. Автоматизированные системы. Техническое задание на создание автоматизированной системы».
2. Абрамов Г.В., Медведкова И.Е., Коробкова Л.А. «Проектирование информационных систем» - Воронеж:ВГУИТ, 2012. - 172 с.
3. Аверченков В.И., Лозбинев Ф.Ю., Тищенко А.А. «Информационные системы в производстве и экономике» - М.:ФЛИНТА, 2011. - 274 с.
4. Братищенко В.В. «Проектирование информационных систем» - Иркутск: Изд-во БГУЭП, 2010. - 84 с.
5. Вендеров А.М. «Проектирование программного обеспечения экономических информационных систем» - М.: Финансы и статистика, 2012.
6. Гвоздева Т.В., Баллод Б.А. «Проектирование информационных систем» - М.:Феникс, 2011. - 512 с.
7. Гвоздева В.А., Лаврентьева И.Ю. «Основы построения АИС» - М.: ИД «ФОРУМ»: ИНФРА-М, 2010. – 320с.
8. Калянов Г.Н. «Стратегическое управление информационными системами» - М.:БИНОМ, 2010. - 510 с.
9. Коровкина Н.Л. «Проектирование информационных систем» - М.: Инетрнет-университет информационных технологий - ИНТУИТ. ру, 2013.
10. Мишенин А.И. «Теория экономических информационных систем» - М.: Финансы и статистика, 2011. - 240 с.
11. Соловьев И.В., Майоров А.А. «Проектирование информационных систем» - М.:Академический проект, 2011. - 400 с.
12. Титоренко Г.А. «Информационные системы и технологии управления» - М.:ЮНИТИ-ДАНА, 2012. - 591 с.
13. Черемных С.В. «Моделирование и анализ систем» - М.: Финансы и статистика, 2013. - 192 с.

Приложение

Фрагмент кода

unit Unit1;

interface

uses

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

Dialogs, DB, ADODB, Grids, DBGrids, Menus, StdCtrls;

type

TForm1 = class(TForm)

DataSource1: TDataSource;

DataSource2: TDataSource;

DataSource3: TDataSource;

DataSource4: TDataSource;

DataSource5: TDataSource;

DataSource6: TDataSource;

DataSource7: TDataSource;

DataSource8: TDataSource;

DataSource9: TDataSource;

ADOTable1: TADOTable;

ADOTable2: TADOTable;

ADOTable3: TADOTable;

ADOTable4: TADOTable;

ADOTable5: TADOTable;

ADOTable6: TADOTable;

ADOTable7: TADOTable;

ADOTable8: TADOTable;

ADOTable9: TADOTable;

ADOConnection1: TADOConnection;

MainMenu1: TMainMenu;

N1: TMenuItem;

N2: TMenuItem;

N3: TMenuItem;

N4: TMenuItem;

N5: TMenuItem;

N6: TMenuItem;

N7: TMenuItem;

N8: TMenuItem;

N9: TMenuItem;

N10: TMenuItem;

N11: TMenuItem;

DataSource10: TDataSource;

ADOTable10: TADOTable;

N12: TMenuItem;

Button1: TButton;

Button2: TButton;

DBGrid1: TDBGrid;

ADOTable1kod_rekl: TAutoIncField;

ADOTable1reklama: TWideStringField;

ADOTable1kod_vidrec: TIntegerField;

ADOTable1opisanie: TWideStringField;

ADOTable1kod_celaud: TIntegerField;

N13: TMenuItem;

N14: TMenuItem;

procedure N4Click(Sender: TObject);

procedure N6Click(Sender: TObject);

procedure N7Click(Sender: TObject);

procedure N8Click(Sender: TObject);

procedure N10Click(Sender: TObject);

procedure N9Click(Sender: TObject);

procedure N5Click(Sender: TObject);

procedure N11Click(Sender: TObject);

procedure N12Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure Button1Click(Sender: TObject);

procedure N13Click(Sender: TObject);

procedure N14Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

implementation

uses Unit2, Unit3, Unit4, Unit5, Unit6, Unit7, Unit8, Unit9, Unit10,

Unit12, Unit13, Unit14;

{$R *.dfm}

procedure TForm1.N4Click(Sender: TObject);

begin

Form2.ShowModal;

end;

procedure TForm1.N6Click(Sender: TObject);

begin

Form3.Showmodal;

end;

procedure TForm1.N7Click(Sender: TObject);

begin

Form4.Showmodal;

end;

procedure TForm1.N8Click(Sender: TObject);

begin

Form5.ShowModal;

end;

procedure TForm1.N10Click(Sender: TObject);

begin

Form6.ShowModal;

end;

procedure TForm1.N9Click(Sender: TObject);

begin

Form7.ShowModal;

end;

procedure TForm1.N5Click(Sender: TObject);

begin

Form8.ShowModal;

end;

procedure TForm1.N11Click(Sender: TObject);

begin

Form9.ShowModal;

end;

procedure TForm1.N12Click(Sender: TObject);

begin

Form10.Showmodal;

end;

procedure TForm1.Button2Click(Sender: TObject);

begin

Form1.ADOTable1.Delete;

end;

procedure TForm1.Button1Click(Sender: TObject);

begin

Form12.ShowModal;

end;

procedure TForm1.N13Click(Sender: TObject);

begin

Form13.ADOTable1.Active:=true;

Form13.ShowModal;

end;

procedure TForm1.N14Click(Sender: TObject);

begin

Form14.ADOTable1.Active:=true;

Form14.ShowModal;

end;

end.

unit Unit11;

interface

uses

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

Dialogs, StdCtrls, jpeg, ExtCtrls;

type

TForm11 = class(TForm)

Edit1: TEdit;

Edit2: TEdit;

Label1: TLabel;

Label2: TLabel;

Button1: TButton;

Button2: TButton;

Image1: TImage;

procedure Button2Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form11: TForm11;

implementation

uses Unit1;

{$R *.dfm}