77
существующих решений по автоматизации малых модулей, в рамках
небольших предприятий. Также важной значимостью обладает получение
опыта в разработке и обосновании проектных решений для будущих
специалистов.
78
СПИСОК ЛИТЕРАТУРЫ
1. Модели жизненного цикла: учеб. пособие / Д. Б. Берг, Е. А.
Ульянова, П. В. Добряк. — Екатеринбург: Изд-во Урал. ун-та, 2014. — 74, [2] с.
2. Герасимчук, В. А. Автоматизация процессов предприятия / В. А.
Герасимчук. — Текст: непосредственный // Молодой ученый. — 2016. — № 11
(115). — С. 65 4-657.
3. ISO/IEC 12207:2008 System and software engineering — Software life
cycle processes (IDT) ИСО/МЭК 12207 — 2008
«Системнаяипрограммнаяинженерия. Процессы жизненного цикла
программных средств»
4. К 88 Кумагина, Е.А., Неймарк, Е.А. Модели жизненного цикла и
технологии проектирования программного обеспечения: учебно-методическое
пособие / Е.А. Кумагина, Е.А. Неймарк. – Нижний Новгород: Изд-во ННГУ,
2016. – 41 с.
5. Экономическая эффективность технических решений: учебное
пособие / С.Г. Баранчикова [и др.]; под общ. ред. проф. И. В. Ершовой.
Екатеринбург : Изд-во Урал. ун-та, 2016.— 140 с.
6. 240 стр., сил.; ISBN 5-8459-0239-8, 0-201-70710-
1; формат 70x100/16; 2002, 1 кв.; Вильямс. Введениев Rational Unified Process.
2-еиздание
7. Федеральный закон от 27.07.2006 N 149-ФЗ (ред. от03.04.2020 N
105-ФЗ)
8. ГОСТ Р 50922-2006,Федеральное агентство по техническому
регулированию и метрологии
9. Статья 139 УК РФ. Нарушение неприкосновенности жилища
10. Информационное обеспечение управленческой деятельности:
учебное пособие / Н.В. Костылева, Ю.А. Мальцева, Д.В. Шкурин. Екатеринбург
: Изд-во Урал. ун-та, 2016. — 148 с.
11. Исаев Г.Н. Информационные системы в экономике: учебник для
79
студентов вузов, обучающихся по специальностям "Финансы и кредит",
"Бухгалт. учет, анализ и аудит" / Г.Н. Исаев. - 2-е изд., стер. - М.: Издательство
"Омега-Л", 2009
12. Перл И. А., Калёнова О. В. Введение в методологию программной
инженерии: Учебное пособие. – СПб.: Университет ИТМО, 2019. – 53 с.
13. Технологии защиты информации в компьютерных сетях / Н.А.
Руденков, А.В. Пролетарский, Е.В. Смирнова, А.М. Суровов. - 2-е изд., испр. -
Москва, 2016. - 369 с.
14. Рыжко А.Л., Лобанова Н.М., Экономика информационных систем:
учебное пособие – Москва: Финансовый университет, 2016. – 204с.
15. Нестеров, С. А. Базы данных: учебник и практикум для вузов / С.
А. Нестеров. — Москва: Издательство Юрайт, 2020. — 230 с.
16. Официальный сайт 1С Предприятие 8.3https://1c.ru/
17. Зараменских, Е. П. Информационные системы: управление
жизненным циклом: учебник и практикум для среднего профессионального
образования / Е. П. Зараменских. — Москва: Издательство Юрайт, 2020. — 431
с. — (Профессиональное образование).
18. ГОСТ 34.601-90 Информационная технология (ИТ). Комплекс
стандартов на автоматизированные системы. Автоматизированные системы.
Стадии создания
80
Приложение 1
Документы
Работа
Модуль объекта
Процедура ОбработкаПроведения(Отказ, Режим)
//{{__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную
изменения будут утеряны!!!
// регистр Работы
Движения.Работы.Записывать = Истина;
Для Каждого ТекСтрокаОбслуживание Из Обслуживание Цикл
Движение = Движения.Работы.Добавить();
Движение.Период = Дата;
Движение.Инженер = Инженер;
Движение.Клиент = Клиент;
Движение.Работа = ТекСтрокаОбслуживание.Работа;
Движение.ВидРабот = ТекСтрокаОбслуживание.ВидРабот;
Движение.Техника = Техника;
КонецЦикла;
//}}__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ
КонецПроцедуры
Процедура ОбработкаЗаполнения(ДанныеЗаполнения,
СтандартнаяОбработка)
//{{__КОНСТРУКТОР_ВВОД_НА_ОСНОВАНИИ
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную
изменения будут утеряны!!!
Если ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.Экспертиза")
Тогда
// Заполнение шапки
81
ДатаОбращения = ДанныеЗаполнения.ДатаОбращения;
Инженер = ДанныеЗаполнения.Инженер;
Клиент = ДанныеЗаполнения.Клиент;
Экспертиза = ДанныеЗаполнения.Ссылка;
Техника = ДанныеЗаполнения.Техника;
КонецЕсли;
//}}__КОНСТРУКТОР_ВВОД_НА_ОСНОВАНИИ
КонецПроцедуры
Модуль менеджера
Процедура Печать(ТабДок, Ссылка) Экспорт
//{{_КОНСТРУКТОР_ПЕЧАТИ(Печать)
Макет = Документы.Работа.ПолучитьМакет("Печать");
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| Работа.Дата,
| Работа.ДатаОбращения,
| Работа.Инженер,
| Работа.Клиент,
| Работа.Номер,
| Работа.Техника,
| Работа.Экспертиза,
| Работа.Обслуживание.(
| НомерСтроки,
| ВидРабот,
| Работа,
| СтоимостьРемонта,
| ВремяВыполнения
| )
|ИЗ
| Документ.Работа КАК Работа
|ГДЕ
| Работа.Ссылка В (&Ссылка)";
Запрос.Параметры.Вставить("Ссылка", Ссылка);
Выборка = Запрос.Выполнить().Выбрать();
82
ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
Шапка = Макет.ПолучитьОбласть("Шапка");
ОбластьОбслуживаниеШапка =
Макет.ПолучитьОбласть("ОбслуживаниеШапка");
ОбластьОбслуживание = Макет.ПолучитьОбласть("Обслуживание");
ТабДок.Очистить();
ВставлятьРазделительСтраниц = Ложь;
Пока Выборка.Следующий() Цикл
Если ВставлятьРазделительСтраниц Тогда
ТабДок.ВывестиГоризонтальныйРазделительСтраниц();
КонецЕсли;
ТабДок.Вывести(ОбластьЗаголовок);
Шапка.Параметры.Заполнить(Выборка);
ТабДок.Вывести(Шапка, Выборка.Уровень());
ТабДок.Вывести(ОбластьОбслуживаниеШапка);
ВыборкаОбслуживание = Выборка.Обслуживание.Выбрать();
Пока ВыборкаОбслуживание.Следующий() Цикл
ОбластьОбслуживание.Параметры.Заполнить(ВыборкаОбслуживание);
ТабДок.Вывести(ОбластьОбслуживание,
ВыборкаОбслуживание.Уровень());
КонецЦикла;
ВставлятьРазделительСтраниц = Истина;
КонецЦикла;
//}}
КонецПроцедуры
83
Заявка
Модуль менеджера
Процедура Печать(ТабДок, Ссылка) Экспорт
//{{_КОНСТРУКТОР_ПЕЧАТИ(Печать)
Макет = Документы.Заявка.ПолучитьМакет("Печать");
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| Заявка.Дата,
| Заявка.ДатаОбращения,
| Заявка.Инженер,
| Заявка.Клиент,
| Заявка.Номер,
| Заявка.Техника
|ИЗ
| Документ.Заявка КАК Заявка
|ГДЕ
| Заявка.Ссылка В (&Ссылка)";
Запрос.Параметры.Вставить("Ссылка", Ссылка);
Выборка = Запрос.Выполнить().Выбрать();
ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
Шапка = Макет.ПолучитьОбласть("Шапка");
ТабДок.Очистить();
ВставлятьРазделительСтраниц = Ложь;
Пока Выборка.Следующий() Цикл
Если ВставлятьРазделительСтраниц Тогда
ТабДок.ВывестиГоризонтальныйРазделительСтраниц();
КонецЕсли;
ТабДок.Вывести(ОбластьЗаголовок);
Шапка.Параметры.Заполнить(Выборка);
84
ТабДок.Вывести(Шапка, Выборка.Уровень());
ВставлятьРазделительСтраниц = Истина;
КонецЦикла;
//}}
КонецПроцедуры
Экспертиза
Модуль объекта
ПроцедураОбработкаЗаполнения(ДанныеЗаполнения,
СтандартнаяОбработка)
//{{__КОНСТРУКТОР_ВВОД_НА_ОСНОВАНИИ
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную
изменения будут утеряны!!!
Если ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.Заявка")
Тогда
// Заполнение шапки
ДатаОбращения = ДанныеЗаполнения.ДатаОбращения;
Инженер = ДанныеЗаполнения.Инженер;
Клиент = ДанныеЗаполнения.Клиент;
Техника = ДанныеЗаполнения.Техника;
КонецЕсли;
//}}__КОНСТРУКТОР_ВВОД_НА_ОСНОВАНИИ
КонецПроцедуры
Процедура ОбработкаПроведения(Отказ, Режим)
//{{__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную
изменения будут утеряны!!!
// регистр Экспертизы
Движения.Экспертизы.Записывать = Истина;
Движение = Движения.Экспертизы.Добавить();
Движение.Период = Дата;
85
Движение.Инженер = Инженер;
Движение.Клиент = Клиент;
Движение.Техника = Техника;
Движение.РасчетноеВремяРемонта = РасчетноеВремяРемонта;
//}}__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ
КонецПроцедуры
Модуль менеджера
Процедура Печать(ТабДок, Ссылка) Экспорт
//{{_КОНСТРУКТОР_ПЕЧАТИ(Печать)
Макет = Документы.Экспертиза.ПолучитьМакет("Печать");
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| Экспертиза.Дата,
| Экспертиза.ДатаОбращения,
| Экспертиза.Инженер,
| Экспертиза.Клиент,
| Экспертиза.Номер,
| Экспертиза.ОписаниеПроблемы,
| Экспертиза.РасчетноеВремяРемонта,
| Экспертиза.Техника
|ИЗ
| Документ.Экспертиза КАК Экспертиза
|ГДЕ
| Экспертиза.Ссылка В (&Ссылка)";
Запрос.Параметры.Вставить("Ссылка", Ссылка);
Выборка = Запрос.Выполнить().Выбрать();
ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
Шапка = Макет.ПолучитьОбласть("Шапка");
ТабДок.Очистить();
ВставлятьРазделительСтраниц = Ложь;
Пока Выборка.Следующий() Цикл
86
Если ВставлятьРазделительСтраниц Тогда
ТабДок.ВывестиГоризонтальныйРазделительСтраниц();
КонецЕсли;
ТабДок.Вывести(ОбластьЗаголовок);
Шапка.Параметры.Заполнить(Выборка);
ТабДок.Вывести(Шапка, Выборка.Уровень());
ВставлятьРазделительСтраниц = Истина;
КонецЦикла;
//}}
КонецПроцедуры
Отчеты
Экспертизы
ВЫБРАТЬ
Экспертиза.Клиент,
Экспертиза.Техника,
Экспертиза.Инженер,
Экспертиза.ДатаОбращения,
Экспертиза.ОписаниеПроблемы,
Экспертиза.РасчетноеВремяРемонта
ИЗ
Документ.Экспертиза КАК Экспертиза
Работы
ВЫБРАТЬ
Работа.Клиент,
Работа.Инженер,
Работа.Техника,
Работа.ДатаОбращения,
Работа.Обслуживание.(
ВидРабот,
Работа,
СтоимостьРемонта,
ВремяВыполнения
)