87
Рисунок 39. Диаграмма сравнения базового и проектного варианта
стоимостных затрат обработки информации
Ниже будет произведен расчет затрат.
Приобретение программного обеспечения «1С: Предприятие 8.3»:
15000 * 6 = 90000 руб.
Накладные расходы: бумага, картриджи для принтера, компакт диски. В
совокупности это составляет 1500 руб.
Затраты на электроэнергию: 100 дней по 8 часов 1 компьютер с затратой
0.3 киловатт/час по стоимости 5,47 * 100 * 8 * 0,3 = 1312,8 руб.
На основе расчетных данных следует, что проектирование, разработка, и
внедрение составит:
90000 + 1500 + 1312,8 = 92812,8 руб.
Сроки окупаемости затрат на внедрение системы составят:
Т
ок
= 67386 / 92812,8 = 1 год и 5 месяцев.
Окупаемость затрат на внедрение проекта составляет около одного года и
пяти месяцев.
113038
45652
67386
0
20000
40000
60000
80000
100000
120000
Базовый вариант Проектный вариант Снижение затрат
Изменение стоимостных затрат, рублей в год
88
ЗАКЛЮЧЕНИЕ
В представленной выпускной квалификационной работе был рассмотрен
процесс учета продаж в ювелирном магазине.
Продажи это ключевой процесс для любого магазина. Учет играет
важнейшую стратегическую роль, поскольку влияет на поступающую прибыль,
объем продаж и на число покупателей. В свою очередь, автоматизация формирует
информационную базу, которая необходима для управления торговой
деятельностью.
Для автоматизации деятельности ювелирных магазинов на рынке
финансово-экономических систем предлагается достаточно широкий спектр
выбора различных информационных систем. Наиболее популярной и широко
востребованной в России является система «1С: Предприятие» и ее типовые
конфигурации для автоматизации отдельных участков экономической
деятельности предприятия, поэтому выбор был в сторону этой среды разработки
конфигурации. При этом следует иметь в виду, что конфигурация остается
открытой для изменения и при необходимости, она может быть модифицирована с
использованием режима конфигурирования.
В дипломной работе успешно была разработана и реализована
конфигурация «Ювелирный магазин «Lucky Ring» в среде «1С: Предприятие».
Были созданы все необходимые справочники, документы и отчеты. Для работы с
данной конфигурацией в первую очередь необходимо заполнить все
разработанные справочники. Они предназначены для хранения всей информации
для дальнейшего заполнения имеющихся документов. Все сформированные
документы отображаются и хранятся. Для автоматизации деятельности
ювелирного магазина были созданы справочники: «Производители»,
«Поставщики» и «Товары». Они содержат полный объем данных о товарах,
поступающих от поставщиков, которые в свою очередь связанны с
предприятиями-производителями ювелирных изделий. Возможность создания
89
документов позволила вести учет о поступлении товаров в магазин, иметь данные
о продажах. А еще появилась возможность создавать документы о возврате товара
с последующими отчетами.
Также в ходе работы произведены расчеты экономической эффективности
от внедрения данной системы. На основе этих данных можно сделать вывод о том,
что внедрение благоприятно скажется на работе сотрудников, уменьшит время
поиска ювелирных изделий на полках магазина и позволит быстрее заполнять все
необходимые документы.
На данный момент этой небольшой информационной базы будет
достаточно для автоматизации учета продаж, но в будущем у ювелирного магазина
«Lucky Ring» может появиться еще одна торговая точка, и в этом случае
разработанное прикладное решение позволит легко управлять всеми торговыми
процессами магазина в этих условиях. Система имеет гибкую структуру, которая
может легко изменяться и дополняться при определенных условиях.
90
СПИСОК ИСПОЛЬЗОВАННОЙ ЛИТЕРАТУРЫ
1) Заика А.А. Основы разработки для платформы 1С: Предприятие 8.2 в
режиме «Управляемое приложение» / А.А. Заика. – 2-е изд., испр. - Москва:
Национальный Открытый Университет «ИНТУИТ», 2018. – 254 стр.
2) Кашаев С. М. Программирование в 1С: Предприятие 8.3. - Питер, 2014, –
304 стр.
3) Маглинец Ю.А. Анализ требований к автоматизированным
информационным системам – Интернет-университет информационных
технологий, Бином. Лаборатория знаний, 2008, 200 стр.
4) Радченко М.Г. Хрусталева Е.Ю. 1С: Предприятие 8.3. Практическое
пособие разработчика. Примеры и типовые приемы - 1С-Паблишинг, 2013, – 965
стр.
5) Уткин В. Б. Балдин К. В. Информационные системы в экономике –
Academia, 2012, – 288 стр.
6) Черников Б. В. Информационные технологии управления – Инфра-М,
Форум, 2014, – 368 стр.
7) Руководство по 1С – (http://1s-manual.ru/);
8) Cайт разработчиков программы Галактика – (https://galaktika.ru/);
9) Cайт разработчиков программы ПАРУС – (https://www.parus.com/);
10) Сайт разработчиков программы 1С: Предприятие 8 – (http://www.1c.ru);
11) Статьи по 1С – (https://infostart.ru/);
ПРИЛОЖЕНИЕ
ПРИЛОЖЕНИЕ 1
Документ «Поступление товара»
Код формы документа «Поступление товара»
&НаКлиенте
Процедура ТоварыЦенаЗаГраммПриИзменении(Элемент)
СтрокаТабличнойЧасти = Элементы.Товары.ТекущиеДанные;
СтрокаТабличнойЧасти.Цена = СтрокаТабличнойЧасти.Вес *
СтрокаТабличнойЧасти.ЦенаЗаГрамм;
СтрокаТабличнойЧасти.Сумма = СтрокаТабличнойЧасти.Количество *
СтрокаТабличнойЧасти.Цена;
КонецПроцедуры
&НаКлиенте
Процедура ТоварыВесПриИзменении(Элемент)
СтрокаТабличнойЧасти = Элементы.Товары.ТекущиеДанные;
СтрокаТабличнойЧасти.Цена = СтрокаТабличнойЧасти.Вес *
СтрокаТабличнойЧасти.ЦенаЗаГрамм;
СтрокаТабличнойЧасти.Сумма = СтрокаТабличнойЧасти.Количество *
СтрокаТабличнойЧасти.Цена;
КонецПроцедуры
&НаКлиенте
Процедура ТоварыКоличествоПриИзменении(Элемент)
СтрокаТабличнойЧасти = Элементы.Товары.ТекущиеДанные;
СтрокаТабличнойЧасти.Сумма = СтрокаТабличнойЧасти.Цена *
СтрокаТабличнойЧасти.Количество;
КонецПроцедуры
&НаСервере
Процедура ПечатьБилетаНаСервере(ТабДок)
ВсегоТоваров = 0;
ОбщаяСумма = 0;
Макет = Документы.ПоступлениеТовара.ПолучитьМакет("Печать");
ЗаголовокТаблицы = Макет.ПолучитьОбласть("ЗаголовокТаблицы");
Шапка = Макет.ПолучитьОбласть("Шапка");
Шапка.Параметры.Номер = Объект.Номер;
Шапка.Параметры.Дата = Объект.Дата;
Шапка.Параметры.Поставщик = Объект.Поставщик;
ТабДок.Вывести(ЗаголовокТаблицы);
ТабДок.Вывести(Шапка);
ЗаголовкиТоваров = Макет.ПолучитьОбласть("ЗаголовкиТоваров");
ТабДок.Вывести(ЗаголовкиТоваров);
ТабДок.ОтображатьЗаголовки = Ложь;
ТабДок.ОтображатьСетку = Ложь;
ТабДок.Защита = Ложь;
ТабДок.ТолькоПросмотр = Ложь;
Для Каждого Строка Из Объект.Товары Цикл
Товары = Макет.ПолучитьОбласть("Товары");
Товары.Параметры.Товар = Строка.Товар;
Товары.Параметры.Вес = Строка.Вес;
Товары.Параметры.ЦенаЗаГрамм = Строка.ЦенаЗаГрамм;
Товары.Параметры.Количество = Строка.Количество;
Товары.Параметры.Цена = Строка.Цена;
Товары.Параметры.Сумма = Строка.Сумма;
ТабДок.Вывести(Товары);
ВсегоТоваров = Строка.Количество + ВсегоТоваров;
ОбщаяСумма = Строка.Сумма + ОбщаяСумма;
КонецЦикла;
Итоги = Макет.ПолучитьОбласть("Итоги");
Итоги.Параметры.ВсегоТоваров = ВсегоТоваров;
Итоги.Параметры.ОбщаяСумма = ОбщаяСумма;
ТабДок.Вывести(Итоги);
КонецПроцедуры
&НаКлиенте
Процедура Печать(Команда)
ТабДок = Новый ТабличныйДокумент;
ПечатьБилетаНаСервере(ТабДок);
ТабДок.Показать();
КонецПроцедуры
Код модуля документа «Поступление товара»
Процедура ОбработкаПроведения(Отказ, Режим)
// регистр Товары Приход
Движения.Товары.Записывать = Истина;
Для Каждого ТекСтрокаТовары Из Товары Цикл
Движение = Движения.Товары.Добавить();
Движение.ВидДвижения = ВидДвиженияНакопления.Приход;
Движение.Период = Дата;
Движение.Товар = ТекСтрокаТовары.Товар;
Движение.Вес = ТекСтрокаТовары.Вес;
Движение.Цена = ТекСтрокаТовары.Цена;
Движение.ЦенаЗаГрамм = ТекСтрокаТовары.ЦенаЗаГрамм;
Движение.Количество = ТекСтрокаТовары.Количество;
Движение.Сумма = ТекСтрокаТовары.Сумма;
КонецЦикла;
КонецПроцедуры
Документ «Продажа товара»
Код формы документа «Продажа товара»
&НаКлиенте
Процедура ТоварыЦенаЗаГраммПриИзменении(Элемент)
СтрокаТабличнойЧасти = Элементы.Товары.ТекущиеДанные;
СтрокаТабличнойЧасти.Цена = СтрокаТабличнойЧасти.Вес *
СтрокаТабличнойЧасти.ЦенаЗаГрамм;
СтрокаТабличнойЧасти.Сумма = СтрокаТабличнойЧасти.Количество *
СтрокаТабличнойЧасти.Цена;
КонецПроцедуры
&НаКлиенте
Процедура ТоварыВесПриИзменении(Элемент)
СтрокаТабличнойЧасти = Элементы.Товары.ТекущиеДанные;
СтрокаТабличнойЧасти.Цена = СтрокаТабличнойЧасти.Вес *
СтрокаТабличнойЧасти.ЦенаЗаГрамм;
СтрокаТабличнойЧасти.Сумма = СтрокаТабличнойЧасти.Количество *
СтрокаТабличнойЧасти.Цена;
КонецПроцедуры
&НаКлиенте
Процедура ТоварыКоличествоПриИзменении(Элемент)
СтрокаТабличнойЧасти = Элементы.Товары.ТекущиеДанные;
СтрокаТабличнойЧасти.Сумма = СтрокаТабличнойЧасти.Цена *
СтрокаТабличнойЧасти.Количество;
КонецПроцедуры
&НаСервере
Процедура ПечатьБилетаНаСервере(ТабДок)
ВсегоТоваров = 0;
ОбщаяСумма = 0;
Макет = Документы.ПродажаТовара.ПолучитьМакет("Печать");
ЗаголовокТаблицы = Макет.ПолучитьОбласть("ЗаголовокТаблицы");
Шапка = Макет.ПолучитьОбласть("Шапка");
Шапка.Параметры.Номер = Объект.Номер;
Шапка.Параметры.Дата = Объект.Дата;
Шапка.Параметры.Сотрудник = Объект.Сотрудник;
ТабДок.Вывести(ЗаголовокТаблицы);
ТабДок.Вывести(Шапка);
ЗаголовкиТоваров = Макет.ПолучитьОбласть("ЗаголовкиТоваров");
ТабДок.Вывести(ЗаголовкиТоваров);
ТабДок.ОтображатьЗаголовки = Ложь;