102
Заключение
Малый бизнес в экономике страны, и в частности розничный малый
бизнес, имеет большое стабилизирующее значение в экономике как в
масштабе большой страны, так и в региональной экономике. Поэтому
автоматизация его процессов имеет большое значение для оптимизации
бизнес-процессов и увеличения эффективности как бизнеса, так и
экономики страны в целом.
Розничный товарооборот – это показатель мощности торгового
предприятия, эффективности использования его ресурсов. По обороту
розничной торговли можно судить об эффективности работы предприятия
в целом.
Основной составной частью розничного товарооборота является
продажа товаров населению за наличный расчет, а объем реализации
определяется выручкой за проданные товары. На предприятии розничной
торговли одной из важнейших частей учета является учет товаров.
Разработанное и реализованное автоматизированное рабочее место
продавца консультанта позволит компании осуществить автоматизацию
процесса учета продаж товаров. Применение ИС продавца консультанта
позволит эффективно управлять работой компании и иметь достоверную
информацию по продажам, поступлению товаров, их наличию на складе,
эффективности работы с клиентами.
В ходе описания информационного обеспечения была построена
информационная модель, описаны нормативно-справочная информация, а
также результатная информация, схема диалога пользователя и системы.
Кроме того, были приняты решения по способу хранения и организации
данных.
В ходе описания программного обеспечения были спроектированы
дерево функций и сценарий диалога работы системы по учету затрат по
103
местам возникновения, построена инфологическая схема базы данных,
описаны каждая таблицы и поле в таблицах базы данных, указаны их тип и
ограничения.
Здесь же разработана структурная схема пакета, дерево вызова
процедур и описаны программные модули системы.
Расчет показателей экономической эффективности разработки и
внедрения автоматизированной информационной системы доказывает не
только эффективность внедрения данной системы, но даже необходимость
этого.
Внедрение системы принесет не только заметный экономический
эффект, но весьма быстро окупит затраты на ее разработку, создание и
внедрение.
Разработанная система обеспечивает учет продаж товаров и
построение различного рода отчетов, что существенно упрощает работу и
увеличивает производительность продавца консультанта, а руководству
компании позволяет оценивать результативность каждого.
Цели дипломной работы, поставленные во введении, выполнены.
104
Список литературы
1. Авдошин А.А., Песоцкая Е.В.: Информатизация бизнеса.
Управление рисками, - М., ДМК-Пресс, 2011 г., 176 с.
2. Алекс Эллайн: C++. От ламера до программера (включая
C++11), - М., Издательство: Питер, 2015 г., 480 стр.
3. Аникеев С. П., Маркин Н.В.: Разработка приложений баз
данных в Delphi. Самоучитель, - М.,Диалог-МИФИ, 2013 г., 160 с.
4. Арнольд Виллемер: Программирование на С++, - М., Эксмо,
2013 г., 528 с.
5. Брюс Тейт: Семь языков за семь недель. Практическое
руководство по изучению языков программирования, - М., Издательство:
ДМК-Пресс, 2014 г., 384 стр.
6. Васвани В.А.: MySQL: использование и администрирование,
СПб, Питер, 2011 г., 368 с.
7. Васильев А.В: Самоучитель C++ с примерами и задачами, - М.,
Наука и Техника, 2015 г., 480 с.
8. Вигерс, Битти: Разработка требований к программному
обеспечению, - М., Издательство: BHV, 2014 г., 736 стр.
9. Герберт Шилдт: С++ для начинающих, - М., Эком, 2011 г., 640
с.
10. ГолощаповА. Р.: MicrosoftVisualStudio 2011, - М., BHV, 2011 г.,
544 с.
11. ГурвицГ.Е.: Microsoft Access 2011. Разработка приложений на
реальном примере, - М., BHV, 2011 г., 424 с.
12. Дейтел, Дейтел: Как программировать на Visual C# 2012.
Включая работу на Windows 7 и Windows 8, - М., Питер, 2014 г., 864 с.
13. Джо Майо: Самоучитель MicrosoftVisualStudio 2011, - М.,
BHV, 2011 г., 464 с.
105
14. Исаев Г.А.: Информационные системы в экономике. Учебник, -
М., Омега-Л, 2013 г., 462 с.
15. Исаев Г.А.: Проектирование информационных систем.
Учебное пособие, - М., Омега-Л, 2015 г., 424 с.
16. ИэнГриффитс: Программирование на C# 5.0, - М., Эксмо, 2014
г., 1135 с.
17. Курлов А.А, Петров Е.А.: Методология информационной
аналитики, - М.,Проспект, 2014 г., 384 с.
18. Мартынов Н.А: Программирование для Windows на С\С++. В
2-х томах, - М., Бином, 2013 г., 480 с.
19. Ошероув Р.О: Искусство автономного тестирования с
примерами на С#, - М., ДМК-Пресс, 2014 г., 360 с.
20. Паттерсон, Хеннесси: Архитектура компьютера и
проектирование компьютерных систе- М. Классика ComputersScience, Спб
Питер, , 2012 г., 784 с.
21. Пирогов В.А.: Информационные системы и базы данных:
организация и проектирование, - М., BHV, 2009 г., 528 с.
22. Полубенцева - М. П.: С/С++ Процедурное программирование, -
М., BHV, 2014 г., 432 с.
23. Потопахин В.С.: Искусство алгоритмизации, - М.,
Издательство: ДМК-Пресс, 2014 г., 320 стр.
24. Пугачев Е.К., Шериев Ш.К., Кичинский Е.А.: Разработка
приложений для Windows 8 на языке C#, - М., BHV, 2013 г., 416 с.
25. Роберт Дж. Мюллер, Проектирование баз данных и UML, - М.,
Лори, 2013 год, 432 с.
26. Роберт Лафоре: Объектно-ориентированное программирование
в С++, - М., Питер, 2013 г., 928 с.
27. СурядныйА.Е.: Microsoft Access 2011. Лучший самоучитель, -
М., Астрель, 2012 г., 448 с.
106
28. Таненбаум А.А, Бос Е.В.: Современные операционные
системы, Спб, Питер, 2015 г., 1120 стр
29. Тахагхогхи, Вильямс: Руководство по MySQL, - М., BHV, 2011
г., 544 с.
30. Тимофеев В. А: Самоучитель С++ как он есть, - М., Бином,
2009 г., 336 с.
31. Тюгашев А. Е.: Языки программирования. Учебное пособие.
Стандарт третьего поколения, - М., Издательство: Питер, 2014 г. 336 стр.
32. Ховард, Лебланк, Виега: Как написать безопасный код на С++,
Java, Perl, PHP, ASP.NET, - М., ДМК-Пресс, 2014 г., 288 с.
33. Чистов Д.А: Экономическая информатика (для бакалавров).
Учебное пособие, - М., Кнорус, 2014 г., 512 с.
34. Эндрю Стиллмен: Изучаем C#, - М., Питер, 2014 г., 816 с.
35. Энтони Молинаро, SQL. Сборник рецептов, - М., Символ-
Плюс,2011 г., 672 с.
36. Энтони Уильямс: Параллельное программирование на С++ в
действии. Практика разработки многопоточных программ, - М., ДМК-
Пресс, 2014 г., 672 с.
107
Приложение. Листинг основных программных модулей
unit ufProduct;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants,
System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.ExtCtrls, Vcl.Grids, Vcl.DBGrids,
Vcl.StdCtrls, Vcl.DBCtrls, Vcl.ComCtrls, Vcl.ToolWin, Vcl.DBClientActns,
Vcl.DBActns, Vcl.ActnList, Vcl.PlatformDefaultStyleActnCtrls,
Vcl.ActnMan;
type
TfProduct = class(TForm)
DBGrid1: TDBGrid;
procedure FormKeyPress(Sender: TObject; var Key: Char);
private
{ Private declarations }
public
{ Public declarations }
end;
var
fProduct: TfProduct;
108
implementation
{$R *.dfm}
uses ufData, ufRefBooks;
procedure TfProduct.FormKeyPress(Sender: TObject; var Key: Char);
begin
if (Ord (Key) = 27) then
Close ();
end;
end.
unit ufProductSelector;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants,
System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.ExtCtrls, Vcl.Grids,
Vcl.DBGrids;
type
TfProductSelector = class(TForm)
109
Panel3: TPanel;
bOk: TButton;
bCancel: TButton;
Panel4: TPanel;
Panel1: TPanel;
Label1: TLabel;
eNumber: TEdit;
Label2: TLabel;
eName: TEdit;
eCost: TEdit;
Label3: TLabel;
bView: TButton;
DBGrid1: TDBGrid;
procedure bCancelClick(Sender: TObject);
procedure bOkClick(Sender: TObject);
procedure FormKeyPress(Sender: TObject; var Key: Char);
procedure eNameChange(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormShow(Sender: TObject);
procedure bViewClick(Sender: TObject);
private
{ Private declarations }
procedure Filter;
public
{ Public declarations }
110
ID : Integer;
end;
var
fProductSelector: TfProductSelector;
implementation
{$R *.dfm}
uses ufData, ufProductViewer;
procedure TfProductSelector.Filter;
var
F : string;
begin
//
F := '';
if eNumber.Text <> '' then
begin
//
if F <> '' then F := F + ' and ';
F := F + 'Артикул LIKE ' + QuotedStr(eNumber.Text + '%');
111
end;
if eName.Text <> '' then
begin
//
if F <> '' then F := F + ' and ';
F := F + 'Название LIKE ' + QuotedStr(eName.Text + '%');
end;
try
StrToInt (eCost.Text);
if eCost.Text <> '' then
begin
//
if F <> '' then F := F + ' and ';
F := F + 'Стоимость = ' + eCost.Text;
end;
except
end;
fData.tProduct.Filter := F;
fData.tProduct.Filtered := F <> '';