Моделирование бизнес-процессов на предприятии (на примере ООО "СемьСот" г. Владивосток)

Диаграмма деятельности для бизнес-процесса «Инвентаризация» отображена на рисунке А.5.

Анализируя данный бизнес-процесс, сложно сказать, требует ли он на данный момент дополнительной автоматизации. Так как полностью пройти бизнес-процесс инвентаризации не представлялось возможным, то не хватает информации для определенных выводов.

На данный момент можно лишь говорить о совершенствовании с организационной точки зрения.

Следующий бизнес-процесс - это «Обучение персонала». Обучение персонала является важным моментом в любой организации, иначе, в скором времени, руководители могут заметить бесполезность работы своих сотрудников. На самом деле, именно с подбора персонала начинают все компании. Правильно подобранные кадры приносят прибыль компании.

1.4.6 Бизнес-процесс «Обучение персонала»

Ежегодно руководители структурных подразделений сдают заявку на обучение руководителю. Руководитель анализирует представленные заявки и делает вывод о необходимости обучения персонала по предложенным руководителями тематикам. На основании утвержденных заявок руководители определяют критерии отбора кадров для предстоящего обучения. Отдел кадров, на основании предоставленных критериев, отбирает персонал, нуждающийся в повышении своей квалификации. Руководителем компании отправляется заявка в учебный отдел на обучение.

Руководитель учебного отдела согласует с менеджерами программу обучения, дату и продолжительность данного процесса.

Продолжительность и содержание обучения для одной группы определяется программой обучения по конкретной тематике. По окончании каждого вида обучения выдается документ ? сертификат о прохождении внутреннего обучения с подписью руководителя службы управления персоналом. Выдача данного сертификата повышает престижность внутреннего обучения и его привлекательность для сотрудников.

Также после проведения обучения, менеджеры учебного отдела составляют отчет по проделанной работе и полученным результатам. После подписания отчета руководителем отдела, документ предается в отдел кадров для дальнейшей обработки. Специалисты службы персонала оформляют отчет и заносят данные в кадровый учет.

Диаграмма деятельности для данного бизнес-процесса отображена на рисунке А.6.

Делая анализ бизнес-процесса обучения персонала, можно сказать лишь то, что обучение в компании ООО «СемьСот» является сугубо внутренним процессом, без привлечения сторонних организаций.

С одной стороны внутреннее обучение - это экономия денежных средств организации, с другой стороны, важно, чтобы работающие в учебном отделе менеджеры по обучению были компетентны в сферах и направлениях необходимого обучения и могли действительно повышать уровень знаний и квалификацию работников организации.

Является ли данный аспект недостатком - каждый руководитель решает сам, анализируя результаты обучения и дальнейшую работу своих работников.

В работе описаны далеко не все бизнес-процессы ООО «СемьСот», а лишь самые основные, а также которые можно наглядно описать при помощи инструментального Case-средства Rational Rose.

Описывая основные бизнес-процессы, проходящие через несколько функциональных подразделений, можно обнаружить множество организационных и информационных разрывов между ними, что дает множество направлений для совершенствования деятельности организации.

Практически в любом бизнес-процессе всегда находятся какие-либо недостатки. Вопрос лишь в том, стоит ли менять устоявшиеся корпоративные отношения, если сам бизнес-процесс не влияет на ключевые факторы успеха деятельности компании, а недостаток едва ли легко устраним.

В результате моделирования, путем построения диаграмм активности и анализа основных бизнес-процессов, в данной работе были выявлены некоторые недостатки и возможные аспекты автоматизации, которая бы позволила повысить эффективность и сократить затраты, особенно временные. В качестве автоматизируемого процесса мной был выбран бизнес-процесс «Распределение товаров по торговым точкам», который является наиболее затратным на сегодняшний день в компании, как по трудовым, так и по временным показателям.

Как говорилось выше, в компании ООО «СемьСот» для осуществления деятельности используется информационная система 1С:Предприятие. Поэтому автоматизация бизнес-процесса «Распределение товаров по торговым точкам» предполагает доработку существующей конфигурации «Управление торговлей» в информационной системе 1С: Предприятие. Осуществленные доработки позволят сократить трудовые и временные затраты логиста, а также позволит более эффективно осуществлять распределение товаров.

Автоматизация предполагает добавление двух новых документов, которые помогут намного быстрее осуществить распределение товара. Предложенный вариант автоматизации данного процесса более подробно рассмотрим в следующем разделе бакалаврской работы.

2. Автоматизация бизнес-процесса «Распределение товара по торговым точкам»

Информационные технологии являются стратегическими элементами и главными средствами создания стоимости во многих отраслях, составляющих новую экономику с элементами информационного общества.

В условиях современной системы управления предприятием, вне зависимости от сферы деятельности, без использования информационных технологий невозможно оперативно, то есть, с высокой скоростью управлять основными функциями менеджмента: планирование, управление, контроль, мотивация.

Необходимо отметить, что любой бизнес-процесс начинается с планирования. Планирование деятельности предприятия базируется на составлении финансового плана, в процессе которого определяется оптовый (розничный) оборот, прибыль, объем производства, цена товара и т.д. Определение данных показателей в процессе планирования связано с рутинными функциями расчета, поэтому использование вычислительной техники должно быть направлено, прежде всего, на упрощение расчетов в процессе планирования. Но, любой расчет в процессе планирования, производится на основе входных данных (исходных показателей). Получение данных показателей, без использования информационной системы (далее ИС), также является рутинной, трудоемкой функцией. При применении ИС можно получить все требуемые исходные показатели, необходимые при планировании, посредством запросов по определенным параметрам [20].

Таким образом, применение ИС в процессе планирования позволяет устранить рутинные функции, посредством их автоматизации. Необходимо учитывать то, что конкретные управленческие решения, все равно, принимает человек, управленец. Процесс принятия решений невозможно автоматизировать, но рутинные функции поиска необходимой информации, а также получения результативных, расчетных показателей, необходимо и можно автоматизировать.

По результатам анализа основных бизнес-процессов в предыдущем разделе можно сказать, что многие из процессов имеют свои недостатки, которые можно и нужно автоматизировать.

Для автоматизации мною был выбран бизнес- процесс «Распределения товара по торговым точкам». Как упоминалось в предыдущем разделе, компания ООО «СемьСот» использует для ведения учета своей коммерческой деятельности информационную систему 1С: Предприятие, в том числе логист, распределяющий товары на торговый точки.

Далее будет предложен способ автоматизации бизнес-процесса путем внесения дополнительных документов в существующую информационную систему.

Прежде чем описывать суть автоматизации, рассмотрим более подробно, что собой представляет информационная система 1С: Предприятие.

2.1 Информационная система 1С: Предприятие

Информационная система 1С: Предприятие позволяет существенно автоматизировать экономическую и организационную деятельность предприятий различного профиля. Программы 1С имеют определенное функциональное назначение. Они ориентированы на реализацию регламентированного состава учетных задач с фиксированными алгоритмами решения [21].

В подразделе перечисляются задачи, которые будут дополнительно разработаны и включены в состав программ 1С. Поясняется, каким образом будут использоваться результаты решения переработанных задач.

При внедрении разработки можно будет устранить следующие недостатки:

- задержка необходимой информации;

- низкая оперативность;

- высокая трудоемкость обработки информации;

- несовершенство процессов обработки, хранения, защиты целостности и секретности информации и процессов выдачи результатов расчетов конечному пользователю.

Зачастую типовые решения, поставляемые фирмой 1С, требуют доработок под особенности учета предприятия. Под доработками понимаются изменения, вносимые в программные модули продуктов [22].

В настоящее время в большинстве организаций различного профиля ощущается потребность в специалистах, которые профессионально владеют разнообразными современными информационными технологиями. При этом наиболее частыми требованиями и пожеланиями со стороны работодателей являются навыки работы с информационной системой 1С: Предприятие.

Если посмотреть на спектр специалистов, работающих с 1С: Предприятие, то мы увидим, что он достаточно широк - менеджеры, бухгалтеры, программисты, разработчики, руководители подразделений и т. д. Всех этих людей можно разделить на две условные категории - разработчиков и пользователей.

Доработка 1С - набор действий, направленных на достижение максимальной функциональности и эффективности работы пользователей с программой, осуществляемых путем корректировки программного кода [23].

Основная функция данного мероприятия - достижение максимального удобства работы пользователя с бухгалтерским или управленческим учетом. Доработка 1С - это возможность создать максимально эффективную систему-помощника в ведении бизнеса. Оптимизация функционала программы 1C, доработка ее программного кода позволит снизить вероятные ошибки при ведении учета. Таким образом, в распоряжении компании оказывается уникальная система, позволяющая уйти от стандартных, не всегда оптимальных принципов работы. Основным недостатком доработки 1С признана невозможность обновить систему стандартным способом после внесения изменений в код.

Большое преимущество 1С программ заключается в том, что применяемые типовые конфигурации можно доработать под специфику учета и бизнес-процессы любой компании, если они имеют отличия от универсального решения, предлагаемого фирмой «1С». Доработка повышает возможности в организации эффективной работы предприятия и обеспечению сотрудникам максимального удобства при работе с программой. Настройки обладают практически неограниченными возможностями, что позволяет реализовать различные бизнес-процессы, а также автоматизировать некоторые функции на базе типовых конфигураций или «с нуля». Дополнительная доработка 1С может использоваться для изменения и корректировки:

- документов и их печатных форм;

- отчетов руководителям, настроенных для удобного анализа данных в разных разрезах по необходимым для контроля показателям;

- механизмов расчета потребности в сырье и материалах для формирования заявок поставщикам;

- обмена документами и данными с контрагентами с использованием электронной цифровой подписи, выполняя шифрование сразу из 1С;

- поточного ввода множества документов одного типа в автоматическом режиме без привлечения пользователей, используя помощь сканирования, распознавание текста и импорт данных в 1С;

- систем контроля и управления дебиторской задолженностью, а также других функций и параметров любого вида учета.

Стоит заметить, что внести изменения можно в различные конфигурации программ 1С, совершенно независимо от сложности продукта.

Как правило, все специалисты фирмы 1С имеют многолетний опыт выполнения доработок программных продуктов на предприятиях разнообразной деятельности и масштаба. Компании, осуществляющие данные настройки обладают сертификатом международного стандарта качества. Кроме этого сертификаты фирмы «1С» должны иметь все аналитики и программисты, которые выполняют технические задания по доработке систем.

Автоматизация выбранного мной бизнес-процесса «Распределение товара по торговым точкам» предполагает именно доработку существующей на предприятии конфигурации информационной системы 1С: Предприятие.

Автоматизация будет осуществляться путем доработки конфигурации «Управление торговлей». Что собой представляет данная конфигурация, рассмотрим далее.

2.2 Конфигурация «Управление торговлей»

Конфигурация « Управление торговлей» ? тиражное прикладное решение, позволяющее в комплексе автоматизировать задачи оперативного и управленческого учета, анализа и планирования торговых операций. Решение предназначено для автоматизации учета в организациях, занимающихся оптово-розничной торговлей, и позволяет вести оперативный учет и управление не только торговыми, но и складскими и финансовыми операциями [24].

Прикладное решение автоматизирует следующие направления торговой деятельности:

- управление продажами (включая оптовую, розничную и комиссионную торговлю);

- управление поставками;

- планирование продаж и закупок;

- управление складскими запасами;

- управление заказами покупателей;

- анализ товарооборота предприятия;

- анализ цен и управление ценовой политикой;

- мониторинг и анализ эффективности торговой деятельности.

«Управление торговлей» поддерживает оформление практически всех первичных документов торгового учета, в том числе и документов движения денежных средств. С помощью документов учитывается оперативная информация при совершении хозяйственных операций. На основе этой информации производится реализация управленческих функций.

Конфигурация предназначена для учета любых видов торговых операций. Благодаря гибкости и настраиваемости конфигурация реализует функции учета от ведения справочников и ввода первичных документов до получения различных аналитических отчетов. Конфигурация позволяет вести управленческий учет по торговому предприятию в целом [25].

Теперь, наконец, можно приступить к описанию сущности автоматизации, а также ее реализации.

Автоматизируемый бизнес-процесс «Распределение товаров по торговым точкам» относится к группе основных бизнес-процессов, так как именно от правильно и рационального распределения товара по торговым точкам зависят продажи, а, значит, и прибыль компании. Данный процесс требует тщательного анализа и ответственного подхода.

Распределение товара по торговым точкам является обязанностью логиста.

Как уже описывалось ранее, логист, формирует в программе 1С отчеты об остатках, продажах и заказах по определенным позициям и складам. Используя эти отчеты, специалист определяет, сколько и какого товара переместить в тот или иной магазин. Логист просматривает для каждой позиции на каждом складе данные по продажам, остаткам и заказам, которые содержатся в трех разных отчетах. После этого он определяет объем перемещаемого товара. Данные о планируемых перемещениях, которые могут насчитывать несколько сотен строк, фиксируются на бумаге или в электронной таблице.

Весь этот процесс может занимать несколько часов.

После этой процедуры фактуровщику необходимо сформировать накладные на перемещение с информацией, указывающей кладовщику, куда, какой и в каком количестве товар требуется отгрузить.

Если перемещено, к примеру, 500 единиц товара на 30 складов, получаем 30 накладных по 10-15 строк в каждой. На формирование данного количества накладных фактуровщику также требуется затратить также около часа. Таким образом, процесс распределения поступившей партии товара может занимать 1-2 дня.

Мной было принято решение, что описанные выше три отчета (по продажам, остаткам и заказам) неудобны в использовании (в данном бизнес-процессе) и их просмотр занимает много времени, как и дальнейшее формирование плана распределение на основании этих отчетов. Поэтому необходим документ, который бы совмещал в себе данные, представленные в отчетах в разрезе каждой позиции. Также необходимо, чтобы на основании этого документа формировались автоматические накладные на перемещение товаров.

Рассмотрим, как будет выглядеть «новый» бизнес-процесс «Распределения товаров по торговым точкам».

2.3 Описание новой модели бизнес-процесса

Сначала логистом, с помощью документа «УстановкаМинимальныхОстатков» определяются параметры торговой точки: минимальные остатки и емкость полок для каждой позиции номенклатуры. Минимальные остатки заполняются при помощи нажатия на кнопку «Заполнить минимальные остатки», предварительно заполнив форму. В поле «Номер» автоматически формируется номер документа. В поле «Организация» пользователь выбирает соответственно организацию «СемьСот». В полях «Дата начала» и «Дата конца» указывается период, за который рассчитываются минимальные остатки. В Поле «На полке» указывается количество товара, которое помещается на полках в торговой точке. В полях «Откуда» и «Куда» указываются места хранения (склады). Количество периодов программно установлено 15 дней. Справа, в списке номенклатуры, устанавливается галочка над нужной позицией.

Минимальные остатки рассчитываются программно исходя из скорости продаж товара за предыдущий период. Результаты расчета записываются в регистр сведений «МинимальныеОстатки» при помощи нажатия на кнопку «Записать минимальные остатки». Структура документа «УстановкаМинимальныхОстатков» представлена на рисунке 12.

Рисунок 12 Структура документа «УстановкаМинимальныхОстатков»

Структура регистра сведений «МинимальныеОстатки» представлена и рисунке 13.



Рисунок 13 Структура регистра «МинимальныеОстатки»

На рисунке 14 и рисунке 15 соответственно, представлены пустая и заполненная формы документа «УстановкаМинимальныхОстатков». Программный код для данного документа представлен в Приложении Б.

Рисунок 14 - Пустая форма документа «УстановкаМинимальныхОстатков»

Далее логист создает отчет «ЗаказНаНеделю». Отчет «ЗаказНаНеделю» служит для определения потребности товара в торговой точке на неделю.

Рисунок 15 - Заполненная форма документа «УстановкаМинимальныхОстатков»

Для анализа используются данные из регистра «МинимальныеОстатки», сведения о сформированных ранее, но еще не проведенных документах «ВнутреннийЗаказ». Результатом работы отчета «ЗаказНаНеделю» является автоматическое создание документа «ВнутреннийЗаказ».

Документ «Внутренний заказ» предназначен для оформления потребности в товарах на складах и в подразделениях предприятия. В соответствии с этим различаются заказы со складов и из подразделений. Использование подсистемы внутренних заказов может быть отключено путем снятия флага «Использовать внутренние заказы» в настройках параметров учета. В этом случае данный документ ввести нельзя. Различают следующие виды внутренних заказов:

- заказ на склад. Этот вид заказа отражает потребность в товарах на каком-либо складе предприятия, например, в случае отсутствия товара в магазине, либо когда количество товара становится меньше уровня минимального запаса. Исполнение заказа осуществляется документом «Перемещение товаров».

- заказ в подразделение. Этот вид заказа отражает потребность какого-либо подразделения (цеха) в материалах или полуфабрикатах необходимых для производства продукции, работ, услуг. Исполнение заказа данного вида осуществляется документом «Требование-накладная». Если установлен вид заказа «В подразделение», закладка «Тара» отсутствует.

Для внутреннего заказа могут быть зарезервированы позиции номенклатуры как из текущего остатка на любом из складов (оптовом или розничном), входящих в состав компании, так и размещены в заказах поставщикам, заказах на производство или внутренних заказах. В графе «Размещение» можно указать склад (оптовый или розничный), на котором необходимо зарезервировать товар или заказ, при поступлении товаров по которому произойдет автоматическое резервирование по заказу. При этом по одному заказу товар может быть зарезервирован на нескольких складах и размещен в нескольких заказах. Параметры резервирования и размещения товара могут быть заполнены автоматически при помощи нажатия на кнопку «Заполнить и провести». После проведения заказа можно откорректировать схему размещения и резервирования по заказу с помощью документа «Резервирование товаров».

При распределении позиций номенклатуры по заказам поставщикам учитывается предполагаемая дата отгрузки («Отгрузка») по документу «Внутренний заказ» и предполагаемая дата поступления («Поступление») по документу «Заказ поставщику». Дата поступления должна быть меньше даты отгрузки (товар должен поступить раньше, чем его предполагается отгрузить). Нажав на кнопку «Анализ» можно получить подробный отчет о состоянии внутреннего заказа.

Форма отчета «ЗаказНаНеделю» представлена рисунке 16. Исходный программный код отчета «ЗаказНаНеделю» представлен в Приложении Б.

Рисунок 16 - Отчет «ЗаказНаНеделю»

Форма документа «ВнутреннийЗаказ» представлена на рисунке 17.



Рисунок 17 - Документ «Внутренний заказ»

Работа логиста далее заключается в анализе сформированных документов «ВнутреннийЗаказ», корректировке данных по определенным позициям, если того требует работа с клиентом (например, планируется закупка товара в большом объеме, что не было рассчитано по скоростям продаж). После сделанных уточнений на основании документа «ВнутреннийЗаказ» формируется документ «ПеремещениеТоваров».

Документ «Перемещение товаров» предназначен для оформления передачи номенклатурных позиций между различными складами: оптовыми, розничными, неавтоматизированными торговыми точками.

В поле «Отправитель» указывается склад, с которого производится списание товара, а в поле «Получатель» указывается тот склад, на который поступает товар.

Если товар перемещается в неавтоматизированную торговую точку, в документе необходимо указать те розничные цены, по которым товар будет продаваться в НТТ. Цены, указанные в данном документе, будут являться отпускными ценами, по которым будет производиться продажа и учет номенклатурных позиций в НТТ.

Изменение розничных цен в неавтоматизированной торговой точке производится документом «Переоценка товаров в рознице».

Если товар перемещается на розничный склад, то при проведении документа выполняется проверка установки розничных цен на товар для этого розничного склада. Если розничные цены не установлены, выдается соответствующее сообщение, а документ не проводится. Розничные цены на товары для розничного назначаются документом «Переоценка товаров в рознице», который можно создать непосредственно из документа «Перемещение товаров», нажав на кнопку «Переоценка».

Перемещение товаров производится для выполнения определенного внутреннего заказа, то этот заказ необходимо указать в табличной части в колонке «Внутренний заказ». В одном документе перемещения можно указать несколько различных внутренних заказов, которые удовлетворяют определенным условиям - в качестве заказчика в документе должен быть выбран склад, указанный в перемещении в качестве склада-получателя.

Если товары перемещаются для выполнения внутреннего заказа, то их можно перемещать из свободного остатка на складе-отправителе или из резерва на складе-отправителе под этот внутренний заказ. Способ списания товара (возвратной тары) под выполнение внутреннего заказа определяется заполнением колонки «Документ-резерва». Если документ резерва не указан, то это означает перемещение из свободного остатка. Если указан внутренний заказ, то это означает перемещение из резерва по внутреннему заказу, причем в колонке «Документ-резерва» может быть выбран только внутренний заказ, указанный в колонке «Внутренний заказ». В связи с этим существует ограничение: для выполнения внутреннего заказа нельзя перемещать неотфактурованные товары или товары, зарезервированные под другие заказы.

Документ «Перемещение товаров» можно ввести на основании документа «Внутренний заказ». При этом будет предложено выбрать склад, с которого необходимо переместить товары (возвратную тару). Табличные части «Товары» и «Тара» будут заполнены неисполненной частью внутреннего заказа с учетом остатков этих товаров (возвратной тары) на выбранном складе-отправителе (в свободном остатке и в резерве под выбранный внутренний заказ).

При автоматическом заполнении табличных частей «Товары» и «Тара» в документе «Перемещение товаров» по кнопке «Заполнить по внутреннему заказу» или «Добавить по внутреннему заказу» также учитываются остатки товаров на складе-отправителе.

Форма документа «ПеремещениеТоваров» представлена на рисунке 18.

Рисунок 18 - Документ «перемещение товаров»

Таким образом, дополнение штатных документов «ВнутреннийЗаказ» и «ПеремещениеТоваров» специально разработанным документом «УстановкаМинимальныхОстатков» и отчетом «ЗаказНаНеделю» позволило в значительной степени автоматизировать трудоемкую работу менеджера по планированию поставок товара в торговые точки.

Заключение

В работе было проведено моделирование основных бизнес-процессов компании ООО «СемьСот», которое позволило проанализировать не только, как работает предприятие в целом, но и как оно взаимодействует с внешними организациями, заказчиками и поставщиками, а также как организована деятельность на каждом отдельно взятом рабочем месте. Построить полноценные модели бизнес-процессов помогло исследование организационной структуры предприятия, которое выявило отсутствие отдела маркетинга в компании, что является определенным недостатком и, возможно, мешает дальнейшему развитию компании. Построение моделей бизнес-процессов было выполнено с помощью Case-средства Rational Rose. Для каждого из них была построена диаграмма активности и проведен анализ. По результатам анализа были выявлены недостатки, а также намечены пути их решения. В работе был предложен и реализован один из вариантов автоматизации бизнес-процесса «Распределение товаров по торговым точкам». Автоматизация производилась путём доработки существующей конфигурации «Управление торговлей» информационной системы 1С:Предприятие. В конфигурацию были добавлены два документа, которые позволили упростить рассмотренный бизнес-процесс.

Автоматизация бизнес-процесса «Распределение товара по торговым точкам» позволила:

- сократить время на выполнение бизнес-процесса;

- получать исчерпывающую информацию о продажах, остатках, заказах;

- минимизировать ошибки в распределении;

- повысить рациональность распределения товара.

Тем не менее, как показал анализ моделей бизнес-процессов, в компании это не единственный процесс, имеющий недостатки. Существует множество вариантов автоматизации и аспектов, требующих доработки.

Список использованных источников

1 Елиферов В.Г. Бизнес-процессы: регламентация и управление: учебное пособие [для студентов вузов] / В. Г. Елиферов, В. В. Репин ; Ин-т экономики и финансов "Синергия". - М. : ИНФРА-М, 2011. - 319 с.

2 Андерсен Б. Бизнес-процессы. Инструменты совершенствования / Б. Андерсен ; [пер. с англ. С. В. Ариничева ; под науч. ред. Ю.П. Адлера]. - 5-е изд. - М. : Стандарты и качество, 2008. - 272 с. : ил. - (Практический менеджмент).

3 Репин В.В. Бизнес-процессы компании: построение, анализ, регламентация / В. В. Репин. - М. : Стандарты и качество, 2007. - 240 с. : ил. - (Деловое совершенство).

4 Реинжиниринг бизнес-процессов: учебник [для студ. экон. вузов магистерского уровня] / Н. М. Абдикеев, Т. П. Данько, С. В. Ильдеменов, А. Д. Киселев ; под ред. Н. М. Абдикеева, Т. П. Данько ; Высш. Школа МBA ; РЭА им. Г. В. Плеханова. - 2-е изд.,испр. - М. : Эксмо, 2009. - 592 с. - (Полный курс МВА).

5 Калянов, Г.Н. Моделирование, анализ, реорганизация и автоматизация бизнес-процессов: ученое пособие для студ. вузов, обуч. по спец. 080801 "Прикладная информатика" и др. экон. спец. / Г. Н. Калянов. - М. : Финансы и статистика, 2009. - 240с.

6 Моделирование бизнес-процессов [Электронный ресурс]: мет. материалы / Разработка Скриптов, режим доступа: http://www.script-coding.com

7 Современный менеджмент: учебник для студентов вузов / [авт. кол.: А. И. Базилевич, А. О. Блинов, Л. А. Вдовенко и др.] ; под ред. М. М. Максимцова, В. Я. Горфинкеля. - М. : Вузовский учебник : ИНФРА-М, 2012. - 299 с.

8 Логистика. Интеграция и оптимизация логистических бизнес-процессов в цепях поставок: [учебник для студ. вузов] / В. В. Дыбская, Е. И. Зайцев, В. И. Сергеев, А. Н. Стерлигова ; Под ред. В. И. Сергеева. - М. : Эксмо, 2008. - 944 с. - (Полный курс МВА).

9 Леоненков А.В. Объектно-ориентированный анализ и проектирование с использованием UML и IBM Rational Rose: учебное пособие / А. В. Леоненков; Интернет-Ун-т Информ. Технологий (ИНТУИТ). - М. : ИНТУИТ : БИНОМ. ЛЗ, 2009. - 320 с. : ил. - (Основы информационных технологий).

10 Трофимов С.А. CASE-технологии: практическая работа в Rational Rose / С.А.Трофимов. - 2-е изд. - М. : БИНОМ, 2008. - 284с. : ил.

11 Типовые организационные структуры предприятий [Электронный ресурс]: мет. материалы / Корпоративный менеджмент, режим доступа: http://www.cfin.ru

12 Разработка организационной структуры [Электронный ресурс]: мет. материалы / Папирян Г.А. Менеджмент в индустрии гостеприимства, режим доступа: http://tourlib.net/books_tourism/papiran_men13.htm

13 Бизнес-процессы [Электронный ресурс]: мет. материалы / бизнес-инжиниринговые технологии http://www.betec.ru

14 Резник, С. Д. Персональный менеджмент: учебник для студентов вузов / С. Д. Резник, В. В. Бондаренко, Ф. Е. Удалов ; под ред. С. Д. Резника. - 4-е изд.,перераб. и доп. - М. : ИНФРА-М, 2012. - 559 с. - (Высшее образование).

15 Резник Г.А. Введение в маркетинг: учеб. пособие для студентов вузов / Г. А. Резник. - 2-е изд..перераб. и доп. - М. : ИНФРА-М, 2012. - 202 с.

16 Калянов Г.Н. Моделирование и автоматизация бизнес-процессов: ученое пособие для студ. вузов, обуч. по спец. 080801 "Прикладная информатика" и др. экон. спец. / Г. Н. Калянов. - М. : Финансы и статистика, 2008. - 240с.

17 Ощенко И. 1С:Предприятие. Торговля и склад для начинающих: экспресс-курс / И. Ощенко. - СПб. : БХВ-Петербург, 2010. - 256 с. : ил.

18 Усиков, Тарас Николаевич. 1С:Предприятие. Эффективное программирование / Т. Н. Усиков. - 2-е изд., стереотип. - М. : Новое знание, 2006. - 446 с. : ил.

19 Закон РФ от 07.02.1992 N 2300-1 (ред. от 18.07.2011) "О защите прав потребителей" (с изм. и доп., вступающими в силу с 29.09.2011)

20 Томпсон, Кит. Автоматизация продаж [Текст] : умный подход / К. Томпсон ; [пер. с англ. В. Давыдов]. - М. : Вершина, 2008. - 272 с.

21 Шустикова Т. Б. 1С:Предприятие 8.0. Управление торговлей [Текст] / Т. Б. Шустикова. - М. : НТС Пресс, 2008. - 284, [4] с. : ил. - (Самоучитель).

22 Филимонова Е.В. Практическая работа в 1С : Предприятие 8.0. Настройка, конфигурирование, программирование и эксплуатация [Текст] : учебное пособие / Е. В. Филимонова. - Ростов н/Д : Феникс, 2009. - 384 с. : ил. - (Библиотека бухгалтера и аудитора).

23 Михайлов С.Е. 1С-программирование как дважды два [Текст] : самоучитель / С. Е. Михайлов. - СПб. : Тритон, 2009. - 173 с. : ил.

24 Дубянский В.М. 1С: Предприятие. Конфигурирование и администрирование для начинающих [Текст]: экспресс-курс / В. М. Дубянский. - СПб.: БХВ-Петербург, 2008. - 176 с.

25 Программирование в среде 1С:Предприятие [Текст] : учебная программа курса по спец. 220100 Вычислительные машины, комплексы, системы и сети / сост. С. М. Семенов. - Владивосток : Изд-во ВГУЭС, 2010. - 12 с.

Приложение А

(справочное)

Диаграммы активности бизнес-процессов

Рисунок А.1 - Диаграмма активности бизнес-процесса «Заказ и закупка товара»

Рисунок А.2 - Диаграмма активности бизнес-процесса «Распределение товара по торговым точкам»



Рисунок А.3 - Диаграмма активности бизнес-процесса «Реализация товара через интернет»



Рисунок А.4 - Диаграмма активности бизнес-процесса «Прием товара на гарантийное обслуживание»



Рисунок А.5 - Диаграмма активности бизнес-процесса «Инвентаризация»



Рисунок А.6 - Диаграмма активности для бизнес-процесса «Обучение персонала»

Приложение Б

(справочное)

Исходный код документа «УстановкаМинимальныхОстатков»

Перем ДлинаПериода;

Перем Табл;

Процедура УстановитьРегистрМинимальныеОстатки(Товар,МинОст,ПомещаетсяНаПолке)

ЗаписьМинОст=РегистрыСведений.МинимальныеОстатки.СоздатьМенеджерЗаписи();

ЗаписьМинОст.Номенклатура=Товар;

ЗаписьМинОст.Склад=Куда;

ЗаписьМинОст.МинимальныйОстаток=МинОст;

ЗаписьМинОст.ПомещаетсяНаПолке=ПомещаетсяНаПолке;

ЗаписьМинОст.Записать();

КонецПроцедуры

Процедура ЗаполнитьМинимальныеОстатки()

Для Каждого Выборка Из Ресурсы Цикл

Если Выборка.МинимальныйОстаток<>Выборка.МинимальныйОстатокНовый Тогда

УстановитьРегистрМинимальныеОстатки(Выборка.Номенклатура,Выборка.МинимальныйОстатокНовый,Выборка.ПомещаетсяНаПолке);

КонецЕсли;

КонецЦикла;

КонецПроцедуры

Процедура ЗаполнитьПомещаетсяНаПолке()

Для Каждого Выборка Из Ресурсы Цикл

УстановитьРегистрМинимальныеОстатки(Выборка.Номенклатура,Выборка.МинимальныйОстаток,Выборка.ПомещаетсяНаПолке);

КонецЦикла;

КонецПроцедуры

Функция ПолучитьПомещаетсяНаПолке(Товар)

РегМинОст=РегистрыСведений.МинимальныеОстатки;

Отбор=Новый Структура(«Номенклатура,Склад»,Товар,Куда);

РесурсыРегистра=РегМинОст.Получить(Отбор);

ПомещаетсяНаПолке=РесурсыРегистра.ПомещаетсяНаПолке;

Возврат ПомещаетсяНаПолке;

КонецФункции

Функция ПолучитьМинимальныйОстаток(Товар)

РегМинОст=РегистрыСведений.МинимальныеОстатки;

Отбор=Новый Структура(«Номенклатура,Склад»,Товар,Куда);

РесурсыРегистра=РегМинОст.Получить(Отбор);

МинимальныйОстаток=РесурсыРегистра.МинимальныйОстаток;

Возврат МинимальныйОстаток;

КонецФункции

Процедура КнопкаУстановитьФлажкиНажатие(Элемент)

Спс.ЗаполнитьПометки(Истина);

КонецПроцедуры

Процедура КнопкаСнятьФлажкиНажатие(Элемент)

Спс.ЗаполнитьПометки(Ложь);

КонецПроцедуры

Процедура ПриОткрытии()

ДлинаПериода=1;

Если ЭтоНовый() Тогда // проверить объект на то, что он еще не внесен в ИБ

КоличествоПериодов=15;

ДатаКонца=ТекущаяДата();

ДатаКонцаПриИзменении(««);

Откуда=Справочники.Склады.НайтиПоНаименованию(«Главный склад»);

Куда=Справочники.Склады.НайтиПоНаименованию(«Народный»);

Организация=ПолучитьОсновнуюОрганизацию(глЗначениеПеременной

(«глТекущийПользователь»));

КонецЕсли;

Если Ресурсы.Количество()>0 Тогда

СписокГрупп=Новый СписокЗначений;

Для Каждого Выборка Из Ресурсы Цикл

Если СписокГрупп.НайтиПоЗначению(Выборка.Номенклатура.Родитель.Код)=Неопределено Тогда

СписокГрупп.Добавить(Выборка.Номенклатура.Родитель.Код);

КонецЕсли;

КонецЦикла;

КонецЕсли;

Запрос=Новый Запрос;

Запрос.Текст=«ВЫБРАТЬ

| Номенклатура.Ссылка,

| Номенклатура.ЭтоГруппа

|ИЗ

| Справочник.Номенклатура КАК Номенклатура

|ГДЕ

| Номенклатура.ЭтоГруппа = &ЭтоГруппа

|

|УПОРЯДОЧИТЬ ПО

| Номенклатура.Наименование»;

Запрос.УстановитьПараметр(«ЭтоГруппа»,Истина);

Результат=Запрос.Выполнить();

Выборка=Результат.Выбрать();

Пока Выборка.Следующий() Цикл

Если Не Выборка.Ссылка.Родитель.Пустая() Тогда

Продолжить;

КонецЕсли;

ИмеетсяВСпискеГрупп=Ложь;

Если Ресурсы.Количество()>0 Тогда

Если СписокГрупп.НайтиПоЗначению(Выборка.Ссылка.Код)<>Неопределено Тогда

ИмеетсяВСпискеГрупп=Истина;

КонецЕсли;

КонецЕсли;

Спс.Добавить(Выборка.Ссылка,,ИмеетсяВСпискеГрупп);

КонецЦикла;

КонецПроцедуры

Процедура СпсВыбор(Элемент, ЭлементСписка)

ЭлементСписка.Пометка=Не ЭлементСписка.Пометка;

КонецПроцедуры

Процедура Кнопка1Нажатие(Элемент)

Если Ресурсы.Количество()>0 Тогда

Режим = РежимДиалогаВопрос.ДаНет;

Ответ = Вопрос(«Табличная часть будет очищена, продолжить?», Режим, 0);

Если Ответ = КодВозвратаДиалога.Нет Тогда

Возврат;

КонецЕсли;

КонецЕсли;

Если Откуда.Пустая() Тогда

Предупреждение(«Нужно выбрать склад откуда»);

Возврат;

КонецЕсли;

Если Куда.Пустая() Тогда

Предупреждение(«Нужно выбрать склад куда»);

Возврат;

КонецЕсли;

ВыбГруппы=Новый СписокЗначений;

Для Каждого ТекГруппа Из Спс Цикл

Если ТекГруппа.Пометка Тогда

ВыбГруппы.Добавить(ТекГруппа.Значение);

КонецЕсли;

КонецЦикла;

Если ВыбГруппы.Количество()=0 Тогда

Предупреждение(«Нужно выбрать хотя бы одну группу»);

Возврат;

КонецЕсли;

Если ДатаКонца=Дата(1,1,1) Тогда

Предупреждение(«Нужно определить конечную дату»);

Возврат;

КонецЕсли;

Ресурсы.Очистить();

Табл=Новый ТаблицаЗначений;

Запрос=Новый Запрос;

Запрос.Текст=«ВЫБРАТЬ

| Номенклатура.Ссылка,

| Номенклатура.ЭтоГруппа

|ИЗ

| Справочник.Номенклатура КАК Номенклатура

|ГДЕ

| НЕ Номенклатура.ЭтоГруппа

| И Номенклатура.Ссылка В ИЕРАРХИИ(&ВыбГруппы)»;

Запрос.УстановитьПараметр(«ВыбГруппы»,ВыбГруппы);

Результат=Запрос.Выполнить();

ТаблицаНоменклатуры=Результат.Выгрузить();

МассивНоменклатуры=ТаблицаНоменклатуры.ВыгрузитьКолонку(«Ссылка»);

Запрос1=Новый Запрос;

Запрос1.Текст=«ВЫБРАТЬ

| РеализацияТоваровУслугТовары.Ссылка,

| РеализацияТоваровУслугТовары.Номенклатура,

| РеализацияТоваровУслугТовары.Количество,

| РеализацияТоваровУслугТовары.Ссылка.Дата,

| РеализацияТоваровУслугТовары.Ссылка.Проведен,

| РеализацияТоваровУслугТовары.Ссылка.Склад

|ИЗ

| Документ.РеализацияТоваровУслуг.Товары КАК РеализацияТоваровУслугТовары

|ГДЕ

| РеализацияТоваровУслугТовары.Ссылка.Проведен

| И РеализацияТоваровУслугТовары.Ссылка.Склад = &Склад

| И РеализацияТоваровУслугТовары.Номенклатура В(&МассивНоменклатуры)

| И РеализацияТоваровУслугТовары.Ссылка.Дата МЕЖДУ &ДатаНачала И &ДатаКонца»;

Запрос1.УстановитьПараметр(«Склад»,Куда);

Запрос1.УстановитьПараметр(«МассивНоменклатуры»,МассивНоменклатуры);

Запрос1.УстановитьПараметр(«ДатаНачала»,ДатаНачала);

Запрос1.УстановитьПараметр(«ДатаКонца»,ДатаКонца);

Результат1=Запрос1.Выполнить();

Выборка=Результат.Выбрать();

Выборка1=Результат1.Выбрать();

Табл.Колонки.Добавить(«НомерСтроки»);

Для инд=1 По КоличествоПериодов Цикл

Табл.Колонки.Добавить();

КонецЦикла;

НомСтр=0;

Пока Выборка.Следующий() Цикл

НоваяСтрока=Ресурсы.Добавить();

НомСтр=НомСтр+1;

НоваяСтрока.Номенклатура=Выборка.Ссылка;

НоваяСтрока.МинимальныйОстаток=ПолучитьМинимальныйОстаток(Выборка.Ссылка);

НоваяСтрока.ПомещаетсяНаПолке=ПолучитьПомещаетсяНаПолке(Выборка.Ссылка);

НоваяСтрока.МинимальныйОстатокНовый=0;

НоваяСтрокаТабл=Табл.Добавить();

НоваяСтрокаТабл.НомерСтроки=НоваяСтрока.НомерСтроки;

Для инд=1 По КоличествоПериодов Цикл

НоваяСтрокаТабл[инд]=0;

КонецЦикла;

Выборка1.Сбросить();

СтруктураПоиска=Новый Структура(«Номенклатура»);

СтруктураПоиска.Номенклатура=Выборка.Ссылка;

Пока Выборка1.НайтиСледующий(СтруктураПоиска) Цикл

ДатаДокумента=Выборка1.Дата;

НомерПериода=Цел((ДатаДокумента-ДатаНачала)/86400/ДлинаПериода)+1;

СтрокаТабл=Табл[НомСтр-1];

СтрокаТабл[НомерПериода]=СтрокаТабл[НомерПериода]+Выборка1.Количество;

КонецЦикла;

КонецЦикла;

НомСтр=0;

Для Каждого Выборка Из Ресурсы Цикл

НомСтр=НомСтр+1;

Максимальное=0;

Для инд=1 По КоличествоПериодов Цикл

СтрокаТабл=Табл[НомСтр-1];

Если СтрокаТабл[инд]>Максимальное Тогда

Максимальное=СтрокаТабл[инд];

КонецЕсли;

КонецЦикла;

Выборка.МинимальныйОстатокНовый=Максимальное;

КонецЦикла;

КонецПроцедуры

Процедура Кнопка2Нажатие(Элемент)

ЗаполнитьМинимальныеОстатки();

КонецПроцедуры

Процедура Кнопка3Нажатие(Элемент)

Если Ресурсы.Количество()>0 Тогда

Режим = РежимДиалогаВопрос.ДаНет;

Ответ = Вопрос(«Табличная часть будет очищена, продолжить?», Режим, 0);

Если Ответ = КодВозвратаДиалога.Нет Тогда

Возврат;

КонецЕсли;

КонецЕсли;

ВыбГруппы=Новый СписокЗначений;

Для Каждого ТекГруппа Из Спс Цикл

Если ТекГруппа.Пометка Тогда

ВыбГруппы.Добавить(ТекГруппа.Значение);

КонецЕсли;

КонецЦикла;

Если ВыбГруппы.Количество()=0 Тогда

Предупреждение(«Нужно выбрать хотя бы одну группу»);

Возврат;

КонецЕсли;

Ресурсы.Очистить();

Табл=Новый ТаблицаЗначений;

Запрос=Новый Запрос;

Запрос.Текст=«ВЫБРАТЬ

| Номенклатура.Ссылка,

| Номенклатура.ЭтоГруппа

|ИЗ

| Справочник.Номенклатура КАК Номенклатура

|ГДЕ

| Номенклатура.ЭтоГруппа = &ЭтоГруппа

| И Номенклатура.Ссылка В ИЕРАРХИИ(&СписокГрупп)»;

Запрос.УстановитьПараметр(«ЭтоГруппа»,Ложь);

Запрос.УстановитьПараметр(«СписокГрупп»,ВыбГруппы);

Результат=Запрос.Выполнить();

Выборка=Результат.Выбрать();

Пока Выборка.Следующий() Цикл

НоваяСтрока=Ресурсы.Добавить();

НоваяСтрока.Номенклатура=Выборка.Ссылка;

НоваяСтрока.МинимальныйОстаток=ПолучитьМинимальныйОстаток(Выборка.Ссылка);

НоваяСтрока.ПомещаетсяНаПолке=ПолучитьПомещаетсяНаПолке(Выборка.Ссылка);

КонецЦикла;

КонецПроцедуры

Процедура Кнопка4Нажатие(Элемент)

ЗаполнитьПомещаетсяНаПолке();

КонецПроцедуры

Процедура ДатаКонцаПриИзменении(Элемент)

Если КоличествоПериодов>15 Тогда

Предупреждение(«Количество периодов должно быть не более 15»);

КоличествоПериодов=15;

КонецЕсли;

ДатаНачала=ДатаКонца-(ДлинаПериода*КоличествоПериодов-1)*86400;

КонецПроцедуры

Процедура ОсновныеДействияФормыДействие(Кнопка)

ТабДок=Новый ТабличныйДокумент;

Отчет(ТабДок);

КонецПроцедуры

Процедура Отчет(ТабДок) Экспорт

//{{КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ(Отчет)

// Данный фрагмент построен конструктором.

// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!

Макет = Документы.УстановкаМинимальныхОстатков.ПолучитьМакет(«Отчет»);

Запрос = Новый Запрос;

Запрос.Текст =

«ВЫБРАТЬ

| УстановкаМинимальныхОстатков.Дата,

| УстановкаМинимальныхОстатков.ДатаНачала,

| УстановкаМинимальныхОстатков.ДатаКонца,

| УстановкаМинимальныхОстатков.Откуда,

| ПРЕДСТАВЛЕНИЕ(УстановкаМинимальныхОстатков.Откуда),

| УстановкаМинимальныхОстатков.Куда,

| ПРЕДСТАВЛЕНИЕ(УстановкаМинимальныхОстатков.Куда),

| УстановкаМинимальныхОстатков.КоличествоПериодов,

| УстановкаМинимальныхОстатков.Ресурсы.(

| Номенклатура,

| ПРЕДСТАВЛЕНИЕ(УстановкаМинимальныхОстатков.Ресурсы.Номенклатура),

| МинимальныйОстаток,

| МинимальныйОстатокНовый,

| ПомещаетсяНаПолке

| )

|ИЗ

| Документ.УстановкаМинимальныхОстатков КАК УстановкаМинимальныхОстатков

|ГДЕ

| УстановкаМинимальныхОстатков.Ссылка = &Ссылка»;

Запрос.УстановитьПараметр(«Ссылка»,Ссылка);

Результат = Запрос.Выполнить();

ОбластьЗаголовок = Макет.ПолучитьОбласть(«Заголовок»);

ОбластьПодвал = Макет.ПолучитьОбласть(«Подвал»);

ОбластьШапкаТаблицы = Макет.ПолучитьОбласть(«ШапкаТаблицы»);

ОбластьПодвалТаблицы = Макет.ПолучитьОбласть(«ПодвалТаблицы»);

ОбластьДетальныхЗаписей = Макет.ПолучитьОбласть(«Детали»);

РесурсыОбластьШапкаТаблицы = Макет.ПолучитьОбласть(«РесурсыШапкаТаблицы»);

РесурсыОбластьПодвалТаблицы = Макет.ПолучитьОбласть(«РесурсыПодвалТаблицы»);

РесурсыОбластьДетальныхЗаписей = Макет.ПолучитьОбласть(«РесурсыДетали»);

ТабДок.Очистить();

ТабДок.Вывести(ОбластьЗаголовок);

ТабДок.Вывести(ОбластьШапкаТаблицы);

ТабДок.НачатьАвтогруппировкуСтрок();

ВыборкаДетали = Результат.Выбрать();

Пока ВыборкаДетали.Следующий() Цикл

ОбластьДетальныхЗаписей.Параметры.Заполнить(ВыборкаДетали);

ТабДок.Вывести(ОбластьДетальныхЗаписей, ВыборкаДетали.Уровень());

ТабДок.НачатьГруппуСтрок();

ТабДок.Вывести(РесурсыОбластьШапкаТаблицы);

ТабДок.НачатьАвтогруппировкуСтрок();

РесурсыВыборкаДетали = ВыборкаДетали.Ресурсы.Выбрать();

Пока РесурсыВыборкаДетали.Следующий() Цикл

РесурсыОбластьДетальныхЗаписей.Параметры.Заполнить(РесурсыВыборкаДетали);

ТабДок.Вывести(РесурсыОбластьДетальныхЗаписей, РесурсыВыборкаДетали.Уровень());

КонецЦикла;

ТабДок.ЗакончитьАвтогруппировкуСтрок();

ТабДок.Вывести(РесурсыОбластьПодвалТаблицы);

ТабДок.ЗакончитьГруппуСтрок();

КонецЦикла;

ТабДок.ЗакончитьАвтогруппировкуСтрок();

ТабДок.Вывести(ОбластьПодвалТаблицы);

ТабДок.Вывести(ОбластьПодвал);

ТабДок.Показать();

//}}КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ

КонецПроцедуры

Процедура ОрганизацияПриИзменении(Элемент)

//УстановитьНомерДокумента(ЭтотОбъект);

КонецПроцедуры

Процедура РесурсыПриПолученииДанных(Элемент, ОформленияСтрок)

Для Каждого Строка из ОформленияСтрок Цикл

Строка.Ячейки.Главный.Значение=ПолучитьОстаток(Строка.Ячейки.Номенклатура.Значение,Откуда,

ТекущаяДата());

Строка.Ячейки.Народный.Значение=ПолучитьОстаток(Строка.Ячейки.Номенклатура.Значение,Куда,

ТекущаяДата());

Строка.Ячейки.КолВоВУпаковке.Значение=ПолучитьЕдиницуИзмерения

(Строка.Ячейки.Номенклатура.Значение);

Если Табл.Количество()>0 Тогда

НомерСтрокиВТабл=Строка.Ячейки.НомерСтроки.Значение-1;

Если НомерСтрокиВТабл=Неопределено Тогда

Возврат;

КонецЕсли;

Для инд=1 По Табл.Колонки.Количество()-1 Цикл

Строка.Ячейки[«К»+инд].Значение=Табл[НомерСтрокиВТабл][инд];

КонецЦикла;

КонецЕсли;

КонецЦикла;

КонецПроцедуры

Процедура РесурсыПередУдалением(Элемент, Отказ)

Табл.Удалить(Элемент.ТекущаяСтрока.НомерСтроки-1);

КонецПроцедуры

Табл=Новый ТаблицаЗначений;

Приложение В

(справочное)

Исходный код отчета «ЗаказНаНеделю»

Перем СпсИндекс;

Перем МинимальныйОстатокРасчетный;

Перем ПомещаетсяНаПолке;

Функция ПолучитьОстатокНаСкладе(Товар,Склад)

Остаток=0;

Отбор=Новый Структура;

Если Не Склад=Неопределено Тогда

Отбор.Вставить(«Склад»,Склад);

КонецЕСли;

Отбор.Вставить(«Номенклатура»,Товар);

ТабОстатков=РегистрыНакопления.ТоварыНаСкладах.Остатки(,Отбор,»Номенклатура»,»Количество»);

Если ТабОстатков.Количество()>0 Тогда

Если ТабОстатков.Количество()>1 Тогда

ТабОстатков.Свернуть(«Номенклатура»,»Количество»);

КонецЕсли;

Остаток=ТабОстатков.Получить(0).Количество;

КонецЕсли;

Возврат Остаток;

КонецФункции

Функция ПолучитьРезерв(Товар,Склад)

Остаток=0;

Отбор=Новый Структура;

Если Не Склад=Неопределено Тогда

Отбор.Вставить(«Склад»,Склад);

КонецЕСли;

Отбор.Вставить(«Номенклатура»,Товар);

ТабОстатков=РегистрыНакопления.ТоварыВРезервеНаСкладах.Остатки(ТекущаяДата(),Отбор,»Номенклатура»,»Количество»);

Если ТабОстатков.Количество()>0 Тогда

Остаток=ТабОстатков.Получить(0).Количество;

КонецЕсли;

Возврат Остаток;

КонецФункции

Процедура ДобавитьДокумент(Парам)

Форма=Документы.ВнутреннийЗаказ.ПолучитьФормуВыбора(,ЭтаФорма);

Если Парам=1 Тогда

Форма.РежимВыбора = Истина;

Форма.ЗакрыватьПриВыборе=Ложь;

КонецЕсли;

Форма.Открыть();

КонецПроцедуры

Процедура ОбработкаВыбора(ЗначениеВыбора,Источник)

Если ЗначениеВыбора<>Неопределено Тогда

Спс.Добавить(ЗначениеВыбора);

КонецЕсли;

КонецПроцедуры

Процедура УдалитьДокумент(Элемент)

Если СпсИндекс<>Неопределено Тогда

Спс.Удалить(СпсИндекс);

КонецЕсли;

КонецПроцедуры

Процедура УдалитьДокументы(Элемент)

Спс.Очистить();

КонецПроцедуры

Функция Окр1(Требуется,Коэф)

Если Требуется=0 Тогда

Возврат 0;

КонецЕсли;

Округл=Окр(Требуется/Коэф);

Возврат Округл;

КонецФункции

Процедура ПолучитьРесурсы(Товар,МинимальныйОстаток,ПомещаетсяНаПолке)

РегМинОст=РегистрыСведений.МинимальныеОстатки;

Отбор=Новый Структура(«Номенклатура,Склад»,Товар,Куда);

Ресурсы=РегМинОст.Получить(Отбор);

МинимальныйОстаток=Ресурсы.МинимальныйОстаток;

ПомещаетсяНаПолке=Ресурсы.ПомещаетсяНаПолке;

КонецПроцедуры

Процедура КнопкаСформироватьНажатие(Кнопка)

ВыбТовар=Новый СписокЗначений;

Для Каждого ЭлСпс Из СписокГрупп Цикл

Если ЭлСпс.Пометка Тогда

ВыбТовар.Добавить(ЭлСпс.Значение);

КонецЕсли;

КонецЦикла;

Если ВыбТовар.Количество()=0 Тогда

Предупреждение(«Нужно выбрать хотя бы одну группу»);

Возврат;

КонецЕсли;

Если Спс.Количество()>0 Тогда

Запрос=Новый Запрос;

ТекстЗапроса=«ВЫБРАТЬ

| ВнутреннийЗаказТовары.Номенклатура КАК Номенклатура,

| СУММА(ВнутреннийЗаказТовары.Количество) КАК Количество

|ИЗ

| Документ.ВнутреннийЗаказ.Товары КАК ВнутреннийЗаказТовары

|ГДЕ

| ВнутреннийЗаказТовары.Ссылка В(&Спс)

| И ВнутреннийЗаказТовары.Номенклатура В ИЕРАРХИИ(&ВыбТовар)

|

|СГРУППИРОВАТЬ ПО

| ВнутреннийЗаказТовары.Номенклатура»;

Запрос.УстановитьПараметр(«Спс»,Спс);

Запрос.УстановитьПараметр(«ВыбТовар»,ВыбТовар);

Запрос.Текст=ТекстЗапроса;

Результат=Запрос.Выполнить();

Табл=Результат.Выгрузить();

КонецЕсли;

Запрос= Новый Запрос;

ТекстЗапроса=«ВЫБРАТЬ

| Номенклатура.Ссылка

|ИЗ

| Справочник.Номенклатура КАК Номенклатура

|ГДЕ

| Номенклатура.ЭтоГруппа = &Ложь

| И Номенклатура.Ссылка В ИЕРАРХИИ(&ВыбТовар)»;

Запрос.УстановитьПараметр(«Ложь»,Ложь);

Запрос.УстановитьПараметр(«ВыбТовар»,ВыбТовар);

Запрос.Текст=ТекстЗапроса;

Результат=Запрос.Выполнить();

Док=Документы.ВнутреннийЗаказ.СоздатьДокумент();

Док.Организация=ПолучитьОсновнуюОрганизацию(глЗначениеПеременной(«глТекущийПользователь»));;

Док.Ответственный=глЗначениеПеременной(«глТекущийПользователь»);

Док.Дата=ТекущаяДата();

Док.УстановитьНовыйНомер();

Док.Заказчик=Куда;

Выборка=Результат.Выбрать();

Пока Выборка.Следующий() Цикл

Товар=Выборка.Ссылка;

УжеПеремещено=0;

Если Спс.Количество()>0 Тогда

НайденнаяСтрока=Табл.Найти(Товар,»Номенклатура»);

Если НайденнаяСтрока<>Неопределено Тогда

УжеПеремещено=НайденнаяСтрока.Количество;

КонецЕсли;

КонецЕсли;

ОстатокКуда=ПолучитьОстатокНаСкладе(Товар,Куда)+УжеПеремещено;

ПолучитьРесурсы(Товар,МинимальныйОстатокРасчетный,ПомещаетсяНаПолке);

Если УчитыватьРезерв Тогда

ОстатокКуда=ОстатокКуда-ПолучитьРезерв(Товар,Куда);

КонецЕсли;

Если ОперативныйЗаказ Тогда

Если ОстатокКуда>=МинимальныйОстатокРасчетный * 0.3 Тогда

Продолжить;

КонецЕсли;

КонецЕсли;

ОстатокОткуда=ПолучитьОстатокНаСкладе(Товар,Откуда);

Если УчитыватьРезерв Тогда

ОстатокОткуда=ОстатокОткуда-ПолучитьРезерв(Товар,Откуда);

КонецЕсли;

Если Не ВключатьНулевыеПозиции Тогда

Если ОстатокОткуда<=0 Тогда

Продолжить;

КонецЕсли;

КонецЕсли;

ДолжноБыть=Макс(МинимальныйОстатокРасчетный,ПомещаетсяНаПолке);

ТребуетсяПереместитьВШтуках=ДолжноБыть-ОстатокКуда;

Если (ОстатокОткуда>0) и (ОстатокКуда=0) и (МинимальныйОстатокРасчетный=0) Тогда

ТребуетсяПереместитьВШтуках=1;

КонецЕсли;

Если ТребуетсяПереместитьВШтуках>0 Тогда

НовСтр=Док.Товары.Добавить();

НовСтр.Номенклатура=Товар;

НовСтр.Размещение=Откуда;

НовСтр.ЕдиницаИзмерения=Товар.ЕдиницаХраненияОстатков;

НовСтр.Коэффициент=Товар.ЕдиницаХраненияОстатков.Коэффициент;

НовСтр.Затребовано=ТребуетсяПереместитьВШтуках;

КолВоВУпаковке=ПолучитьЕдиницуИзмерения(Товар);

ПотребностьВУпаковках=Окр1(ТребуетсяПереместитьВШтуках,КолВоВУпаковке);

ПотребностьВШтуках=ПотребностьВУпаковках * КолВоВУпаковке;

Если ОстатокКуда<МинимальныйОстатокРасчетный Тогда

Если ОстатокОткуда>=ПотребностьВШтуках Тогда

НовСтр.Количество=ПотребностьВШтуках;

Иначе

НовСтр.Количество=ОстатокОткуда;

КонецЕсли;

Иначе

Если ПотребностьВШтуках+ОстатокКуда<=ПомещаетсяНаПолке Тогда

СвободныйОстаток=ПомещаетсяНаПолке-МинимальныйОстатокРасчетный;

Если СвободныйОстаток>0 Тогда

Если ПотребностьВШтуках / СвободныйОстаток > 0.5 Тогда

Если ОстатокОткуда>=ПотребностьВШтуках Тогда

НовСтр.Количество=ПотребностьВШтуках;

Иначе

НовСтр.Количество=ОстатокОткуда;

КонецЕсли;

КонецЕсли;

КонецЕсли;

КонецЕсли;

КонецЕсли;

Если (ОстатокКуда=0) и (МинимальныйОстатокРасчетный=0) Тогда

НовСтр.Затребовано=ПотребностьВШтуках;

Если ОстатокОткуда>=ПотребностьВШтуках Тогда

НовСтр.Количество=ПотребностьВШтуках;

Иначе

НовСтр.Количество=ОстатокОткуда;

КонецЕсли;

КонецЕсли;

КонецЕсли;

КонецЦикла;

Если Док.Товары.Количество()>0 Тогда

Док.Записать();

Док.ПолучитьФорму().Открыть();

КонецЕсли;

КонецПроцедуры

Процедура Кнопка1Нажатие(Элемент)

ДобавитьДокумент(0);

КонецПроцедуры

Процедура Кнопка2Нажатие(Элемент)

ДобавитьДокумент(1);

КонецПроцедуры

Процедура СпсПриАктивизацииСтроки(Элемент)

Если Элемент.ТекущаяСтрока<>Неопределено Тогда

СпсИндекс=Спс.Индекс(Элемент.ТекущаяСтрока);

Иначе

СпсИндекс=Неопределено;

КонецЕсли;

КонецПроцедуры

Процедура ПриОткрытии()

Откуда=Справочники.Склады.НайтиПоНаименованию(«Главный склад»);

Куда=Справочники.Склады.НайтиПоНаименованию(«Народный»);

Запрос=Новый Запрос;

Запрос.Текст=«ВЫБРАТЬ

| Номенклатура.Ссылка,

| Номенклатура.ЭтоГруппа

|ИЗ

| Справочник.Номенклатура КАК Номенклатура

|ГДЕ

| Номенклатура.ЭтоГруппа = &ЭтоГруппа

|

|УПОРЯДОЧИТЬ ПО

| Номенклатура.Наименование»;

Запрос.УстановитьПараметр(«ЭтоГруппа»,Истина);

Результат=Запрос.Выполнить();

Выборка=Результат.Выбрать();

Пока Выборка.Следующий() Цикл

Если Выборка.Ссылка.Родитель.Пустая() Тогда

СписокГрупп.Добавить(Выборка.Ссылка,,Ложь);

КонецЕсли;

КонецЦикла;

УчитыватьРезерв=Истина;

КонецПроцедуры

Процедура СписокГруппВыбор(Элемент, ЭлементСписка)

ЭлементСписка.Пометка=Не ЭлементСписка.Пометка;