96
ЗАКЛЮЧЕНИЕ
Автоматизация рабочих мест является очень высоким фактором для
предприятия и организаций. Автоматизировав рабочее место, предприятию
удается повысить качество труда, ускорить широкий круг бизнес процессов,
использовать современные методы обработки информации, рассчитывать и
прогнозировать план работы и многое другое.
В рамках выпускной квалификационной работы, мною была разработана
программа информационного склада, позволяющая формировать накладные о
приеме материала или техники, формировать накладные о возврате,
распределении, перемещении, акты о списании, заявки на обеспечение
отделений, а также формировать дефектные ведомости, тем самым разгрузив
работу заведующего склада. Безопасность работы в программе предусмотрена
шифрованием паролей в MD5. Смена паролей зависит от администратора.
Программа сервиса была написана в Borland Delphi 2010 (теперь –
Embarcadero Delphi). Это интегрированная среда создания ПО на языке Delphi
(прежде – Object Pascal) для Mac OS, iOS, Microsoft Windows и Android.
Первоначально она была предложена компанией Borland, но сегодня данная
среда разрабатывается и принадлежит Embarcadero Technologies.
В целом можно сказать, что данный проект является рентабельным, то
есть он удовлетворяет необходимым критериям. Прибыль от этого проекта
будет сравнительно невысокий, но это даст возможность завоевать
определенную репутацию на рынке.
97
СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ
1. ГОСТ 34.003-90, пункт 2.8. Информационная технология. Комплекс
стандартов на автоматизированные системы. Автоматизированные системы.
Термины и определения.
2. ГОСТ 19781-90. Обеспечение систем обработки информации
программное. Термины и определения.
3. ГОСТ 34.003.90, пункт 2.5. Информационная технология. Комплекс
стандартов на автоматизированные системы. Автоматизированные системы.
Термины и определения.
4. Cantu M., Object Pascal Handbook / M. Cantu - CreateSpace
Independent Publishing Platform, 2015. – 552 p.
5. Handford M., Business Advantage: Upper-intermediate: Student's Book /
M. Handford, Lisboa M., Koester A., Pitt A. - Cambridge University Press, 2014. 192
p.
6. Hodges N., More Coding in Delphi / N. Hodges - Nepeta Enterprises,
2015. – 246 p.
7. Автоматизированные информационные технологии в экономике:
учебник / Под ред. Г. А. Титоренко. - М.: ЮНИТИ, 2014. - 422 с.
8. Архангельский А.Н., Приемы программирования в Delphi на основе
VCL / А.Н. Архангельский - М.: Бином. Лаборатория знаний, 2014. – 944 с.
9. Афонин В.Л., Моделирование систем: учебно-практическое
пособие / В.Л. Афонин - М.: Интернет-Университет Информационных
Технологий (ИНТУИТ), 2016. – 232 с.
10. Баженова И.Ю., Основы проектирования приложений баз данных /
И.Ю. Баженова - М.: Интернет-Университет Информационных Технологий
(ИНТУИТ), 2016. – 261 с.
11. Базарова А.С. Организация складского учёта - М.: Триумф, 2014-
128с.
12. Голицына О.Л., Базы данных. Учебное пособие. Гриф УМО вузов
98
России/ О.Л. Голицына - М.: Форум, 2014. – 400 с.
13. Голицына О.Л., Основы проектирования баз данных.: Учебное
пособие / О.Л. Голицына - М.: Форум, 2016. – 416 с.
14. Дадян Э.Г., Методы, модели, средства хранения и обработки
данных / Э.Г. Дадян - М.: Инфра-М, 2017. – 268 с.
15. Долганова О.В., Моделирование бизнес-процессов. Учебник и
практикум для академического бакалавриата / О.В. Долганова - М.:
Издательство: Юрайт, 2016. – 289 с.
16. Иванова Г.С., Объектно-ориентированное программирование / Г.С.
Иванова - М.: Московский Государственный Технический Университет
(МГТУ) имени Н.Э. Баумана, 2014. – 456 с.
17. Илюшечкин В.М., Основы использования и проектирования баз
данных. Учебник для СПО / В.М. Илюшечкин - М.: Юрайт, 2016. – 213 с.
18. Информатика для гуманитариев: учебник и практикум для
академического бакалавриата / Г.Е. Кедрова [и др.]; под ред. Г.Е. Кедровой. -
М.: Издательство Юрайт, 2016. - 439 с.
19. Кагаловский М.Р., Технология баз данных на персональных ЭВМ /
М.Р. Кагаловский − М.: Финансы и статистика, 2014. – 224 с.
20. Казиев В.М., Введение в анализ, синтез и моделирование систем.
Учебное пособие / В.М. Казиев - М.: Интернет-Университет Информационных
Технологий (ИНТУИТ), 2014. – 244 с.
21. Кириллов В.В., Введение в реляционные базы данных. Учебник (+
CD-ROM) / В.В. Кириллов - М.: БХВ-Петербург, 2017. – 464 с.
22. Козлов В., Системный анализ, оптимизация и принятие решений.
Учебное пособие / В. Козлов - М.: Проспект, 2016. – 76 с.
23. Н.В. Козлюк, С.Н. Угримова Складской учет на предприятиях
торговли. – М.: «Феникс», 2015. - 322 с.
24. Кумскова И.А., Базы данных. Учебник. Гриф МО РФ / И.А.
Кумскова - М.: КноРус, 2016. – 400 с.
25. Малков О.Б. Работа с базами данных в среде Delphi: Учеб. пособие
99
для студентов заочной формы обучения. - Омск: Изд-во ОмГТУ, 2015. - 188 с.
26. Мовчан Д.А., InterBase и Delphi. Клиент-серверные базы данных /
Д.А. Мовчан - М.: ДМК-Пресс, 2015 г. – 536 с.
27. Назаров С.В., Архитектура и проектирование программных систем /
С.В. Назаров - М.: Инфра-М, 2016. – 376 с.
28. Озерова М.Е., Программирования в среде Delphi / М.Е. Озерова -
М.: Нобель Пресс, 2014. – 110 с.
29. Рыбаков М.Ю., Бизнес-процессы: как их описать, отладить и
внедрить. Практикум / М.Ю. Рыбаков − М.: Михаил Рыбаков, 2016. – 392 с.
30. Сыроижко В. В., Андреева А. А., Солянникова А. А.
Совершенствование учета производственных запасов на складах
производственного предприятия // Молодой ученый. — 2015. — №3. — С. 517-
520. — URL https://moluch.ru/archive/83/15349/ (дата обращения: 30.04.2018).
31. Туманов В., Основы проектирования реляционных баз данных / В.
Туманов - М.: Интернет-Университет Информационных Технологий
(ИНТУИТ), 2014. – 420 с.
32. Фленов М.Е., Библия Delphi / М.Е. Фленов - М.: БХВ-Петербург,
2015. – 688 с.
33. Хаммер М., Быстрее, лучше, дешевле. Девять методов
реинжиниринга бизнес-процессов / М. Хаммер - М.: Альпина Паблишер, 2016.
– 352 с.
34. Цехановский В.В., Управление данными. Учебник. Гриф УМО
вузов России / В.В. Цехановский - М.: Лань, 2015. – 432 с.
35. Шувалова Н.Н., Документационное обеспечение управления.
Учебник и практикум для СПО / Н.Н. Шувалова − М.: Юрайт, 2017. – 221 с.
36. Эйдлина Г.М., Delphi: программирование в примерах и задачах.
Практикум. Учебное пособие / Г.М. Эйдлина - М.: Инфра-М РИОР, 2016. – 116
37. Защита информации в персональных компьютерах. – Режим
доступа: http://www.all-ib.ru.
38. Изучаем Delphi. О программировании и о Дельфи. – Режим доступа:
100
http://www. droiders.ru.
39. Информационная безопасность на предприятии. – Режим доступа:
http://www.tvoi.biz. 9
40. Ковязин, А. Разработка приложений и баз данных / А. Ковязин. –
Режим доступа: http://www. osp.ru.
41. Мастера Delphi. – Режим доступа: http://www. delphimaster.ru.
42. Электронный документооборот. – Режим доступа:
http://www.fossdoc.com.
101
ПРИЛОЖЕНИЕ А
Диаграмма потоков данных
Рисунок А.1 – Диаграмма потоков данных
102
ПРИЛОЖЕНИЕ Б
Фрагмент текста программы
unit Unit1;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants,
System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.DBCtrls, Unit4, Data.DB,
Vcl.Grids,
Vcl.DBGrids, Vcl.StdCtrls, shellapi,Vcl.ComCtrls, Vcl.ExtCtrls, Vcl.Mask,
Vcl.Menus,
Unit2, Unit3,ComObj, Unit8, Unit12, Vcl.Buttons;
type
TForm5 = class(TForm)
DBNavigator1: TDBNavigator;
PageControl1: TPageControl;
TabSheet1: TTabSheet;
TabSheet2: TTabSheet;
GroupBox1: TGroupBox;
GroupBox2: TGroupBox;
MainMenu1: TMainMenu;
N8: TMenuItem;
N9: TMenuItem;
N10: TMenuItem;
N1: TMenuItem;
N2: TMenuItem;
Label9: TLabel;
DBEdit4: TDBEdit;
Label1: TLabel;
DBEdit1: TDBEdit;
Label4: TLabel;
DBEdit2: TDBEdit;
Label5: TLabel;
Label6: TLabel;
DBEdit6: TDBEdit;
Label2: TLabel;
DBEdit7: TDBEdit;
Label3: TLabel;
DBEdit8: TDBEdit;
103
Продолжение приложения Б
Label7: TLabel;
DBEdit5: TDBEdit;
Label8: TLabel;
DBEdit9: TDBEdit;
Label10: TLabel;
Label12: TLabel;
TabSheet3: TTabSheet;
Label11: TLabel;
DBEdit11: TDBEdit;
Label13: TLabel;
DBEdit12: TDBEdit;
Label14: TLabel;
DBEdit13: TDBEdit;
GroupBox3: TGroupBox;
TabSheet4: TTabSheet;
GroupBox4: TGroupBox;
Label15: TLabel;
DBMemo1: TDBMemo;
DBCheckBox1: TDBCheckBox;
N3: TMenuItem;
N4: TMenuItem;
N5: TMenuItem;
DBLookupComboBox1: TDBLookupComboBox;
SpeedButton1: TSpeedButton;
DBLookupComboBox2: TDBLookupComboBox;
DBEdit3: TDBEdit;
procedure N9Click(Sender: TObject);
procedure N10Click(Sender: TObject);
procedure N1Click(Sender: TObject);
procedure N2Click(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure N4Click(Sender: TObject);
procedure N5Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
procedure MyLocate(s: String);
end;
var
Form5: TForm5;
104
Продолжение приложения Б
implementation
{$R *.dfm}
procedure TForm5.FormClose(Sender: TObject; var Action: TCloseAction);
var Access: Variant;
FullProgPath: PChar;
begin
begin
if trim(DBMemo1.text)='' then ////проверка заполнения поля текст
направления
begin
end
else
begin
Access := CreateOleObject('Access.Application'); Access.Visible :=
True;
Access.OpenCurrentDatabase('C:\СЭС\Win32\Debug\СЭС.mdb', True);
Access.DoCmd.RunMacro('Post'); //Имя макроса.
Access.CloseCurrentDatabase;
Access.Quit($00000001);
end;
DataModule4.Документ.Active:=false;
DataModule4.Документ.Active:=true;
end;
end;
procedure TForm5.N10Click(Sender: TObject);
begin
Form7.Show
end;
procedure TForm5.N1Click(Sender: TObject);
begin
Form8.Show
end;
procedure TForm5.N2Click(Sender: TObject);
begin
105
Продолжение приложения Б
Form7.show;
end;
procedure TForm5.N4Click(Sender: TObject);
begin
datamodule4.Документ.Insert;
end;
procedure TForm5.N5Click(Sender: TObject);
begin
Form12.show;
end;
procedure TForm5.N9Click(Sender: TObject);
begin
form6.Show
end;
procedure TForm5.MyLocate(s: String);
begin
end;
end.
unit Unit7;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Grids, StdCtrls, Buttons, DBGrids, ExtCtrls, Menus;
type
TForm7 = class(TForm)
GroupBox1: TGroupBox;
StringGrid1: TStringGrid;
BitBtn1: TBitBtn;
GroupBox2: TGroupBox;
DBGrid1: TDBGrid;
Image1: TImage;
Label1: TLabel;
BitBtn2: TBitBtn;