112
3
Канцелярский набор
штука
5
500
2500
Итого:
4550 рублей.
Эксплуатационные расходы это издержки производства, связанные с
поддержанием в работоспособном состоянии используемых систем, машин и
оборудования, расходы, необходимые для поддержания работоспособного
состояния основных средств в течение всего намеченного срока службы. К
эксплуатационным расходам при проектировании системы можно отнести
затраты на оплату электроэнергии, использованной вычислительной техникой. В
процессе проектирования и разработки ИС автоматизации сервисного
обслуживания использовался один ПК, а также сервер и принтер потребляемая
ими мощность, тариф оплаты 1 кВт и расчет планируемых затрат на
электроэнергию представлены в Таблице 3.5.
Таблица 0.5
Расчет затрат на электроэнергию
№
Компьютер
Мощность,
Вт
Кол-
во
часов
Кол-во
кВт
Стоимость
кВт
К оплате,
руб
1
Server ТС 8200SP
1000
276
276
5,30р.
1 462,80р.
2
ИБП LIEBERT
500
276
138
5,30р.
731,40р.
3
Acer H226HQLbmid
100
276
27,6
5,30р.
146,28р.
4
HP LaserJet P1505
50
276
13,8
5,30р.
73,14р.
Итого:
2413
Также необходимо учесть расходы на закупку комплекса технических средств:
Таблица 0.6
Стоимость комплекса технических средств
№
Наименование
Стоимость
Единицы
Общая
стоимость
1
Server ТС 8200SP
26204
26204
2
ПК
9812
9812
3
Acer H226HQLbmid
5456
5456
4
HP LaserJet P1505
3748
3748
Итого:
45220
В Таблице 3.7 выполнена калькуляция планируемой себестоимости
создания информационной системы: представлена структура затрат по
рассмотренным выше статьям, приведены соответствующие суммы, а также их
113
процентные доли в планируемой суммарной себестоимости ИС автоматизации
сервисного обслуживания.
Таблица 0.7
Структура планируемой себестоимости ИС автоматизации сервисного
обслуживания
№
Статьи затрат
Сумма
% от общей
суммы затрат
1
Заработная плата разработчиков
136642
59,50
2
Страховые взносы
40842
17,78
3
Эксплуатационные расходы
4550
1,98
4
Затраты на расходные материалы
2413
1,05
4
Затраты на техническое обеспечение
45220
19,69
Итого:
229667
100
На Рисунке 3.3 представлено процентное распределение затрат по статьям
в структуре планируемой суммарной себестоимости разработки ИС
автоматизации сервисного обслуживания.
Рисунок 0.3 Процентное распределение планируемых затрат
Абсолютный показатель снижения трудовых затрат на обработку
информации:
Т=2882,13-623,73=2258 часов
Коэффициент снижения трудовых затрат
K
т
=(2258/2882)*100%=78 %
Показатель снижения стоимостных затрат
С=428888,06-92816,66=336071,41 рублей.
59,50
17,78
1,98
1,05
19,69
Заработная плата
разработчиков
Страховые взносы
Эксплуатационные
расходы
Затраты на расходные
материалы
Затраты на техническое
обеспечение
114
Срок окупаемости затрат на внедрение проекта машинной обработки
информации:
Т
ок
= 229667/336071=0,68 года или 8 месяцев.
Таким образом, в результате расчета основных экономических
показателей ясно, что проект экономически эффективен.
115
Заключение
Основные задачи ВКР — анализ деятельности предприятия, выявление
существующих недостатков в текущей технологии управления рассмотренного
предприятия, разработка веб-ориентированной системы для автоматизации
процессов, связанных с учетом оборудования, поступающего для проведения
ремонта, выполнены.
На основании анализа текущей технологии управления были
сформированы цели и назначение разрабатываемого автоматизированного
варианта решения данной задачи, произведено сравнение с аналогичными
системами решения данной задачи, проведена формализация расчетов
результатных показателей, выбрана технология проектирования, а также принят
ряд проектных решений по техническому, информационному, программному и
технологическому обеспечению.
Для проектируемой системы была построена информационная модель,
разработана локальная система классификации и кодирования. Кроме того, были
приняты решения по способу хранения и организации данных. Построена
инфологическая схема базы данных.
В части программного обеспечения были спроектированы дерево функций
и сценарий диалога работы системы по учету затрат по местам возникновения, а
также разработана структурная схема пакета: дерево вызова процедур и схема
взаимосвязи программных модулей и файлов.
В рамках технологического обеспечения была спроектирована схема
организации технологии сбора, передачи, обработки и выдачи информации для
разрабатываемого проекта.
На основании анализа предметной области и данных, полученных путем
испытания программного решения, была рассчитана ожидаемая экономическая
эффективность проекта. Ее уровень позволяет говорить о рентабельности
данного проекта. Было отмечено снижение как стоимостных, так и трудовых
затрат.
В соответствии с расчетами, срок окупаемости проекта составит около 8
месяцев.
116
Дальнейшее развитие созданной системы необходимо по направлению к
увеличению ее функциональности, а также дальнейшей интеграции в
существующую систему предприятия.
В частности, необходима дальнейшая разработка и расширение
разработанного приложения с целью учета выполнения ремонта и гарантийного
обслуживания, а также подготовка отчетов по работе сервисного отдела
предприятия.
117
Список литературы
1. Березин С.А., Березин Б.А., Начальный курс С и С++, М., Диалог-
МИФИ, 2017 г., 288 с.
2. Брайан У. Керниган, Деннис М. Ритчи, Язык программирования C,
М., Вильямс, 2017 г, 288 с.
3. Брайан У. Керниган, Роб Пайк, Практика программирования, М.,
Вильямс, 2017 г., 288 с.
4. Бунаков П.А., Лопатин А. В, Практикум по решению задач на ЭВМ
в среде Delphi. Учебное пособие, М., Инфра-М, 2018 г, 304 с.
5. Вон Вернон, Реализация методов предметно-ориентированного
проектирования, М, Вильямс, 2017 г, 688 с.
6. Грацианова Т.А., Программирование в примерах и задачах, М.,
Лаборатория знаний, 2018 г, 368 с.
7. Данилин А.А., Слюсаренко А. В., Архитектура и стратегия. "Инь" и
"янь" информационных технологий, М, Интернет-университет информационных
технологий, 2017 г, 506 с.
8. Джеффри Рихтер, CLR via C#. Программирование на платформе
Microsoft.NET Framework 4.5 на языке C#, М., Питер, 2017 г, 896 с.
9. Джон Скит, C# для профессионалов. Тонкости программирования,
М., Вильямс, 2017 г, 608 с.
10. Джоэл Грас, Data Science. Наука о данных с нуля, М, БХВ-
Петербург, 2018, 336 с.
11. Дональд Эрвин Кнут, Искусство программирования. Том 2.
Получисленные алгоритмы, М., Вильямс, 2017 г, 832 с.
12. Дональд Эрвин Кнут, Искусство программирования. Том 3.
Сортировка и поиск, М., Вильямс, 2017 г., 824 с.
13. Иванова Г.А., Технология программирования, М, КноРус, 2018 г,
336 с.
14. Исаев Г.А, Теоретико-методологические основы качества
информационных систем, М. Инфра-М, 2018 г. 258 с.
118
15. Кузнецов А. С., Ченцов С. В, Многоэтапный анализ архитектурной
надежности и синтез отказоустойчивого программного обеспечения сложных
систем, М, Инфра-М, 2018 г, 144 с.
16. Макаровских Т.А., Панюков А. С., Языки и методы
программирования. Создание простых GUI-приложений с помощью Visual С++,
М., Ленанд, 2018 г, 144 с.
17. Мартин Фаулер, Предметно-ориентированные языки
программирования, М., Вильямс, 2017 г, 576 с.
18. Окулов С.А., Пестов О.Г, Динамическое программирование, М.,
Бином. Лаборатория знаний, 2017 г, 296 с.
19. Панюкова Т.А. Панюков А.С., Языки и методы программирования.
Путеводитель по языку С++, М., Ленанд, 2018 г, 216 с.
20. Подбельский В.А, Курс программирования на языке Си, М.,
ДМК Пресс, 2018 г, 384 с.
21. Стенли Б. Липпман, Жози Лажойе, Барбара Э. Му, Язык
программирования C++. Базовый курс, М, Вильямс, 2017 г, 1120 с.
22. Стивен Прата, Язык программирования C++. Лекции и упражнения,
М., Вильямс, 2017 г, 1248 с.
23. Стивен С. Скиена, Алгоритмы. Руководство по разработке, Спб,
БХВ-Петербург, 2018 г, 720 с.
24. Фредерик Брукс, Проектирование процесса проектирования.
Записки компьютерного эксперта, М., Вильямс, 2017 г, 464 с.
119
Приложение. Листинг основных программных модулей
unit ufAccessEditor;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants,
System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.DBCtrls, DB;
type
TfAccessEditor = class(TForm)
DBText1: TDBText;
Label1: TLabel;
DBText2: TDBText;
Label2: TLabel;
DBCheckBox1: TDBCheckBox;
DBCheckBox2: TDBCheckBox;
DBCheckBox3: TDBCheckBox;
DBCheckBox4: TDBCheckBox;
Button1: TButton;
Button2: TButton;
procedure FormKeyPress(Sender: TObject; var Key: Char);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
fAccessEditor: TfAccessEditor;
implementation
{$R *.dfm}
uses udmData;
procedure TfAccessEditor.Button1Click(Sender: TObject);
begin
//
if (dmData.cdsAccess.State = dsInsert) or (dmData.cdsAccess.State = dsEdit) then
dmData.cdsAccess.Post;
120
Close;
end;
procedure TfAccessEditor.Button2Click(Sender: TObject);
begin
Close;
end;
procedure TfAccessEditor.FormClose(Sender: TObject; var Action: TCloseAction);
begin
//
dmData.cdsAccess.Cancel;
end;
procedure TfAccessEditor.FormKeyPress(Sender: TObject; var Key: Char);
begin
//
if (Key = #27) then Close;
end;
end.
unit ufAnalyserParams;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants,
System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.ComCtrls, Vcl.DBCtrls;
type
TfAnalyserParams = class(TForm)
bOk: TButton;
bCancel: TButton;
DateTimePicker1: TDateTimePicker;
Label1: TLabel;
DateTimePicker2: TDateTimePicker;
Label2: TLabel;
eDaysCount: TEdit;
lDaysCount: TLabel;
eK: TEdit;
lK: TLabel;
lB: TLabel;
eB: TEdit;
procedure FormCreate(Sender: TObject);
procedure bOkClick(Sender: TObject);
121
procedure FormKeyPress(Sender: TObject; var Key: Char);
private
{ Private declarations }
FDate1, FDate2 : TDateTime;
FDish, FDaysCount : Integer;
FK : Double;
FB : Double;
FDefectID : Integer;
public
{ Public declarations }
property Date1 : TDateTime read FDate1;
property Date2 : TDateTime read FDate2;
property DaysCount : Integer read FDaysCount;
property K : Double read FK;
property B : Double read FB;
property DefectID : Integer read FDefectID;
end;
var
fAnalyserParams: TfAnalyserParams;
implementation
{$R *.dfm}
uses udmData;
procedure TfAnalyserParams.bOkClick(Sender: TObject);
begin
//
FDate1 := DateTimePicker1.Date;
FDate2 := DateTimePicker2.Date;
if (FDate1 >= FDate2) then
raise Exception.Create('Дата начала периода должна быть меньше даны
окончания периода');
try
//
FDaysCount := StrToInt (eDaysCount.Text);
if (FDaysCount <= 0) then
raise Exception.Create('Прогнозируемый период должен быть больше
нуля');