Файл: Федеральное государственное автономное образовательное учреждение высшего образования белгородский государственный национальный.pdf
Добавлен: 04.12.2023
Просмотров: 110
Скачиваний: 2
ВНИМАНИЕ! Если данный файл нарушает Ваши авторские права, то обязательно сообщите нам.
ЗАКЛЮЧЕНИЕ
В процессе выполнения выпускной квалификационной работы были выполнены следующие задачи: проведен анализ предметной области; проведен анализ существующего состояния; создана модель «Как есть»; изучена литература об аналогичных информационных системах; обоснована актуальность и значимость предмета проектирования; проведен анализ стратегии автоматизации; создана модель «Как должно быть»; спроектирована информационная система учета и сопровождения заказов; разработана конфигурация для учета и сопровождения заказов; разработанная конфигурация внедрена в эксплуатацию; выявлена целесообразность разработки информационной системы с экономической точки зрения; проведен анализ экономической эффективности внедрения разработанной информационной системы.
В рамках выпускной квалификационной работы для автоматизации отдела сбыта ООО «Гранит» была разработана конфигурация для учета и сопровождения заказов, организующая динамическое обновление информации, а также удобный ввод и хранение информации в виде, позволяющем анализировать деятельность отдела сбыта за любой промежуток времени.
Разработанная конфигурация позволяет сотрудникам:
− эффективно использовать время при организации рабочего процесса;
− удобно работать с данными по заказам;
− удобно вести клиентскую базу;
70
− своевременно получать актуальную информацию по декоративному камню, материалам и оказываемым услугам, не тратя это дополнительное время на поиск необходимой информации в разных отделах;
− производить сортировку и группировку данных по различным параметрам.
Результатом выпускной квалификационной работы является разработанная информационная система, охватывающая основные бизнес- процессы отдела сбыта ООО «Гранит», которая внедрена и успешно используется в организации. Акт о внедрении представлен в Приложении Б.
В качестве перспективы развития этой системы можно предложить дальнейшее расширение ее функциональных возможностей и постепенный охват остальных процессов.
71
СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ
1
ГОСТ 7.9 – 77. Реферат и аннотация. – Москва: Изд-во стандартов,
1981. – 6 с.
2
ГОСТ 2.105 – 95. Общие требования к текстовым документам. –
Москва: Изд-во стандартов, 1981. – 32 с.
3
ГОСТ 7.32 – 2001. Система стандартов по информации, библиотечному и издательскому делу. – Москва: Изд-во стандартов, 1981. – 24 с.
4
ГОСТ 7.82-2001 Библиографическая запись. Библиографическое описание электронных ресурсов. – Москва: Изд-во стандартов, 1981. – 6 с.
5
Александров, Д. В. Инструментальные средства информационного менеджмента. CASE-технологии и распределенные информационные системы:
Учебное пособие [Текст] / Д. В. Александров. - М.: ФиС, 2011. - 224 c.
6
Балдин, К. В. Информационные системы в экономике: Учебное пособие [Текст] / К. В. Балдин. - М.: НИЦ ИНФРА-М, 2013. - 218 c
7
Бочаров, Е. П. Интегрированные корпоративные информационные системы [Текст] / Е. П. Бочаров, А. И. Колдина. - М.: Финансы и статистика,
2010, стр350.
8
Бубарева, О. А. К вопросу проектирования автоматизированной системы управления учебным процессом вуза [Электронный ресурс] / О. А.
Бубарева.– Электрон. текстовые дан. – Москва: [б.и.], 2000. – Режим доступа: http://tm.ifmo.ru/tm2010/src/265e.pdf
9
Валебникова, Н. В. Современные тенденции управленческого учета.
Бухгалтерский учет [Текст] / Н. В. Валебникова, И. П. Василевич.- М.: Форум,
2014. - 224 c.
10 Васильков, А. В. Информационные системы и их безопасность:
Учебное пособие [Текст] / А. В. Васильков, А. А. Васильков, И. А. Васильков. -
М.: Форум, 2013. - 528 c.
72 11 Вендров, А. М. Проектирование программного обеспечения экономических информационных систем:
Учебник для студентов экономических вузов, обучающихся по спец. "Прикладная информатика (по областям)" и "Прикладная математика и информатика" [Текст] / А. М. Вендров.
- М.: Финансы и статистика, 2014.- 544 с.
12 Голицына, О.Л. Базы данных. Учебное пособие [Текст] / О. Л.
Голицына, Н. В. Максимов, И. И. Попов. – М.: Форму-Инфра-М, 2010. – 430 с.
13 Грекул, В. И. Проектирование информационных систем [Текст] / В.
И. Грекул, Г. Н. Денищенко, Н. Л. Коровкина. - М.: Интернет-университет информационных технологий, 2008. – 420 с.
14 Гришин, А. В. Промышленные информационные системы и сети: практическое руководство [Текст] / А. В. Гришин. - М.: Радио и связь, 2012. -
176 c
15 Гусятников, В.Н. Стандартизация и разработка программных систем [Текст] / В. Н. Гусятников, А. И. Безруков. – М.: Финансы и статистика,
2012. – 288с.
16 Дубейковский, В. И. Практика функционального моделирования с
AllFusion Process Modeler 4.1. (BPwin) Где? Зачем? Как? [Текст] / В. И.
Дубейковский. – М. : ДИАЛОГ-МИФИ, 2014. – 464 с
17 Душин, В. К.Теоретические основы информационных процессов и систем [Текст] / В. К. Душин – М.: Дашков и К, 2008. -350 с.
18 Емельянова, Н. З. Основы построения автоматизированных информационных систем. Учебное пособие [Текст] / Н. З. Емельянова, Т. Л.
Партыка, И. И. Попов. – М.: Academia, 2010 – 220 с.
19 Ивашкевич, В. Б. Управленческий учет в информационной системе предприятия [Текст] / Н. З. Емельянова. - . – М. : ДИАЛОГ-МИФИ, 2013. – 102 с.
20 Исаев, Г. Н. Информационные системы в экономике. [Текст] / Г. Н.
Исаев – М.: Омега-Л, 2008 - .430 с.
73 21 Йордан, Э. Объектно-ориентированный анализ и проектирование систем [Текст] / Э. Йордан, С. Аргила. - М.: ЛОРИ, 2012. - 264 с."
22 Карминский, A.M., Черников Б.В. Информационные системы в экономике. Методология создания. [Текст] / А. М. Карминский, Б. В. Черников.
– М.: Финансы и статистика, 2011 – 330 с.
23 Карпова, Т.П. Управленческий учет: Учебник для вузов. - М.:
Аудит, ЮНИТИ, 2014. - 237с
24 Когаловский, М. Р. Технология баз данных на персональных ЭВМ.
[Текст] / М. Р. Когаловский. - М.:Финансы и статистика, 2013 г.- 123 с."
25 Кукукина, И. Г. Автоматизация управленческого учета на предприятиях. [Текст] / М.: Омега-Л, 2013 – 240 с.
26 Муромцев, В. В. Проектирование информационных систем:
Учебное пособие для студентов вузов заочной формы обучения по спец. 010502
"Прикладная информатика в экономике". [Текст] / В. В. Муромцев – г.
Белгород:БелГУ,2007.-160 с.
27 Нигматулин, Г. Т. Программный комплекс «Сводная отчетность»
[Электронный ресурс] / Г.Т. Нигматулин - НПО Компьютер: Информационные системы. – Режим доступа: http://www.npo-comp.ru/1517366.aspx.
28 Норенков, И. П. Автоматизированные информационные системы:
Учебное пособие . [Текст] / И. П. Норенков. - М.: МГТУ им. Баумана, 2013. -
342 c.
29 Олейников,
А.
Е.
Автоматизированные информационные технологии. [Текст] / А. Е. Олейников. - М.: Феникс, 2012 – 420 с.
30 Осипов, В. И. Проблемы автоматизации управленческого учета.
[Текст] / В. И. Осипов – М.: Феникс, 2012-76 с.
31 Палий,
В. Ф. Управленческий учет - новое прочтение внутрихозяйственного расчета. Бухгалтерский учет. [Текст] / В. Ф. Палий, В. В.
Палий – М.: Феникс, 2013 – 62 с.
74 32 Радченко, М. Г. 1С: Предприятие 8.0. Практическое пособие разработчика. Примеры и типовые приемы. [Текст] / М. Г. Радченко. – М.: ООО
«1С-Паблишинг», 2004.– 656 с.
33 Рубичев, Н. А. Измерительные информационные системы: Учебное пособие [Текст] / Н. А. Рубичев. - М.: Дрофа, 2013. - 334 c
34 Уткин, В. Б. Информационные системы в экономике: Учебник для студентов высших учебных заведений [Текст] / В. Б. Уткин, К. В. Балдин. - М.:
ИЦ Академия, 2012. - 288 c
35 Фаулер, М. Архитектура корпоративных программных приложений
[Текст] / М. Фаулер. – М.: Издательский дом «Вильямс», 2014. – 544 с.
36 Федорова, Г. Н. Информационные системы: Учебник для студ. учреждений сред. проф. образования [Текст] / Г. Н. Федорова. - М.: ИЦ
Академия, 2013. - 208 c.
37 Ходарев, А. С. Автоматизация управленческого учета. [Текст] / А.
С. Ходарев . - М.: ЗАО "Финстатинформ", 2012. - 533с
38 Якобсон, А. Унифицированный процесс разработки программного обеспечения [Текст] / А. Якобсон, Г. Буч, Дж. Рамбо. - СПб.: Питер, 2012. - 496 с.
39 Ясенев, В. Н. Информационные системы и технологии в экономике.: Учебное пособие для студентов вузов [Текст] / В. Н. Ясенев. - М.:
ЮНИТИ-ДАНА, 2012. - 560 c."
75
ПРИЛОЖЕНИЯ
76
Приложение А
Программный код общего модуля РаботаСДокументами
Начало листинга 1
Процедура РассчитатьСуммму (СтрокаТабличнойЧасти) Экспорт
СтрокаТабличнойЧасти.Сумма=СтрокаТабличнойЧасти.Количество* СтрокаТабличнойЧасти.Цена;
КонецПроцедуры
Конец листинга 1
Программный код общего модуля РаботаСоСправочниками
Начало листинга 2
Функция РозничнаяЦена (АктуальнаяДата, ЭлементНоменклатуры) Экспорт
//Создать вспомогательный объект «Отбор»,
Отбор=Новый Структура («Номенклатура», ЭлементНоменклатуры);
//Получить актуальные значения ресурсов регистра.
ЗначенияРесурсов=РегистрыСведений.Цены.ПолучитьПоследнее (АктуальнаяДата, Отбор);
Возврат ЗначениеРесурсов.Цена;
КонецФункции
Конец листинга 2
Программный код процедур для настройки видимости объектов на
экранной форме справочника «Клиенты»
Начало листинга 3
&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
ЭтаФорма.Элементы.КПП.Видимость = Ложь;
ЭтаФорма.Элементы.КонтактноеЛицо.Видимость = Ложь;
ЭтаФорма.Элементы.ИНН.Видимость = Ложь;
ЭтаФорма.Элементы.ФИО.Видимость = Ложь;
ЭтаФорма.Элементы.ПолноеНаименование.Видимость = Ложь;
ЭтаФорма.Элементы.ПаспортныеДанные.Видимость = Ложь;
ЭтаФорма.Элементы.РассчетныйСчет.Видимость = Ложь;
ЭтаФорма.Элементы.Банк.Видимость = Ложь;
ЭтаФорма.Элементы.БИК.Видимость = Ложь;
ЭтаФорма.Элементы.Статус.Видимость = Истина;
ЭтаФорма.Элементы.Скидка.Видимость = Истина;
Если Объект.Статус = ПредопределенноеЗначение("Перечисление.СтатусКлиента.Новичок")
Тогда
Объект.Скидка = ПредопределенноеЗначение("Перечисление.Скидки.Нет");
КонецЕсли;
Если Объект.Статус = ПредопределенноеЗначение("Перечисление.СтатусКлиента.Постоянный")
Тогда
Объект.Скидка = ПредопределенноеЗначение("Перечисление.Скидки.Пять");
КонецЕсли;
Если Объект.Статус = ПредопределенноеЗначение("Перечисление.СтатусКлиента.VIP")
Тогда
Объект.Скидка = ПредопределенноеЗначение("Перечисление.Скидки.Десять");
КонецЕсли;
КонецПроцедуры
&НаКлиенте
77
Процедура ЮридическоеФизическоеЛицоПриИзменении(Элемент)
Если Объект.ЮрФизЛицо = ПредопределенноеЗначение("Перечисление.ВидКлиента.ФизЛицо")
Тогда
ЭтаФорма.Элементы.КПП.Видимость = Ложь;
ЭтаФорма.Элементы.КонтактноеЛицо.Видимость = Ложь;
ЭтаФорма.Элементы.ИНН.Видимость = Ложь;
ЭтаФорма.Элементы.ФИО.Видимость = Истина;
ЭтаФорма.Элементы.ПолноеНаименование.Видимость = Ложь;
ЭтаФорма.Элементы.ПаспортныеДанные.Видимость = Истина;
ЭтаФорма.Элементы.РассчетныйСчет.Видимость = Ложь;
ЭтаФорма.Элементы.Банк.Видимость = Ложь;
ЭтаФорма.Элементы.БИК.Видимость = Ложь;
КонецЕсли;
Если Объект.ЮрФизЛицо = ПредопределенноеЗначение("Перечисление.ВидКлиента.ЮрЛицо")
Тогда
ЭтаФорма.Элементы.КПП.Видимость = Истина;
ЭтаФорма.Элементы.КонтактноеЛицо.Видимость = Истина;
ЭтаФорма.Элементы.ИНН.Видимость = Истина;
ЭтаФорма.Элементы.ФИО.Видимость = Ложь;
ЭтаФорма.Элементы.ПолноеНаименование.Видимость = Истина;
ЭтаФорма.Элементы.ПаспортныеДанные.Видимость = Ложь;
ЭтаФорма.Элементы.Договор.Видимость = Истина;
ЭтаФорма.Элементы.РассчетныйСчет.Видимость = Истина;
ЭтаФорма.Элементы.Банк.Видимость = Истина;
ЭтаФорма.Элементы.БИК.Видимость = Истина;
КонецЕсли;
КонецПроцедуры
&НаКлиенте
Процедура СтатусПриИзменении(Элемент)
Если Объект.Статус = ПредопределенноеЗначение("Перечисление.СтатусКлиента.Новичок")
Тогда
Объект.Скидка = ПредопределенноеЗначение("Перечисление.Скидки.Нет");
КонецЕсли;
Если Объект.Статус = ПредопределенноеЗначение("Перечисление.СтатусКлиента.Постоянный")
Тогда
Объект.Скидка = ПредопределенноеЗначение("Перечисление.Скидки.Пять");
КонецЕсли;
Если Объект.Статус = ПредопределенноеЗначение("Перечисление.СтатусКлиента.VIP")
Тогда
Объект.Скидка = ПредопределенноеЗначение("Перечисление.Скидки.Десять");
КонецЕсли;
КонецПроцедуры
&НаКлиенте
Процедура ПриОткрытии(Отказ)
Если Объект.ЮрФизЛицо = ПредопределенноеЗначение("Перечисление.ВидКлиента.ФизЛицо")
Тогда
ЭтаФорма.Элементы.КПП.Видимость = Ложь;
ЭтаФорма.Элементы.КонтактноеЛицо.Видимость = Ложь;
ЭтаФорма.Элементы.ИНН.Видимость = Ложь;
ЭтаФорма.Элементы.ФИО.Видимость = Истина;
ЭтаФорма.Элементы.ПолноеНаименование.Видимость = Ложь;
ЭтаФорма.Элементы.ПаспортныеДанные.Видимость = Истина;
ЭтаФорма.Элементы.РассчетныйСчет.Видимость = Ложь;
ЭтаФорма.Элементы.Банк.Видимость = Ложь;
ЭтаФорма.Элементы.БИК.Видимость = Ложь;
КонецЕсли;
Если Объект.ЮрФизЛицо = ПредопределенноеЗначение("Перечисление.ВидКлиента.ЮрЛицо")
Тогда
ЭтаФорма.Элементы.КПП.Видимость = Истина;
78
ЭтаФорма.Элементы.КонтактноеЛицо.Видимость = Истина;
ЭтаФорма.Элементы.ИНН.Видимость = Истина;
ЭтаФорма.Элементы.ФИО.Видимость = Ложь;
ЭтаФорма.Элементы.ПолноеНаименование.Видимость = Истина;
ЭтаФорма.Элементы.ПаспортныеДанные.Видимость = Ложь;
ЭтаФорма.Элементы.РассчетныйСчет.Видимость = Истина;
ЭтаФорма.Элементы.Банк.Видимость = Истина;
ЭтаФорма.Элементы.БИК.Видимость = Истина;
КонецЕсли;
Если Объект.Статус = ПредопределенноеЗначение("Перечисление.СтатусКлиента.Новичок")
Тогда
Объект.Скидка = ПредопределенноеЗначение("Перечисление.Скидки.Нет");
КонецЕсли;
Если Объект.Статус = ПредопределенноеЗначение("Перечисление.СтатусКлиента.Постоянный")
Тогда
Объект.Скидка = ПредопределенноеЗначение("Перечисление.Скидки.Пять");
КонецЕсли;
Если Объект.Статус = ПредопределенноеЗначение("Перечисление.СтатусКлиента.VIP")
Тогда
Объект.Скидка = ПредопределенноеЗначение("Перечисление.Скидки.Десять");
КонецЕсли;
КонецПроцедуры
Конец листинга 3
Программный код процедур по добавлению, установки и
отображению картинки в справочнике «Номенклатура»
Начало листинга 4
&НаКлиенте
Процедура ДобавитьКартинку(Команда)
ИмяФайла = "";
ПутьФайла = "";
//Вызываем Диалоговое окно и помещаем файл Картинки из локальной файловой системы во временное хранилище
Если ПоместитьФайл(ПутьФайла, , ИмяФайла, Истина) = Истина Тогда
//в строковый реквизит ФОТО нашей формы сохраняем ссылку на Картинку во временном хранилище
Фото = ПутьФайла;
//для создания нового элемента в Справочнике Файлы и записи Картинки в его реквизит Файл
//переходим на сервер с помощью вызова серверной процедуры
УстановитьКартинку();
КонецЕсли;
//условие ЕСЛИ нужно для того, чтобы если пользователь отказался от выбора файла
//мы не вызывали серверную процедуру УстановитьКартинку()
КонецПроцедуры
&НаСервере
Процедура УстановитьКартинку()
//создаем новый элемент в Справочнике Файлы
НовыйФайлКартинки = Справочники.Файлы.СоздатьЭлемент();
//в реквизит СправочникаФайлы Файл помещаем выбранную ранее Картинку
НовыйФайлКартинки.Файл = Новый ХранилищеЗначения(ПолучитьИзВременногоХранилища(Фото));
Фото = ПоместитьВоВременноеХранилище(НовыйФайлКартинки.Файл.Получить());
//записываем новый элемент справочника Файлы
НовыйФайлКартинки.Записать();
//устанавливаем значение реквизита Картинка Справочника Номенклатур
Объект.Картинка = НовыйФайлКартинки.Ссылка;
КонецПроцедуры
В процессе выполнения выпускной квалификационной работы были выполнены следующие задачи: проведен анализ предметной области; проведен анализ существующего состояния; создана модель «Как есть»; изучена литература об аналогичных информационных системах; обоснована актуальность и значимость предмета проектирования; проведен анализ стратегии автоматизации; создана модель «Как должно быть»; спроектирована информационная система учета и сопровождения заказов; разработана конфигурация для учета и сопровождения заказов; разработанная конфигурация внедрена в эксплуатацию; выявлена целесообразность разработки информационной системы с экономической точки зрения; проведен анализ экономической эффективности внедрения разработанной информационной системы.
В рамках выпускной квалификационной работы для автоматизации отдела сбыта ООО «Гранит» была разработана конфигурация для учета и сопровождения заказов, организующая динамическое обновление информации, а также удобный ввод и хранение информации в виде, позволяющем анализировать деятельность отдела сбыта за любой промежуток времени.
Разработанная конфигурация позволяет сотрудникам:
− эффективно использовать время при организации рабочего процесса;
− удобно работать с данными по заказам;
− удобно вести клиентскую базу;
70
− своевременно получать актуальную информацию по декоративному камню, материалам и оказываемым услугам, не тратя это дополнительное время на поиск необходимой информации в разных отделах;
− производить сортировку и группировку данных по различным параметрам.
Результатом выпускной квалификационной работы является разработанная информационная система, охватывающая основные бизнес- процессы отдела сбыта ООО «Гранит», которая внедрена и успешно используется в организации. Акт о внедрении представлен в Приложении Б.
В качестве перспективы развития этой системы можно предложить дальнейшее расширение ее функциональных возможностей и постепенный охват остальных процессов.
71
СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ
1
ГОСТ 7.9 – 77. Реферат и аннотация. – Москва: Изд-во стандартов,
1981. – 6 с.
2
ГОСТ 2.105 – 95. Общие требования к текстовым документам. –
Москва: Изд-во стандартов, 1981. – 32 с.
3
ГОСТ 7.32 – 2001. Система стандартов по информации, библиотечному и издательскому делу. – Москва: Изд-во стандартов, 1981. – 24 с.
4
ГОСТ 7.82-2001 Библиографическая запись. Библиографическое описание электронных ресурсов. – Москва: Изд-во стандартов, 1981. – 6 с.
5
Александров, Д. В. Инструментальные средства информационного менеджмента. CASE-технологии и распределенные информационные системы:
Учебное пособие [Текст] / Д. В. Александров. - М.: ФиС, 2011. - 224 c.
6
Балдин, К. В. Информационные системы в экономике: Учебное пособие [Текст] / К. В. Балдин. - М.: НИЦ ИНФРА-М, 2013. - 218 c
7
Бочаров, Е. П. Интегрированные корпоративные информационные системы [Текст] / Е. П. Бочаров, А. И. Колдина. - М.: Финансы и статистика,
2010, стр350.
8
Бубарева, О. А. К вопросу проектирования автоматизированной системы управления учебным процессом вуза [Электронный ресурс] / О. А.
Бубарева.– Электрон. текстовые дан. – Москва: [б.и.], 2000. – Режим доступа: http://tm.ifmo.ru/tm2010/src/265e.pdf
9
Валебникова, Н. В. Современные тенденции управленческого учета.
Бухгалтерский учет [Текст] / Н. В. Валебникова, И. П. Василевич.- М.: Форум,
2014. - 224 c.
10 Васильков, А. В. Информационные системы и их безопасность:
Учебное пособие [Текст] / А. В. Васильков, А. А. Васильков, И. А. Васильков. -
М.: Форум, 2013. - 528 c.
72 11 Вендров, А. М. Проектирование программного обеспечения экономических информационных систем:
Учебник для студентов экономических вузов, обучающихся по спец. "Прикладная информатика (по областям)" и "Прикладная математика и информатика" [Текст] / А. М. Вендров.
- М.: Финансы и статистика, 2014.- 544 с.
12 Голицына, О.Л. Базы данных. Учебное пособие [Текст] / О. Л.
Голицына, Н. В. Максимов, И. И. Попов. – М.: Форму-Инфра-М, 2010. – 430 с.
13 Грекул, В. И. Проектирование информационных систем [Текст] / В.
И. Грекул, Г. Н. Денищенко, Н. Л. Коровкина. - М.: Интернет-университет информационных технологий, 2008. – 420 с.
14 Гришин, А. В. Промышленные информационные системы и сети: практическое руководство [Текст] / А. В. Гришин. - М.: Радио и связь, 2012. -
176 c
15 Гусятников, В.Н. Стандартизация и разработка программных систем [Текст] / В. Н. Гусятников, А. И. Безруков. – М.: Финансы и статистика,
2012. – 288с.
16 Дубейковский, В. И. Практика функционального моделирования с
AllFusion Process Modeler 4.1. (BPwin) Где? Зачем? Как? [Текст] / В. И.
Дубейковский. – М. : ДИАЛОГ-МИФИ, 2014. – 464 с
17 Душин, В. К.Теоретические основы информационных процессов и систем [Текст] / В. К. Душин – М.: Дашков и К, 2008. -350 с.
18 Емельянова, Н. З. Основы построения автоматизированных информационных систем. Учебное пособие [Текст] / Н. З. Емельянова, Т. Л.
Партыка, И. И. Попов. – М.: Academia, 2010 – 220 с.
19 Ивашкевич, В. Б. Управленческий учет в информационной системе предприятия [Текст] / Н. З. Емельянова. - . – М. : ДИАЛОГ-МИФИ, 2013. – 102 с.
20 Исаев, Г. Н. Информационные системы в экономике. [Текст] / Г. Н.
Исаев – М.: Омега-Л, 2008 - .430 с.
73 21 Йордан, Э. Объектно-ориентированный анализ и проектирование систем [Текст] / Э. Йордан, С. Аргила. - М.: ЛОРИ, 2012. - 264 с."
22 Карминский, A.M., Черников Б.В. Информационные системы в экономике. Методология создания. [Текст] / А. М. Карминский, Б. В. Черников.
– М.: Финансы и статистика, 2011 – 330 с.
23 Карпова, Т.П. Управленческий учет: Учебник для вузов. - М.:
Аудит, ЮНИТИ, 2014. - 237с
24 Когаловский, М. Р. Технология баз данных на персональных ЭВМ.
[Текст] / М. Р. Когаловский. - М.:Финансы и статистика, 2013 г.- 123 с."
25 Кукукина, И. Г. Автоматизация управленческого учета на предприятиях. [Текст] / М.: Омега-Л, 2013 – 240 с.
26 Муромцев, В. В. Проектирование информационных систем:
Учебное пособие для студентов вузов заочной формы обучения по спец. 010502
"Прикладная информатика в экономике". [Текст] / В. В. Муромцев – г.
Белгород:БелГУ,2007.-160 с.
27 Нигматулин, Г. Т. Программный комплекс «Сводная отчетность»
[Электронный ресурс] / Г.Т. Нигматулин - НПО Компьютер: Информационные системы. – Режим доступа: http://www.npo-comp.ru/1517366.aspx.
28 Норенков, И. П. Автоматизированные информационные системы:
Учебное пособие . [Текст] / И. П. Норенков. - М.: МГТУ им. Баумана, 2013. -
342 c.
29 Олейников,
А.
Е.
Автоматизированные информационные технологии. [Текст] / А. Е. Олейников. - М.: Феникс, 2012 – 420 с.
30 Осипов, В. И. Проблемы автоматизации управленческого учета.
[Текст] / В. И. Осипов – М.: Феникс, 2012-76 с.
31 Палий,
В. Ф. Управленческий учет - новое прочтение внутрихозяйственного расчета. Бухгалтерский учет. [Текст] / В. Ф. Палий, В. В.
Палий – М.: Феникс, 2013 – 62 с.
74 32 Радченко, М. Г. 1С: Предприятие 8.0. Практическое пособие разработчика. Примеры и типовые приемы. [Текст] / М. Г. Радченко. – М.: ООО
«1С-Паблишинг», 2004.– 656 с.
33 Рубичев, Н. А. Измерительные информационные системы: Учебное пособие [Текст] / Н. А. Рубичев. - М.: Дрофа, 2013. - 334 c
34 Уткин, В. Б. Информационные системы в экономике: Учебник для студентов высших учебных заведений [Текст] / В. Б. Уткин, К. В. Балдин. - М.:
ИЦ Академия, 2012. - 288 c
35 Фаулер, М. Архитектура корпоративных программных приложений
[Текст] / М. Фаулер. – М.: Издательский дом «Вильямс», 2014. – 544 с.
36 Федорова, Г. Н. Информационные системы: Учебник для студ. учреждений сред. проф. образования [Текст] / Г. Н. Федорова. - М.: ИЦ
Академия, 2013. - 208 c.
37 Ходарев, А. С. Автоматизация управленческого учета. [Текст] / А.
С. Ходарев . - М.: ЗАО "Финстатинформ", 2012. - 533с
38 Якобсон, А. Унифицированный процесс разработки программного обеспечения [Текст] / А. Якобсон, Г. Буч, Дж. Рамбо. - СПб.: Питер, 2012. - 496 с.
39 Ясенев, В. Н. Информационные системы и технологии в экономике.: Учебное пособие для студентов вузов [Текст] / В. Н. Ясенев. - М.:
ЮНИТИ-ДАНА, 2012. - 560 c."
75
ПРИЛОЖЕНИЯ
76
Приложение А
Программный код общего модуля РаботаСДокументами
Начало листинга 1
Процедура РассчитатьСуммму (СтрокаТабличнойЧасти) Экспорт
СтрокаТабличнойЧасти.Сумма=СтрокаТабличнойЧасти.Количество* СтрокаТабличнойЧасти.Цена;
КонецПроцедуры
Конец листинга 1
Программный код общего модуля РаботаСоСправочниками
Начало листинга 2
Функция РозничнаяЦена (АктуальнаяДата, ЭлементНоменклатуры) Экспорт
//Создать вспомогательный объект «Отбор»,
Отбор=Новый Структура («Номенклатура», ЭлементНоменклатуры);
//Получить актуальные значения ресурсов регистра.
ЗначенияРесурсов=РегистрыСведений.Цены.ПолучитьПоследнее (АктуальнаяДата, Отбор);
Возврат ЗначениеРесурсов.Цена;
КонецФункции
Конец листинга 2
Программный код процедур для настройки видимости объектов на
экранной форме справочника «Клиенты»
Начало листинга 3
&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
ЭтаФорма.Элементы.КПП.Видимость = Ложь;
ЭтаФорма.Элементы.КонтактноеЛицо.Видимость = Ложь;
ЭтаФорма.Элементы.ИНН.Видимость = Ложь;
ЭтаФорма.Элементы.ФИО.Видимость = Ложь;
ЭтаФорма.Элементы.ПолноеНаименование.Видимость = Ложь;
ЭтаФорма.Элементы.ПаспортныеДанные.Видимость = Ложь;
ЭтаФорма.Элементы.РассчетныйСчет.Видимость = Ложь;
ЭтаФорма.Элементы.Банк.Видимость = Ложь;
ЭтаФорма.Элементы.БИК.Видимость = Ложь;
ЭтаФорма.Элементы.Статус.Видимость = Истина;
ЭтаФорма.Элементы.Скидка.Видимость = Истина;
Если Объект.Статус = ПредопределенноеЗначение("Перечисление.СтатусКлиента.Новичок")
Тогда
Объект.Скидка = ПредопределенноеЗначение("Перечисление.Скидки.Нет");
КонецЕсли;
Если Объект.Статус = ПредопределенноеЗначение("Перечисление.СтатусКлиента.Постоянный")
Тогда
Объект.Скидка = ПредопределенноеЗначение("Перечисление.Скидки.Пять");
КонецЕсли;
Если Объект.Статус = ПредопределенноеЗначение("Перечисление.СтатусКлиента.VIP")
Тогда
Объект.Скидка = ПредопределенноеЗначение("Перечисление.Скидки.Десять");
КонецЕсли;
КонецПроцедуры
&НаКлиенте
77
Процедура ЮридическоеФизическоеЛицоПриИзменении(Элемент)
Если Объект.ЮрФизЛицо = ПредопределенноеЗначение("Перечисление.ВидКлиента.ФизЛицо")
Тогда
ЭтаФорма.Элементы.КПП.Видимость = Ложь;
ЭтаФорма.Элементы.КонтактноеЛицо.Видимость = Ложь;
ЭтаФорма.Элементы.ИНН.Видимость = Ложь;
ЭтаФорма.Элементы.ФИО.Видимость = Истина;
ЭтаФорма.Элементы.ПолноеНаименование.Видимость = Ложь;
ЭтаФорма.Элементы.ПаспортныеДанные.Видимость = Истина;
ЭтаФорма.Элементы.РассчетныйСчет.Видимость = Ложь;
ЭтаФорма.Элементы.Банк.Видимость = Ложь;
ЭтаФорма.Элементы.БИК.Видимость = Ложь;
КонецЕсли;
Если Объект.ЮрФизЛицо = ПредопределенноеЗначение("Перечисление.ВидКлиента.ЮрЛицо")
Тогда
ЭтаФорма.Элементы.КПП.Видимость = Истина;
ЭтаФорма.Элементы.КонтактноеЛицо.Видимость = Истина;
ЭтаФорма.Элементы.ИНН.Видимость = Истина;
ЭтаФорма.Элементы.ФИО.Видимость = Ложь;
ЭтаФорма.Элементы.ПолноеНаименование.Видимость = Истина;
ЭтаФорма.Элементы.ПаспортныеДанные.Видимость = Ложь;
ЭтаФорма.Элементы.Договор.Видимость = Истина;
ЭтаФорма.Элементы.РассчетныйСчет.Видимость = Истина;
ЭтаФорма.Элементы.Банк.Видимость = Истина;
ЭтаФорма.Элементы.БИК.Видимость = Истина;
КонецЕсли;
КонецПроцедуры
&НаКлиенте
Процедура СтатусПриИзменении(Элемент)
Если Объект.Статус = ПредопределенноеЗначение("Перечисление.СтатусКлиента.Новичок")
Тогда
Объект.Скидка = ПредопределенноеЗначение("Перечисление.Скидки.Нет");
КонецЕсли;
Если Объект.Статус = ПредопределенноеЗначение("Перечисление.СтатусКлиента.Постоянный")
Тогда
Объект.Скидка = ПредопределенноеЗначение("Перечисление.Скидки.Пять");
КонецЕсли;
Если Объект.Статус = ПредопределенноеЗначение("Перечисление.СтатусКлиента.VIP")
Тогда
Объект.Скидка = ПредопределенноеЗначение("Перечисление.Скидки.Десять");
КонецЕсли;
КонецПроцедуры
&НаКлиенте
Процедура ПриОткрытии(Отказ)
Если Объект.ЮрФизЛицо = ПредопределенноеЗначение("Перечисление.ВидКлиента.ФизЛицо")
Тогда
ЭтаФорма.Элементы.КПП.Видимость = Ложь;
ЭтаФорма.Элементы.КонтактноеЛицо.Видимость = Ложь;
ЭтаФорма.Элементы.ИНН.Видимость = Ложь;
ЭтаФорма.Элементы.ФИО.Видимость = Истина;
ЭтаФорма.Элементы.ПолноеНаименование.Видимость = Ложь;
ЭтаФорма.Элементы.ПаспортныеДанные.Видимость = Истина;
ЭтаФорма.Элементы.РассчетныйСчет.Видимость = Ложь;
ЭтаФорма.Элементы.Банк.Видимость = Ложь;
ЭтаФорма.Элементы.БИК.Видимость = Ложь;
КонецЕсли;
Если Объект.ЮрФизЛицо = ПредопределенноеЗначение("Перечисление.ВидКлиента.ЮрЛицо")
Тогда
ЭтаФорма.Элементы.КПП.Видимость = Истина;
78
ЭтаФорма.Элементы.КонтактноеЛицо.Видимость = Истина;
ЭтаФорма.Элементы.ИНН.Видимость = Истина;
ЭтаФорма.Элементы.ФИО.Видимость = Ложь;
ЭтаФорма.Элементы.ПолноеНаименование.Видимость = Истина;
ЭтаФорма.Элементы.ПаспортныеДанные.Видимость = Ложь;
ЭтаФорма.Элементы.РассчетныйСчет.Видимость = Истина;
ЭтаФорма.Элементы.Банк.Видимость = Истина;
ЭтаФорма.Элементы.БИК.Видимость = Истина;
КонецЕсли;
Если Объект.Статус = ПредопределенноеЗначение("Перечисление.СтатусКлиента.Новичок")
Тогда
Объект.Скидка = ПредопределенноеЗначение("Перечисление.Скидки.Нет");
КонецЕсли;
Если Объект.Статус = ПредопределенноеЗначение("Перечисление.СтатусКлиента.Постоянный")
Тогда
Объект.Скидка = ПредопределенноеЗначение("Перечисление.Скидки.Пять");
КонецЕсли;
Если Объект.Статус = ПредопределенноеЗначение("Перечисление.СтатусКлиента.VIP")
Тогда
Объект.Скидка = ПредопределенноеЗначение("Перечисление.Скидки.Десять");
КонецЕсли;
КонецПроцедуры
Конец листинга 3
Программный код процедур по добавлению, установки и
отображению картинки в справочнике «Номенклатура»
Начало листинга 4
&НаКлиенте
Процедура ДобавитьКартинку(Команда)
ИмяФайла = "";
ПутьФайла = "";
//Вызываем Диалоговое окно и помещаем файл Картинки из локальной файловой системы во временное хранилище
Если ПоместитьФайл(ПутьФайла, , ИмяФайла, Истина) = Истина Тогда
//в строковый реквизит ФОТО нашей формы сохраняем ссылку на Картинку во временном хранилище
Фото = ПутьФайла;
//для создания нового элемента в Справочнике Файлы и записи Картинки в его реквизит Файл
//переходим на сервер с помощью вызова серверной процедуры
УстановитьКартинку();
КонецЕсли;
//условие ЕСЛИ нужно для того, чтобы если пользователь отказался от выбора файла
//мы не вызывали серверную процедуру УстановитьКартинку()
КонецПроцедуры
&НаСервере
Процедура УстановитьКартинку()
//создаем новый элемент в Справочнике Файлы
НовыйФайлКартинки = Справочники.Файлы.СоздатьЭлемент();
//в реквизит СправочникаФайлы Файл помещаем выбранную ранее Картинку
НовыйФайлКартинки.Файл = Новый ХранилищеЗначения(ПолучитьИзВременногоХранилища(Фото));
Фото = ПоместитьВоВременноеХранилище(НовыйФайлКартинки.Файл.Получить());
//записываем новый элемент справочника Файлы
НовыйФайлКартинки.Записать();
//устанавливаем значение реквизита Картинка Справочника Номенклатур
Объект.Картинка = НовыйФайлКартинки.Ссылка;
КонецПроцедуры