Автоматизация процесса складского учета в ООО "Альянс-Трейд"

Стандарт MSF (Microsoft Solutions Framework) [31] - это набор принципов и правил деятельности, в некоторой степени ориентированный на проекты разработки программного обеспечения и развития информационной инфраструктуры.

Стандарт RUP (Rational Unified Process) - методология разработки программного обеспечения, созданная компанией Rational Software.

RUP (Rational Unified Process) в значительной степени соответствует стандартам и нормативным документам, связанным с процессами ЖЦ ПО и оценкой технологической зрелости организаций-разработчиков (ISO 12207, ISO 9000, CMM и др.) [24].

Стандарт COBIT [25] - определяет набор универсальных задач управления ИТ. Основная ценность COBIT заключается в том, что он предлагает модель, обеспечивающую взаимосвязь между бизнес-целями и ИТ-процессами.

Методология управления, контроля и аудита информационных систем разработана Международной ассоциацией аудита и контроля за информационными системами (ISACA) и позволяет:

· Построить работу службы ИТ на процессной основе;

· Организовать мониторинг работы службы ИТ, привязанный к целям и задачам бизнеса;

· Осуществить ИТ-аудит и сравнение уровня развития ИТ с другими предприятиями отрасли.

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

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

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

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

Детальным тестом называют заключительный этап аудита, целью которого является оценка и обоснование рисков невыполнения задач управления путем использования аналитических методов и экспертных оценок. Его конечная цель -- побудить руководство к выполнению корректирующих действий для улучшения состояния системы управления ИТ. На данном этапе аудитор производит документирование недостатков механизмов управления, угроз и уязвимостей, являющихся следствием этих недостатков, реальных и потенциальных последствий реализации угроз путем причинно-следственного анализа и проведения сравнительного тестирования [25].

Методика Oracle CDM [26] является развитием CASE-технологий.

Методика Oracle CDM выделяет следующие процессы, протекающие на протяжении жизненного цикла информационной системы:

1) определение производственных требований;

2) исследование существующих систем;

3) определение технической архитектуры;

4) проектирование и построение базы данных;

5) проектирование и реализация модулей;

6) конвертирование данных;

7) тестирование;

8) обучение;

9) переход к новой системе;

10) подтверждение и сопровождение.

Для разрабатываемого дополнительного программного модуля больше подходит стандарт ISO/IEC 12207 и ГОСТ 34.601-90 [30]. Эти стандарты имеют набор процессов, действий и задач, охватывающий наиболее широкий спектр возможных ситуаций при максимальной адаптируемости. Стандарт содержит предельно мало описаний, направленных на проектирование БД.

2.1.2 Ожидаемые риски на этапах жизненного цикла и их описание

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

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

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

Собственный и предельный (marginal) риски.

Классификация оценок рисков операции, финансового инструмента вне и внутри некоторой деятельности, портфеля.

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

Предельный риск - величина, на которую изменится оценка риска деятельности, портфеля в целом при добавлении в них оцениваемой операции или финансового инструмента. Например, в случае если отдельная операция по покупке акций РАО “ЕЭС” [33] приносит с собой рыночный риск, связанный с возможной неблагоприятной переоценкой приобретаемых акций, то та же операция при добавлении к портфелю, с короткой позицией по РАО “ЕЭС” снизит показатели рыночного риска портфеля. Из данного примера следует также, что предельный риск может быть отрицательной величиной. При осуществлении процедур управления рисками именно предельный риск представляет наибольший интерес, однако получение его технически более сложно, чем получение собственного риска.

Статический и динамический риски.

Классификация рисков с точки зрения их значимости для организации.

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

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

Систематический и несистематический риски.

Классификация рисков с точки их отображения в модели рисков.

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

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

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

2.2 Информационное обеспечение задачи

2.2.1 Информационная модель формирования заказа и ее описание

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

Схема информационной модели формирования заказа представлена на рисунке 4.



Рис. 4. Информационная модель формирования заявки

Методика разработки информационной модели предполагает моделирование:

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

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

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

К условно-постоянной относятся сведения, практически неизменные в течение длительного периода (меняется очень редко и поэтому не требует наличия отдельных справочников). Она включает группы: нормативно-справочной информации и научно-справочной информации. Ниже на рисунке 5 приведен пример условно-постоянной информации.

Условно-постоянная информация задачи регистрация заявок в “1С: Предприятие” представлена следующими справочниками:

- справочник товаров (Тип товара, полное наименование, вид номенклатуры, единица измерения, себестоимость, цена, валюта, ставка НДС, ставка НП, страна происхождения, штук в упаковке, ID);

- справочник контрагентов (Вид контрагента, полное наименование, юридический адрес, почтовый адрес, телефон, ИНН, документ серия, номер, кем выдан, дата выдачи, основной договор, основной счет, ОКПО);

- справочник складов;

- справочник расчетных счетов (Номер, банк организации, банк для расчетов, корреспондент, назначение, корреспондент ИНН, корреспондент КПП, всегда указывать КПП).

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

Примеры переменой информации приведены в приложении 2.

2.2.2 Используемые классификаторы и системы кодирования

При решении задачи работы с заявками используется ряд классификаторов и кодов.

Классификамтор, или классификационная схема (от лат. Classis -- разряд и facere -- делать) -- систематизированный перечень наименований объектов, каждому из которых в соответствие дан уникальный код. Классификация объектов производится согласно правилам распределения заданного множества объектов на подмножества (классификационные группировки) в соответствии с установленными признаками их различия или сходства. Применяется в Автоматизированных системах управления и обработке информации. Классификатор является стандартным кодовым языком документов, финансовых отчётов и автоматизированных систем.

Классификаторы разрабатываются как на уровне отдельных предприятий (организаций), так и на уровне государств. Существуют следующие уровни классификаторов:

· международные -- стандартные классификаторы, используемые по всему миру;

· межгосударственные -- классификаторы, используемые в рамках экономических союзов и других межгосударственных объединений: например, классификаторы используемые в ЕС, СНГ и т. д.

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

· отраслевые -- классификаторы, используемые в рамках одной отрасли;

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

Ниже приведена таблица 2, в которой показан перечень обозначений видов классификаторов и краткое обозначение

Таблица 2

Перечень обозначений видов классификаторов

Вид классификатора	Краткое обозначение
Международный	М
Общегосударственный	ОГ
Отраслевой	О
Локальный	Л

Под кодированием понимается присвоение кода классификационной группировке или объекту классификации. Кодирование предназначено для формализованного описания наименований различных аспектов данных. Обычно кодирование представляет собой процесс обозначения исходного множества объектов или сообщений набором символов заданного алфавита на основе совокупности определенных правил. Краткие обозначения систем кодирования представлены в таблице 3.

Таблица 3

Перечень обозначений системы кодирования

Система кодирования	Краткое обозначение
Порядковая	П
Серийно-порядковая	СП
Разрядная (параллельная)	Р
Комбинированная (последовательная)	К

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

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

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

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

Таблица 4

Используемы классификаторы и коды

№ п/п	Наименование объекта кодируемого множества	Значимость кода	Система кодирования	Вид классификатора	Список кодов из кодир. Или пример много кода множества
					Код	Значение
1	Код заявки	13	Р	Л	19990604/10/1	19990604-дата регистрации заявки 10-номер заявки за день 1-код отрасли права
2	Код отрасли права	1	П	Л	1-9	Порядковые номера отраслей права
3	Код клиента	5	П	Л	00001-99999	Порядковые номера клиентов
4	Код вида работ	2	П	Л	01-99	Порядковые номера вида работы
5	Код срока выполнения заявки	2	П	Л	01-99	Порядковые номера сроков выполнения работ
6	ИНН организации	10	Р	ОГ	7730006009	77-код города 30-номер налоговой инспекции 006009-порядковый номер организации

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

2.2.3 Характеристика входной и оперативной информации

Под входной информацией понимается вся информация, необходимая для решения задачи и расположенная на различных носителях: первичных документах, машинных носителях, в памяти персонального компьютера. С этой целью составляются перечень входной информации и состав реквизитов каждого вида входной информации, расположение реквизитов входной информации, описание полей (реквизитов) входных документов. Все хозяйственные операции в ООО “Альянс-Трейд” фиксируются в памяти ЭВМ и в специальном журнале регистрации первичных документов.

Входная оперативная информация представляет собой заполнение и ввод в базу данных экранных форм первичных документов по продаже товаров.

В качестве входной информации, используется:

· справочная информация и классификаторы;

· подробное описание предметов;

· акты приема/передачи/выдачи;

· изображения предметов.

Заявка на поставку формируется на основе текущих складских остатков.

Входные документы в экранной форме представлены в приложении 2.

2.2.4 Характеристика результатной информации

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

В результате проделанной работы был написан модуль “Формирование заказа на поставку”.

Ниже на рисунке 8 показано окно как оно выглядит при заполнении заказа.

При нажатие кнопки товар выбирается из справочника номенклатура (см. рис. 9)

При нажатие кнопки товар выбирается из справочника Прайс-лист (см. рис. 10)

Заказ на поставку не является обязательным документом при оформлении товародвижения. Он нужен для фиксации предварительной договоренности о приобретении у поставщика товара, и может являться документом, на основании которого производится оплата и получение товара. Товар, по которому оформлен заказ на поставку, учитывается, как ожидаемый товар. Количество ожидаемого товара можно посмотреть в отчете «Заказы товаров». На рисунке 11 показано электронная форма основного фильтра по которому можно посмотреть отчет заказа товара.

На рисунке 12 показан в электроном виде окно, множественный фильтр, в котором можно вывести отчет по разным параметрам, которые интересуют.

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

Документ Заказ может быть заполнен ручным способом: путем построчного ввода, подбором или по прайс-листу.

На основании заказа на поставку могут быть выписаны следующие подчиненные документы:

«Расходный кассовый ордер» - для фиксации наличной оплаты по заказу.

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

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

«Заказ на поставку» для корректировки ранее выписанного заказа.

Ведомость служит для отчетности и является уточняющей для оформления правильного заказа.

2.3 Технологическое обеспечение задачи. Организация технологии сбора, передачи, обработки и выдачи информации

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

Они могут выполняться в любой календарный момент времени и включают операции ввода, вывода реализации запросов и др. Операции имеют программное выполнение, подчиненное единой алгоритмической схеме. Программа по решению задач учета складских операций и реализации продукции реализована в программе “1С: Торговля и склад”.

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

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

Для учета поступления, реализации и излишков ТМЦ реализуются следующие операции: ввод с документов по приходу, списанию и оприходованию материалов.

Программа состоит из следующих основных модулей.

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

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

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

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

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

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

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

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

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

Параметры (входные документы) - входные данные, полученные в виде конкретных значений, переданных в оперативной памяти смежным модулям (функциям).

В данном дипломном проекте для ООО “Альянс-Трейд” в городе Омске был спроектирован и разработан модуль “Формирование заказа на поставку”. Результаты работы которого позволят в поставленные сроки корректно и быстро сформулировать заявку на заказ товаров.

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

ГЛАВА 3. ОБОСНОВАНИЕ ЭКОНОМИЧЕСКОЙ ЭФФЕКТИВНОСТИ ПРОЕКТА АВТОМАТИЗАЦИИ ПРОЦЕССА ФОРМИРОВАНИЯ ЗАКАЗА

3.1 Выбор и обоснование источников и методики оценки экономической эффективности проекта в ООО “Альянс-Трейд”

Экономическая эффективность проекта (Э) складывается из двух составляющих:

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

Б) Прямого эффекта, который характеризуется снижением трудовых, стоимостных показателей.

К трудовым показателям относятся следующие:

1. абсолютное снижение трудовых затрат (ДТ) рассчитывается по формуле (1)

ДТ = Т₀ - Т₁, (1)

где Т₀ - трудовые затраты на обработку информации по базовому варианту,

Т₁ - трудовые затраты на обработку информации по предлагаемому варианту.

Рассчитаем абсолютное снижение трудовых затрат.

1) 7 часов в день составляют трудовые затраты на обработку информации по базовому варианту. Узнаем сколько часов в месяц составляют трудовые затраты на обработку информации по базовому варианту:

7 ч/д*24 рабочих дня = 168 ч/м.

Затем узнаем сколько составляют трудовые затраты в часах за год:

168 ч/м*12 месяцев = 2016 ч/год,

таким образом Т₀ = 2016 ч/год составляют трудовые затраты на обработку информации по базовому варианту.

2) 2 часа в день составляют трудовые затраты на обработку информации по предлагаемому варианту. Узнаем сколько часов в месяц составляют трудовые затраты на обработку информации по предлагаемому варианту:

2 ч/д*24 рабочих дня = 48 ч/м.

Затем узнаем сколько составляют трудовые затраты в часах в год:

48 ч/м*12 месяцев =576 ч/год,

таким образом Т₁ =576 ч/год составляют трудовые затраты на обработку информации по предлагаемому варианту.

Нам известно, Т₀ = 2016 ч/год и Т₁ = 576 ч/год, теперь можно посчитать абсолютное снижение трудовых затрат в часов в год.

ДТ = 2016-576 = 1440 часа в год

2. коэффициент относительного снижения трудовых затрат (К_Т) рассчитается по формуле (2)

К_Т = ДТ / T₀ * 100%, (2)

К_Т = 1440 / 2016*100% = 71,429

3. индекс снижения трудовых затрат или повышение производительности труда (Y_T) рассчитывается по формуле (3)

Y_T = T₀ / T₁, (3)

Y_T = 2016/576 = 3,5

4. абсолютное снижение стоимостных затрат (ДС) рассчитается по формуле (4)

ДС = С₀ - С₁, (4)

где С₀ - стоимостные затраты на обработку информации по базовому варианту

где С₁ - стоимостные затраты на обработку информации по предлагаемому варианту

1) 500 рублей в день составляют стоимостные затраты на обработку информации по базовому варианту. Узнаем сколько рублей в месяц составляют стоимостные затраты на обработку информации по базовому варианту:

625 р/д*24 рабочих дня = 15000 р/м.

Затем узнаем сколько составляют стоимостные затраты в рублях за год:

15000 р/м*12 месяцев = 180000 р/год, таким образом С₀ = 180000 р/год составляют стоимостные затраты на обработку информации по базовому варианту.

2) 190 рублей в день составляют стоимостные затраты на обработку информации по предлагаемому варианту. Узнаем сколько рублей в месяц составляют стоимостные затраты на обработку информации по предлагаемому варианту:

190 р/д*24 рабочих дня = 4560 р/м.

Затем узнаем сколько составляют стоимостные затраты в рублях в год:

4560 р/м*12 месяцев = 54720 р/год, таким образом С₁ = 54720 р/год составляют стоимостные затраты на обработку информации по предлагаемому варианту.

Нам известно, С₀ = 180000р/год, С₁ =54720р/год, теперь можно посчитать абсолютное снижение стоимостных затрат в рублях в год

ДС = 180000 - 54720 = 125280 рублей в год

ЙЙ. Коэффициент относительного снижения трудовых затрат (К_с) рассчитывается по формуле (5)

К_С = ДС / С₀ * 100%, (5)

К_С=125280/180000*100% = 69,6

ЙЙЙ. Индекс снижения стоимостных затрат или повышение производительности труда (Y_С) рассчитывается по формуле (6)

Y_С = С₀ / С₁. (6)

Y_С = 180000 / 54720 = 3,3

Теперь рассчитаем срок окупаемости затрат на внедрение проекта машиной обработки информации (Т_ок) по формуле (7)

Т_ок = К_П / ДC, (7)

Т_ок = 43200 / 125280 = 0,34

где К_П - затраты на создание проекта машинной обработки информации (проектирование и внедрение).

Т_ок = 0,34 т.е. 4,08 месяца потребуется на окупаемость затрат на внедрение проекта машиной обработки информации.

Результаты расчета показателей экономической эффективности проекта для наглядности восприятия информации представлены в форме таблицы 7 и диаграмм на рисунках 13 и 14.

3.2 Расчет показателей экономической эффективности

На основании полученных расчетов составляем смету затрат предприятия в таблице 7.

Таблица 7

Расчеты базового и проектного варианта

Показатели	Базовый вариант	Проектный вариант
1. Трудовые затраты	2016ч/год	576ч/год
2. Стоимостные затраты	180000р/год	4560р/год
3. Коэффициент относительного снижения: - трудовых затрат - стоимостных затрат	71,429 69,6	250 228,947
4. Индекс снижения: - трудовых затрат - стоимостных затрат	3,5 3,3

Исходя из данных таблице 7, была проиллюстрирована диаграмма на рисунке 13 базовый и проектный вариант трудовых затрат.

Рис. 13. Трудовые затраты

На рисунке 14 показан базовый и проектный вариант стоимостных затрат.

Рис. 14. Стоимостные затраты

Таким, образом, результаты расчета показывают, что при условиях разработки программного модуля сотрудником компании ООО "Альянс - Трейд", снижаются не только трудовые затраты с 2016ч/год до 576ч/год, но и стоимостные с 180000 руб./год до 4560 руб./год. Итак, внедрение разработанного программного модуля в компанию является экономически целесообразным. Кроме того, добавление модуля "Формирование заказа на поставку" в систему “1С: Предприятия” позволит повысить эффективность работы с документами, что положительно скажется на корректности и скорости формирования и выполнения заказа на поставку различных товаров.

Рассчитанные выше основные показатели экономической эффективности доказали экономическую целесообразность внедрения разработанного программного модуля “Формирования заказа на поставку” в ООО “Альянс-Трейд”.

ЗАКЛЮЧЕНИЕ

В процессе выполнения дипломного проекта была рассмотрена существующая в ООО “Альянс-Трейд” система складского учета, обоснована необходимость его автоматизации. Достигнута поставленная цель дипломного проекта, усовершенствована система учета товаров на складе ООО “Альянс-Трейд”. Были решены поставленные задачи.

1. Выполнен анализ деятельности предприятия ООО “Альянс-Трейд”, в том числе управление складским учетом.

2. Разработан и обоснован проект автоматизации складского учета.

3. Разработан модуль “формирования заказа на поставку” для системы “1С: Торговля и склад 7.7”.

4. Проведено тестирование разработанного модуля на реальных данных.

5. Рассчитана экономическая эффективность проекта.

В результате проделанной работы было автоматизировано несколько рабочих мест. Стало возможным снижение числа служащих, занятых в работе по учёту складских операций и реализации продукции в ООО “Альянс-Трейд”. Значительно уменьшилось количество допускаемых ошибок при проведении стандартных операций складского учета. Модернизирован процесс обработки информации, при этом повысилась степень достоверности информации и степень ее защиты.

В ООО “Альянс-Трейд” произведена апробация созданного программного модуля “Формирования заказа на поставку”, которая потвердела актуальность и практическую значимость раскрытой в дипломном проекте темы (соответствующий акт прилагается).

СПИСОК ЛИТЕРАТУРЫ

1. Анализ финансово-хозяйственной деятельности предприятия. Канке А.А., Кошевая И.П., 2-е изд., испр. И доп.. - Форум: ИНФРА-М, 2007. - 288 с.

2. Бухгалтерский учет / Под ред. А.Д.Ларионова. - М.: «Проспект»,1999.- 392 с.

3. Информационные технологии в маркетенге. Титоренко Г.А., Макарова Г.Л. - Учебник для вузов: М.: ЮНИТИ-ДАНА, 2003. 439 с.

4. "Консалтинг при автоматизации предприятий (подходы, методы и средства)", Колянов Г.Н. - М.: Синтек, 1997 - 172 с.

5. Организация складского учета: Семенихин В.В.- общ. Ред. Эксмо М., 2006.-75с.

6. Проектирование информационных систем. Грекул В.И., Денищенко Г.Н., Коровкина Н.Л. - учебное пособие: Москва, 2005 - 303 с.

7. BPWin и ERWin. CASE-средства разработки информационных систем. Маклаков С.В. - М.: ДИАЛОГ-МИФИ, 2000 - 267 с.

8. Журнал "Маркетинг и маркетинговые исследования", N 03 (69) 2007. Сравнительный анализ информационно-аналитических систем для обработки открытых источников информации. Вороной А., Манько П. С 5-8.

9. Журнал “Управление персоналом” №3 2005 год. Управление имиджем вуза. Е. Дагаева С. 26-28.

10. Приказ Минфина РФ от 9 декабря 1998 г. N 60н "Об утверждении Положения по бухгалтерскому учету "Учетная политика организации" ПБУ 1/98" (с изменениями от 30 декабря 1999 г.)

Источники Интернет

1. www.tradegroup.ru - сайт компании ООО “Альянс-Трейд”.

2. www.suninterbrew.ru - сайт компании ОАО “СанИнБев”.

3. www.wbd.ru/about - сайт компании “Вимм-Билль-Данн”.

4. www.rusalco.com/company/about - сайт компании ЗАО “Русский Алкоголь”.

5. www.prodo.ru - сайт компании группа “Продо”.

6. www.hr-portal.ru/pages/Di/796.php - обязанности фин. директора.

7. www.aup.ru/docs/di/064.htm - обязанности отдела кадров.

8. www.hr-bo.ru/page_pid_205.htm - обязанности кладовщика.

9. www.management-portal.ru/?set=content&mc=27 - обязанности зав. складом.

10. www.nutakvot.ru/dolin/razdel/G/g17.php - обязанности грузчика.

11. www.1c.ru - сайт компании “1С”.

12. www.cde.osu.ru/demoversion/course157/text/1.8.html - жизненный цикл информационной системы.

13. www.tm.ifmo.ru/tm2005/src/118b.pdf - стандарт ISO/IEC 15288.

14. www.ooad.asf.ru/standarts/Library/ReviewPO/List11.aspx - стандарт RUP.

15. www.osp.ru/cio/2003/09/172862/_p2.html - стандар COBIT.

16. www.iiinero.narod.ru/keis/21_-_Metodika_Oracle_CDM.html - стандарт Orecle CDM.

17. www.ru.wikipedia.org/wiki/FreeBSD - операционная система FreeBSD.

18. www.parus.ru - сайт компании ООО “Парус”.

19. www.galaktika.ru - сайт компании ООО “Галактика”.

20. www.rugost.com, ГОСТ 34 - “Единая автоматизированная система учета кадров всех государственных предприятий”.

21. www.ru.wikipedia.org/wiki/Microsoft_Solutions_Framework - стандарт MSF.

22. http://www.asntl.ru/page.aspx?id_page=7458 - стандарт ISO/IEC 12207.

23. http://www.rao-ees.ru/ru/info/show.cgi?content.htm - компания РАО “ЕЭС”

ПРИЛОЖЕНИЕ 1

Моделирование бизнес-процессов предприятия ООО “Альянс-Трейд”

Рис. 16. Структура деятельности предприятия “как есть” (AS-IS)

Рис. 17. Декомпозиция структуры организации “как есть” (AS-IS)

Рис. 18. Работа основного комплексного склада “как должно быть” (TO-BE)



Рис. 19. Формирование заявки “как должно быть” (TO-BE)

Рис. 20. Обработка поступающего товара “как должно быть” (TO-BE)

ПРИЛОЖЕНИЕ 2

Формы документов используемые в ООО “Альянс-Трейд”

Рис. 21. Счет-фактура

Рис. 22. Поступление товара

Рис. 23. Товарная накладная



Рис. 24. Книга покупок

Рис. 25. Книга продаж

ПРИЛОЖЕНИЕ 3

Окна разработанного модуля “Формирования заказа на поставку”

// ОПИСАНИЕ ПЕРЕМЕННЫХ

Перем СписокДействий;

Перем СтарыйКлиент;

Перем СтараяДата;

Перем НачальнаяДатаДокумента; // Для контроля даты документа

//************************************************************

// "СЛУЖЕБНЫЕ" ФУНКЦИИ И ПРОЦЕДУРЫ

//************************************************************

// НАЗНАЧЕНИЕ: формирует заголовок окна и заголовок формы

Функция ЗаголовокФормы()

Перем Заголовок, Название;

Заголовок= "Заказ на поставку";

Название= "Заказ №";

Если Выбран() = 1 Тогда

Если Проведен() = 1 Тогда

Заголовок= Заголовок + ".Проведен";

Иначе

Заголовок= Заголовок + ".Не проведен";

КонецЕсли;

Иначе

Заголовок= Заголовок + ".Новый";

КонецЕсли;

Форма.Заголовок(Заголовок);

Возврат Название;

КонецФункции //ЗаголовокФормы

//************************************************************

// НАЗНАЧЕНИЕ: заполняет спецификацию товарами, которых не хватает

Процедура ОбработчикПоКнопкеЗаполнить()

Перем КонтекстДокумента;

КонтекстДокумента=глВзятьКонтекст(Контекст);

ОткрытьФормуМодально("Обработка.ЗаполнениеЗаказа",КонтекстДокумента);

КонецПроцедуры// ОбработчикПоКнопкеЗаполнить

//************************************************************

// НАЗНАЧЕНИЕ: обновлят информационные надписи

Процедура ОбновитьНадписи()

Форма.ТекстОплаты.Заголовок(глСтрокаОплаты(Контекст));

Форма.ТекстФирмы.Заголовок(глСтрокаФирмы(Контекст));

Форма.ТекстОснования.Заголовок(СокрП(Основание));

КонецПроцедуры// ОбновитьНадписи

//************************************************************

Процедура ИспользоватьИнформациюОцене()

Перем ВидимостьКолонкиНДС, ВидимостьКолонкиНП;

ВидимостьКолонкиНДС = 1;

Если ВариантРасчетаНалогов.СтавкаНДСизНоменклатуры = 0 Тогда

Если глПроцентНДС(ВариантРасчетаНалогов.СтавкаНДС) = 0 Тогда

ВидимостьКолонкиНДС= 0;

КонецЕсли;

КонецЕсли;

Форма.СтавкаНДС.Видимость(ВидимостьКолонкиНДС);

ВидимостьКолонкиНП = 1;

Если ВариантРасчетаНалогов.СтавкаНПизНоменклатуры = 0 Тогда

Если глПроцентНП(ВариантРасчетаНалогов.СтавкаНП) = 0 Тогда

ВидимостьКолонкиНП= 0;

КонецЕсли;

КонецЕсли;

Форма.СтавкаНП.Видимость(ВидимостьКолонкиНП);

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

//************************************************************

// НАЗНАЧЕНИЕ: возвращает строку, содержащую инфориацию об итогах по колонкам

Функция Итого()

Перем Результат, Всего, СуммаНДС, СуммаНП;

Всего = Итог("Всего");

СуммаНДС = Итог("НДС");

СуммаНП = Итог("СуммаНП");

Результат = ?(Всего= 0, "", " Всего=" + глФРМ(Всего,Валюта, 1))+

?(СуммаНДС= 0, "", " НДС=" + глФРМ(СуммаНДС, Валюта, 1))+

?(СуммаНП= 0, "", " НП=" + глФРМ(СуммаНП,Валюта, 1));

Возврат Результат;

КонецФункции// Итого

//************************************************************

Процедура Пересчет(ИмяРеквизита)

Перем ВремКоэфф, ВремЦена, НовыйТовар;

Если ИмяРеквизита = "Товар" Тогда

Если ПустоеЗначение(Товар) = 1 Тогда

// Удалили товар.

Единица = 0;

Коэффициент = 0;

Цена = 0;

Количество = 0;

Сумма = 0;

СтавкаНДС = 0;

СтавкаНП = 0;

глРассчитатьНалогиПриходногоДокумента(Контекст);

Возврат;

КонецЕсли;

// Определем поменяли ли товар?

НовыйТовар = Нет;

Если ПустоеЗначение(Единица) = 1 Тогда

НовыйТовар = Да;

ИначеЕсли Товар <> Единица.Владелец Тогда

НовыйТовар = Да;

КонецЕсли;

Если НовыйТовар = Нет Тогда

Возврат;

КонецЕсли;

// нужно проверить, чтобы выбранный товар не был набором

Если Товар.ВидТовара = Перечисление.ВидыТоваров.Набор Тогда

Предупреждение("Наборы в документ не добавляются.");

// очистим реквизиты

Товар = ПолучитьПустоеЗначение("Справочник.Номенклатура");

Единица = 0;

Коэффициент = 0;

Цена = 0;

Количество = 0;

Сумма = 0;

СтавкаНДС = 0;

СтавкаНП = 0;

глРассчитатьНалогиПриходногоДокумента(Контекст);

Возврат;

КонецЕсли;

// заполняем единицу

Единица = Товар.ЕдиницаПоУмолчанию;

Коэффициент = Единица.Коэффициент;

// Заполним ставки налогов

Если ВариантРасчетаНалогов.СтавкаНДСизНоменклатуры = 1 Тогда

СтавкаНДС = Товар.СтавкаНДС.Получить(ДатаДок);

Иначе

СтавкаНДС = ВариантРасчетаНалогов.СтавкаНДС;

КонецЕсли;

Если ВариантРасчетаНалогов.СтавкаНПизНоменклатуры = 1 Тогда

СтавкаНП = Товар.СтавкаНП.Получить(ДатаДок);

Иначе

СтавкаНП = ВариантРасчетаНалогов.СтавкаНП;

КонецЕсли;

Если ПустоеЗначение(КатегорияЦен) = 1 Тогда

// нет категории, нет и цены

Возврат;

КонецЕсли;

// вычисляем цену

ЦенаТовара = глВернутьЦену(Товар, КатегорияЦен);

Если ПустоеЗначение(ЦенаТовара) = 1 Тогда

// для товара в категории цены нет

Возврат;

КонецЕсли;

// получим параметры цены

ЦенаЦены= ЦенаТовара.Цена.Получить(ДатаДок);

ВалютаЦены= ЦенаТовара.Валюта.Получить(ДатаДок);

ЕдЦены= ЦенаТовара.Единица.Получить(ДатаДок);

ЦенаЦены = ?(ПустоеЗначение(ЕдЦены.Коэффициент)= 0,ЦенаЦены * Коэффициент / ЕдЦены.Коэффициент,0);

ЦенаЦены = глПересчетДляПодбора(ЦенаЦены,ВалютаЦены,Дата_Курса,Валюта,Курс);

Если Валюта = Рубли Тогда

ЦенаЦены = Окр(ЦенаЦены,Константа.КоэффОкрРублЦены,1);

КонецЕсли;

// Получили цену в нужной валюте с НДС, но без НП (так цены задаются в справочнике)

// Приведем к нужному варианту

Цена = глСуммаПриходногоДокумента(ВариантРасчетаНалогов,

ЦенаЦены,

1,

Товар.СтавкаНДС.Получить(ДатаДок),

Товар, ДатаДок);

ИначеЕсли ИмяРеквизита = "Количество" Тогда

Если Сумма = 0 Тогда

Сумма = Количество*Цена;

глРассчитатьНалогиПриходногоДокумента(Контекст);

Иначе

Если Константа.ПриИзмененииКоличестваВПриходныхДокументах = 1 Тогда // пересчитывать сумму

Сумма = Цена*Количество;

глРассчитатьНалогиПриходногоДокумента(Контекст);

Иначе // пересчитывать цену

Цена = ?(Количество = 0, 0, Сумма/Количество);

КонецЕсли;

КонецЕсли;

ИначеЕсли ИмяРеквизита = "Единица" Тогда

// сохраним старый коэффициент

ВремКоэфф = Коэффициент;

// заполним коэффициент в документе из единицы

Коэффициент = Единица.Коэффициент;

Если ВремКоэфф <> 0 Тогда

// цена была за другой коэффициент. Пересчетываем

ВремЦена = Цена * Коэффициент / ВремКоэфф;

КонецЕсли;

// если валюта рубли, то нужно округлить цену по коэффициенту

// округления рублевых цен

Если Валюта = Рубли Тогда

ВремЦена = Окр(ВремЦена,Константа.КоэффОкрРублЦены,1);

КонецЕсли;

Цена = ВремЦена;

Сумма = Цена*Количество;

глРассчитатьНалогиПриходногоДокумента(Контекст);

ИначеЕсли ИмяРеквизита = "Цена" Тогда

Сумма = Цена*Количество;

глРассчитатьНалогиПриходногоДокумента(Контекст);

ИначеЕсли ИмяРеквизита = "Сумма" Тогда

глРассчитатьНалогиПриходногоДокумента(Контекст);

Цена = ?(Количество = 0, 0, Сумма/Количество);

ИначеЕсли (ИмяРеквизита = "СтавкаНДС") или (ИмяРеквизита = "СтавкаНП") Тогда

глРассчитатьНалогиПриходногоДокумента(Контекст);

ИначеЕсли (ИмяРеквизита = "НДС") или (ИмяРеквизита = "СуммаНП") Тогда

Всего = глПоказательПриходногоДокумента(Контекст, "СуммаСНалогами");

КонецЕсли;

КонецПроцедуры // Пересчет

//************************************************************

// НАЗНАЧЕНИЕ: возвращает строку, содержащую инфориацию об итогах по колонкам

Процедура Взаиморасчеты()

глПоказатьДолг(Контекст, Клиент, "Закупка");

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

//************************************************************

// НАЗНАЧЕНИЕ: выполняет дествия при изменении даты

Процедура ВыборДаты()

глПриИзмененииДатыДокумента(Контекст, СтараяДата);

ОбновитьНадписи();

КонецПроцедуры// ВыборДаты

//************************************************************

// НАЗНАЧЕНИЕ: выполняет дествия при изменении фирмы

Процедура ВыборФирмы()

Перем КонтекстДокумента;

КонтекстДокумента = глВзятьКонтекст(Контекст);

ОткрытьФормуМодально("Обработка.ИнформацияОфирме", КонтекстДокумента);

ОбновитьНадписи();

КонецПроцедуры// ВыборФирмы

//************************************************************

// НАЗНАЧЕНИЕ: вызывается по кнопке кнОплата.

Процедура ВыборОплаты()

Перем КонтекстДокумента;

Перем СтараяКатегорияЦен;

СтараяКатегорияЦен = КатегорияЦен;

КонтекстДокумента = глВзятьКонтекст(Контекст);

ОткрытьФормуМодально("Обработка.ИнформацияОценах", КонтекстДокумента);

Если СтараяКатегорияЦен <> КатегорияЦен Тогда

// изменилась категория цен

// перерисуем

Если ПустоеЗначение(КонтекстПодбора) = 0 Тогда

КонтекстПодбора.Форма.Обновить();

КонецЕсли;

КонецЕсли;

ОбновитьНадписи();

ИспользоватьИнформациюОцене();

КонецПроцедуры// ВыборОплаты

//************************************************************// НАЗНАЧЕНИЕ: вызывается после выбора значения в реквизите Клиент

Процедура ВыборКлиента()

Перем ВремКатегорияЦен;

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

Если СтарыйКлиент <> Клиент Тогда

Если Константа.ПодставлятьОсновнойДоговор = Да Тогда

// подставим договор по умолчанию

Договор = Клиент.ОсновнойДоговорТорг;

Иначе

// очистим договор

Договор = ПолучитьПустоеЗначение("Справочник.Договора");

КонецЕсли;

ВремКатегорияЦен = Клиент.КатегорияЦенПоставщика;

Если ПустоеЗначение(ВремКатегорияЦен) = 1 Тогда

ВремКатегорияЦен = глПользователь.КатегорияЦен;

КонецЕсли;

Если ПустоеЗначение(ВремКатегорияЦен) = 0 Тогда

КатегорияЦен = ВремКатегорияЦен;

КонецЕсли;

КонецЕсли;

Иначе

Договор = ПолучитьПустоеЗначение("Справочник.Договора");

КонецЕсли;

СтарыйКлиент = Клиент;

ОбновитьНадписи();

КонецПроцедуры// ВыборКлиента

//************************************************************

// НАЗНАЧЕНИЕ: вызывается по кнопке кнОснование.

Процедура ВыборОснования()

КонтекстДокумента = глВзятьКонтекст(Контекст);

ОткрытьФормуМодально("Обработка.ОснованиеДокумента", КонтекстДокумента);

ОбновитьНадписи();

ИспользоватьИнформациюОцене();

КонецПроцедуры// ВыборОснования

//************************************************************

// НАЗНАЧЕНИЕ: формирует таблицу для печати документа

Процедура Печать()

Перем ПорядокСекций;

Фирма.ИспользоватьДату(ДатаДок);

Таб= СоздатьОбъект("Таблица");

Если (ВариантРасчетаНалогов.СтавкаНПизНоменклатуры = 0) И

(глПроцентНП(ВариантРасчетаНалогов.СтавкаНП) = 0)

Тогда

ПечататьНП = Нет;

Иначе

ПечататьНП = Да;

КонецЕсли;

Если ПечататьНП =Да Тогда

ВертикальнаяСекция="С_НП";

Иначе

ВертикальнаяСекция="Без_НП";

КонецЕсли;

Таб.ВывестиСекцию("Шапка|"+ВертикальнаяСекция);

Ном= 1;

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

Пока ПолучитьСтроку() = 1 Цикл

Таб.ВывестиСекцию("Строка|"+ВертикальнаяСекция);

Ном= Ном + 1;

КонецЦикла;

Таб.ВывестиСекцию("Сумма_Итого|"+ВертикальнаяСекция);

Таб.ВывестиСекцию("В_том_числе|"+ВертикальнаяСекция);

Таб.ВывестиСекцию("Сумма_НДС|"+ВертикальнаяСекция);

Таб.ВывестиСекцию("Подвал|"+ВертикальнаяСекция);

Таб.Опции(0, 0, 0, 0, ПарСтрДок);

Таб.Защита(Константа.ФлагЗащитыТаблиц);

Таб.ТолькоПросмотр(1);

Таб.Показать("Печать заказа","");

КонецПроцедуры// Печать

//************************************************************

// Предопределенные процедуры

//************************************************************

Процедура ВводНового(Скопирован)// Предопределенная процедура

Перем ВремКатегорияЦен;

глЗаполнитьШапку(Контекст, Скопирован);

Если Скопирован = 1 Тогда// копирование документа

Возврат;

КонецЕсли;

ДатаДок= РабочаяДата();

Склад= Константа.ОсновнойСклад;

Если ПустоеЗначение(глАктивныйДоговор) = 0 Тогда

Клиент= глАктивныйДоговор.Владелец;

Договор = глАктивныйДоговор;

СтарыйКлиент= Клиент;

КонецЕсли;

Если ПустоеЗначение(Клиент) = 1 Тогда

Клиент= Константа.ОсновнойПоставщик;

КонецЕсли;

Если ПустоеЗначение(Клиент) = 0 Тогда

КатегорияЦен = Клиент.КатегорияЦенПоставщика;

КонецЕсли;

Если ПустоеЗначение(КатегорияЦен) = 1 Тогда

КатегорияЦен= Автор.КатегорияЦен;

КонецЕсли;

Валюта= Константа.ОсновнаяВалютаЗакупки;

Если ПустоеЗначение(Валюта) = 1 Тогда

Валюта= Рубли;

КонецЕсли;

Дата_Курса= ДатаДок;

Курс= глКурсДляВалюты(Валюта, Дата_Курса);

ВыборКлиента();

Если ПустоеЗначение(ВариантРасчетаНалогов) = 1 Тогда

ВариантРасчетаНалогов= Константа.ОсновнойВариантРасчетаНалогов;

КонецЕсли;

ГлУстановкаНомера(Контекст);

КонецПроцедуры// ВводНового

//************************************************************

Процедура ВводНаОсновании(ДокОснование) //Предопределенная процедура

Предупреждение("Документ """ + ПредставлениеВида() + """ не вводят на основании других документов!");

СтатусВозврата(0);

КонецПроцедуры// ВводНаОсновании

//************************************************************

Процедура ПриОткрытии() // Предопределенная процедура

Парам = Форма.Параметр;

Если Лев(Парам, 13) = "ПЕЧАТЬСПРОСМ_" Тогда

Печать();

СтатусВозврата(0);

Возврат;

КонецЕсли;

НачальнаяДатаДокумента = ДатаДок;

Форма.Товар.ВыполнятьФормулуТолькоПриИзменении(1);

Форма.Количество.ВыполнятьФормулуТолькоПриИзменении(1);

Форма.Цена.ВыполнятьФормулуТолькоПриИзменении(1);

Форма.Сумма.ВыполнятьФормулуТолькоПриИзменении(1);

Форма.НДС.ВыполнятьФормулуТолькоПриИзменении(1);

Форма.СтавкаНДС.ВыполнятьФормулуТолькоПриИзменении(1);

Форма.СуммаНП.ВыполнятьФормулуТолькоПриИзменении(1);

Форма.СтавкаНП.ВыполнятьФормулуТолькоПриИзменении(1);

глПроверкаРазрешенияРедактирования(Контекст);

// Если открыли только на просмотр, то надо кнопки сделать недоступными

Если Форма.ТолькоПросмотр() = 1 Тогда

Форма.КнФирма.Доступность(0);

Форма.КнОснование.Доступность(0);

Форма.КнОплата.Доступность(0);

Форма.кнПодборПоКаталогу.Доступность(0);

Форма.кнПодборПоПрайсу.Доступность(0);

Форма.кнИзменить.Доступность(0);

Форма.кнЗаполнить.Доступность(0);

Форма.КнЗаписать.Доступность(0);

Форма.КнПровести.Доступность(0);

Форма.ОК.Доступность(0);

Форма.КнопкаПоУмолчанию("Закрыть");

Иначе

Форма.КнопкаПоУмолчанию("ОК");

КонецЕсли;

ОбновитьНадписи();

ИспользоватьИнформациюОцене();

СтараяДата= ДатаДок;

СтарыйКлиент= Клиент;

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

//************************************************************

Процедура ОбработкаПодбора(Выб, гКонтекстФормыПодбора)

ЗаголовокФормыПодбора = гКонтекстФормыПодбора.Форма.Заголовок();

Если Найти(ЗаголовокФормыПодбора, " (владелец - ") = 0 Тогда

глПриОбработкеПодбора(Выб, Контекст);

Иначе

СписокПараметровЦены=ПолучитьЗначениеИзПодбора("ОписаниеЦены()");

_цена=СписокПараметровЦены.Получить("Цена");

_валюта=СписокПараметровЦены.Получить("Валюта");

_единица=СписокПараметровЦены.Получить("Единица");

// пересчитаем цену в валюту документа

_цена = глПересчет(_цена, _валюта, Дата_Курса, Валюта, Курс);

Колво=1;

Если Константа.ЗапрашиватьКоличество = Да Тогда

Если ВвестиЧисло(Колво, "Количество товара """ + Выб + """", 10, 3) = 0 Тогда Возврат КонецЕсли;

КонецЕсли;

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

Пока ПолучитьСтроку() = 1 Цикл

Если Товар = Выб Тогда

Количество=Количество + Колво;

Цена = глСуммаПриходногоДокумента(ВариантРасчетаНалогов, Цена, 1, Товар.СтавкаНДС.Получить(ДатаДок), Товар, ДатаДок);

Сумма = Цена * Количество;

глРассчитатьНалогиПриходногоДокумента(Контекст);

Возврат;

КонецЕсли;

КонецЦикла;

НоваяСтрока();

Товар=Выб;

Количество=Колво;

Единица=_единица;

Цена=_цена;

Коэффициент=_единица.Коэффициент;

Если ВариантРасчетаНалогов.СтавкаНДСизНоменклатуры = 1 Тогда

СтавкаНДС = Товар.СтавкаНДС.Получить(ДатаДок);

Иначе

СтавкаНДС = ВариантРасчетаНалогов.СтавкаНДС;

КонецЕсли;

Если ВариантРасчетаНалогов.СтавкаНПизНоменклатуры = 1 Тогда

СтавкаНП = Товар.СтавкаНП.Получить(ДатаДок);

Иначе

СтавкаНП = ВариантРасчетаНалогов.СтавкаНП;

КонецЕсли;

Цена = глСуммаПриходногоДокумента(ВариантРасчетаНалогов, Цена, 1, Товар.СтавкаНДС.Получить(ДатаДок), Товар, ДатаДок);

Сумма = Цена * Количество;

глРассчитатьНалогиПриходногоДокумента(Контекст);

КонецЕсли;

КонецПроцедуры //Обработка подбора

//************************************************************

Процедура ПодборПоПрайсЛисту(ФлВыбиратьПрайсЛист=0)

ПрайсЛист=ВосстановитьЗначение("ПрайсЛист");