// ===============================
// рассчитывает износ по конкретному ОС, НМА, необоротному активу
// по установленному для него методу
Процедура РассчитатьИзносПоЭлементу(Элемент, ПервСтоимость, ПервКво, ОстСтоимость, СчИзноса, Сч, ПервСтоимостьНУ, ОстСтоимостьНУ, СчИзносаНУ, СчНУ)
Элемент.ИспользоватьДату(НачМесяца(ДатаДок),1);
Если Элемент.МетодРасчетаИзноса.Выбран() = 0 Тогда
глКомментарий(Строка(Элемент)+": не задан метод расчета износа. Износ не начислен!",0,,"!");
Возврат;
КонецЕсли;
Если ПервКво = 0 Тогда
Если ОстСтоимость > 0 Тогда
глКомментарий(Строка(Элемент)+": Первоначальное количество равно 0. Износ не начислен!",0,,"!");
КонецЕсли;
СуммаИзноса = 0; // нужно вставить
СуммаИзносаНУ = 0; // нужно вставить
Возврат;
КонецЕсли;
............................................ далее по тексту ............................................
Полный текст модуля документа - в файле вложения
Вступайте в нашу телеграмм-группу Инфостарт
