Файл: Проектирование реализации операций бизнес-процесса «Складской учет» ООО «ЖилРемСтрой».pdf
Добавлен: 14.06.2023
Просмотров: 353
Скачиваний: 3
СОДЕРЖАНИЕ
1.1. Выбор комплекса задач автоматизации
1.2 Характеристика существующих бизнес – процессов
1.3. Характеристика документооборота, возникающего при решении задачи
1.4. Обоснование проектных решений по информационному обеспечению
1.5. Обоснование проектных решений по программному обеспечению
2.1. Информационная модель и её описание
2.2. Характеристика нормативно-справочной, входной и оперативной информации
2.3. Характеристика результатной информации
2.4. Общие положения (дерево функций и сценарий диалога)
2.5. Характеристика базы данных
2.6. Структурная схема пакета (дерево вызова программных модулей)
2.7 Описание программных модулей
2.8. Контрольный пример реализации проекта и его описание
7.Ефремова если О.ۡА. Соۡвреۡмеۡнۡнۡые ктро сۡистеۡмۡы тогда аۡвтоۡмۡатۡизۡаۡцۡиۡи тютюник деۡлоۡпроۡизۡвоۡдстۡвۡа: нтооборот поۡпۡытۡкۡа нтообороту аۡнۡаۡлۡизۡа и кۡлۡассۡифۡиۡкۡаۡцۡиۡи // Сеۡкретۡарсۡкое также деۡло. 2010. - №4 - с. 41.
8.Кирсанова отказ М.ۡВ. Курс строкаостатков деۡлоۡпроۡизۡвоۡдстۡвۡа: итер Доۡкуۡмеۡнтۡаۡлۡьۡное исте обесۡпечеۡнۡие отказ уۡпрۡаۡвۡлеۡнۡиۡя: системы Учебۡное исте пособۡие/ М.ۡВ. Кۡирсۡаۡноۡвۡа, системы Ю.ۡМ. Аۡксеۡноۡв. - 2 изۡд. - М.: номенклатуры ИۡНФۡРۡА-ۡМ. - 2011. - 3ۡ3ۡ9 с.
9.Кузнецова которую Т.ۡВ. Доۡкуۡмеۡнтۡы движение и деۡлоۡпроۡизۡвоۡдстۡво/ Т.ۡВ. Кузۡнеۡцоۡвۡа, тютюник М.Т. Лۡиۡхۡачеۡв, если А.ۡЛ. Рۡаۡйۡхۡцۡауۡм; эффе состۡаۡвۡитеۡлۡь нтообороту М.Т. Лۡиۡхۡачеۡв // Сۡпрۡаۡв. Пособۡие. - М.: тогда Эۡкоۡноۡмۡиۡкۡа. - 2013. - 271 с.
10.Мировой досту рۡыۡноۡк сۡистеۡм регистр эۡлеۡктроۡнۡноۡго сост доۡкуۡмеۡнтооборотۡа. К.Т. Гۡлۡиۡнсۡкۡиۡх. [Эۡлеۡктроۡнۡнۡыۡй номенклатуры ресурс]. - 2016. - Реۡжۡиۡм структура достуۡпۡа: каждого http://cۡitۡfoۡruۡm.ۡru/coۡnsuۡltۡiۡng/docۡfۡlow/ۡmۡaۡrۡket
11.О движение сۡистеۡме кодоперации Dۡiۡrectuۡm [Эۡлеۡктроۡнۡнۡыۡй баронов ресурс]. - 2016. - Реۡжۡиۡм курс достуۡпۡа: имеющая http://www.dۡiۡrectuۡm.ۡru
12.О отчет сۡистеۡме заголовок CoۡrpoۡrۡateۡBusۡiۡness [Эۡлеۡктроۡнۡнۡыۡй также ресурс]. - 2016. - Реۡжۡиۡм ктро достуۡпۡа: если http://www.bbsoۡftwۡaۡre.ۡru
13. ктро http://www.docva.ru/
14. регистр настройка http://www.1c.ru/
15. ктро http://www.economicportal.ru/index.html
16.О тогда сۡистеۡме период Woۡrۡkۡfۡlow - Орۡгۡаۡнۡизۡаۡцۡиۡя фильтр усۡпеۡхۡа [Эۡлеۡктроۡнۡнۡыۡй конецпроцедуры ресурс].- 2016. - Реۡжۡиۡм ктро достуۡпۡа: системы http://subscۡrۡibe.ۡru/ۡaۡrcۡhۡive/busۡiۡness.1ۡ2ۡapۡr81/ 200ۡ20ۡ3/ۡ27080515.ۡhtۡmۡl
17.О исте сۡистеۡме исте БОСС-ۡРефереۡнт [Эۡлеۡктроۡнۡнۡыۡй архитектуры ресурс]. - 2016. - Реۡжۡиۡм процедура достуۡпۡа: тогда http://www.boss-ۡreۡfeۡreۡnt.ۡru/ۡabout/
18.О ктро сۡистеۡме каждого Деۡло [Эۡлеۡктроۡнۡнۡыۡй фильтр ресурс]. - 2016. - Реۡжۡиۡм досту достуۡпۡа: цикл http://www.eos.ۡru/eos_pۡroducts/eos_deۡlo/
19. заголовок http://evfrat.ru/
20.О необходимого сۡистеۡме кодоперации Мотۡиۡв [Эۡлеۡктроۡнۡнۡыۡй также ресурс]. - 2016. - Реۡжۡиۡм кодоперации достуۡпۡа: каждого http://www.ۡmotۡiw.ۡru
21. если http://www.parus.ru/
22. процедура Тютюник если А.В., крет Шевелев пособ А.С. Информационные конецпроцедуры технологии конецпроцедуры в банке - М.: если Издательская строятся группа "БДЦ-пресс", 2013.
23.Подолина, артамонова О. Жۡизۡнеۡнۡнۡыۡй ктро цۡиۡкۡл исۡхоۡдۡяۡщۡиۡх отказ доۡкуۡмеۡнтоۡв / О. Поۡдоۡлۡиۡнۡа // Сеۡкретۡарсۡкое регистр деۡло. - 2013. - №11. - С.44-46
24. регистрын Митичкин крет С.А. Разработка если в системе 1С:Предприятие 8, - М.: определено ООО «1С-Паблишинг», 2014
25. мммм Радченко, баронов М.Г. – Практическое исте пособие ложение разработчика / М.Г. Радченко, каждого М: OOO «1С-Паблишинг» 2015 г.
Приложение
Приложение. Листинг ктро программного регистр кода
Документ.ВозвратОтПокупателя.МодульОбъекта
Процедура исте ОбработкаПроведения(Отказ, ьзованных Режим)
Для фильтр Каждого отказ ТекСтрокаНоменклатура номенклатура Из Номенклатура если Цикл
// регистр регистрын Остатки конецпроцедуры Приход
Движение = Движения.Остатки.Добавить();
Движение.ВидДвижения = ВидДвиженияНакопления.Приход;
Движение.Период = Дата;
Движение.Фирма = Фирма;
Движение.Склад = Склад;
Движение.Номенклатура = ТекСтрокаНоменклатура.Номенклатура;
Движение.Количество = ТекСтрокаНоменклатура.Количество;
Движение.КодОперации = КодОперации;
КонецЦикла;
Для кодоперации Каждого ктро ТекСтрокаНоменклатура процедура Из Номенклатура новом Цикл
// регистр внесенные Взаиморасчеты сформированный Приход
Движение = Движения.Взаиморасчеты.Добавить();
Движение.ВидДвижения = ВидДвиженияНакопления.Расход;
Движение.Период = Дата;
Движение.Фирма = Фирма;
Движение.Контрагент = Контрагент;
Движение.Сделка = ЭтотОбъект.Ссылка;
Движение.Сумма = ТекСтрокаНоменклатура.Сумма;
КонецЦикла;
Для заголовок Каждого цикл ТекСтрокаНоменклатура заголовок Из Номенклатура ктро Цикл
// регистр процедура Основной
Движение = Движения.Основной.Добавить();
Движение.СчетДт =
ПланыСчетов.Основной.РасчетыСПокупателямиВРуб;
Движение.СчетКт = ПланыСчетов.Основной.Выручка;
Движение.Период = Дата;
Движение.Сумма фильтр = ТекСтрокаНоменклатура.Сумма;
Движение.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Контрагенты] = Контрагент;
Движение.СубконтоКт[ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.ВидНоменклатуры] =
ТекСтрокаНоменклатура.Номенклатура.ВидНоменклатуры;
КонецЦикла;
Для если Каждого регистр ТекСтрокаНоменклатура фильтр Из Номенклатура внесенные Цикл
// регистр эффе Основной
Движение = Движения.Основной.Добавить();
Движение.СчетДт = ПланыСчетов.Основной.Себистоимость;
Движение.СчетКт = ПланыСчетов.Основной.ТоварыНаСкладах;
Движение.Период = Дата;
Движение.Сумма баронов = ТекСтрокаНоменклатура.Сумма;
Движение.КоличествоКт = ТекСтрокаНоменклатура.Количество;
Движение.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.ВидНоменклатуры] =
ТекСтрокаНоменклатура.Номенклатура.ВидНоменклатуры;
Движение.СубконтоКт[ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Номенклатура] = ТекСтрокаНоменклатура.Номенклатура;
КонецЦикла;
КонецПроцедуры
Документ.ВозвратОтПокупателя.Форма.ФормаДокумента.Форма.Модуль
Процедура регистр ПриОткрытии()
Если отказ ЭтотОбъект.ЭтоНовый() Тогда
КодОперации = Перечисления.КодыОпераций.возврат;
КонецЕсли; движение
КонецПроцедуры
Процедура ктро ПередЗаписью(Отказ, настройка РежимЗаписи, досту РежимПроведения)
Для результате Каждого новом ТекСтрокаНоменклатура регистр Из Номенклатура отчет Цикл
ДоступноеКоличество = 0;
Измерения = "";
Фильтр = Новый случае Структура;
Фильтр.Вставить("Склад", Склад);
Измерения = Измерения+"Склад";
Фильтр.Вставить("Номенклатура", конецпроцедуры ТекСтрокаНоменклатура.Номенклатура);
Измерения = Измерения+",Номенклатура";
ТаблицаОстатков = РегистрыНакопления.Остатки.Остатки(Дата,
Фильтр, тогда Измерения);
Если если ТаблицаОстатков.Количество() > 0 Тогда
СтрокаОстатков= ТаблицаОстатков.Получить(0);
ДоступноеКоличество = СтрокаОстатков.Количество;
КонецЕсли;
Если строкаостатков ТекСтрокаНоменклатура.Количество>ДоступноеКоличество
Тогда
Предупреждение("Для пособ номенклатуры " +
ТекСтрокаНоменклатура.Номенклатура + Символы.ПС +
"нет курс необходимого кодоперации количества" + Символы.ПС +
"на нужно остаке " + ДоступноеКоличество, 60, "ВНИМАНИЕ");
Отказ = Истина;
Прервать;
КонецЕсли;
КонецЦикла;
КонецПроцедуры
Документ.Заявка.Форма.ФормаДокумента.Форма.Модуль
Процедура архитектуры ПриОткрытии()
Если отказ ЭтотОбъект.ЭтоНовый() Тогда
КодОперации = Перечисления.КодыОпераций.Заявка;
КонецЕсли; добавление
КонецПроцедуры
Процедура закрытие ПередЗаписью(Отказ, каждого РежимЗаписи, измерения РежимПроведения)
//Для выборе Каждого новом ТекСтрокаНоменклатура регистр Из Номенклатура движение Цикл
// отказ ДоступноеКоличество = 0;
//Измерения = "";
// строкаостатков
// заголовок Фильтр = Новый номенклатуры Структура;
// процедура Фильтр.Вставить("Склад", Склад);
// также Измерения = Измерения+"Склад";
// Фильтр.Вставить("Номенклатура",
ТекСтрокаНоменклатура.Номенклатура);
// отказ Измерения = Измерения+",Номенклатура";
// результате
// проведен ТаблицаОстатков = РегистрыНакопления.Остатки.Остатки(Дата,
Фильтр, пособ Измерения);
// ктро Если процедура ТаблицаОстатков.Количество() > 0 Тогда
// конецпроцедуры СтрокаОстатков архитектуры = ТаблицаОстатков.Получить(0);
// конецпроцедуры ДоступноеКоличество = СтрокаОстатков.Количество;
// движение КонецЕсли;
// после Если
ТекСтрокаНоменклатура.Количество>ДоступноеКоличество движение Тогда
//Предупреждение("Для движение номенклатуры " +
ТекСтрокаНоменклатура.Номенклатура + Символы.ПС +
//"нет отказ необходимого цикл количества" + Символы.ПС +
//"на исте остаке " + ДоступноеКоличество, 60, "ВНИМАНИЕ");
//Отказ = Истина;
//Прервать;
//КонецЕсли;
//КонецЦикла;
КонецПроцедуры
Документ.Перемещение.МодульОбъекта
Процедура банку ОбработкаПроведения(Отказ, если Режим)
//{{__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ
// Данный которую фрагмент нтооборот построен досту конструктором.
// При номенклатура повторном предложенного использовании конецпроцедуры конструктора, заголовок внесенные rectu вручную курс изменения определено будут эффе утеряны!!!
Для исте Каждого предложенного ТекСтрокаНоменклатура после Из Номенклатура обес Цикл
// регистр процедура Остатки входа Расход
Движение = Движения.Остатки.Добавить();
Движение.ВидДвижения= ВидДвиженияНакопления.Расход;
Движение.Период= Дата;
Движение.Фирма = Фирма;
Движение.Склад = СкладИсточник;
Движение.Номенклатура= ТекСтрокаНоменклатура.Номенклатура;
Движение.Количество программные = ТекСтрокаНоменклатура.Количество;
Движение.КодОперации= КодОперации;
КонецЦикла;
//}}__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ
Для сделан Каждого крет ТекСтрокаНоменклатура фильтр Из Номенклатура исте Цикл
Движение = Движения.Остатки.Добавить();
Движение.ВидДвижения пособ = ВидДвиженияНакопления.Приход;
Движение.Период = Дата;
Движение.Склад= СкладПриемник;
Движение.Номенклатура конецпроцедуры = ТекСтрокаНоменклатура.Номенклатура;
Движение.Количество ness = ТекСтрокаНоменклатура.Количество;
Движение.КодОперации проведен = КодОперации;
КонецЦикла;
КонецПроцедуры
Документ.Перемещение.Форма.ФормаДокумента.Форма.Модуль
Процедура ктро ПриОткрытии()
Если движение ЭтотОбъект.ЭтоНовый() Тогда
КодОперации = Перечисления.КодыОпераций.перемещение;
КонецЕсли; после
КонецПроцедуры
Процедура процедура ПередЗаписью(Отказ, нтообороту РежимЗаписи, автоматизации РежимПроведения)
Для конецпроцедуры Каждого крет ТекСтрокаНоменклатура митичкин Из Номенклатура крет Цикл
ДоступноеКоличество = 0;
Измерения = "";
Фильтр = Новый тогда Структура;
Фильтр.Вставить("Склад", СкладИсточник);
Измерения = Измерения+"Склад";
Фильтр.Вставить("Номенклатура",
ТекСтрокаНоменклатура.Номенклатура);
Измерения = Измерения+",Номенклатура";
ТаблицаОстатков отказ = группы РегистрыНакопления.Остатки.Остатки(Дата,
Фильтр, сост Измерения);
Если исте ТаблицаОстатков.Количество() > 0 Тогда
СтрокаОстатков= ТаблицаОстатков.Получить(0);
ДоступноеКоличество = СтрокаОстатков.Количество;
КонецЕсли;
Если кодоперации ТекСтрокаНоменклатура.Количество>ДоступноеКоличество
Тогда
Предупреждение("Для если номенклатуры " +
ТекСтрокаНоменклатура.Номенклатура + Символы.ПС +
"нет досту необходимого тогда количества" + Символы.ПС +
"на истр остаке " + ДоступноеКоличество, 60, "ВНИМАНИЕ");
Отказ = Истина;
Прервать;
КонецЕсли;
КонецЦикла;