diff --git a/CHANGELOG.md b/CHANGELOG.md index 106ed66..d01babd 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -4,6 +4,13 @@ --- +## 1.3.1.132 (2026-10-13) + +### #79: сумма без НДС при выключенном «Цена включает НДС» + +- Себестоимость комиссии в исходной базе на 01.09.2026 не включает НДС, шапка КБ остаётся с ЦенаВключаетНДС = Ложь. +- После расчёта НДС сумма без НДС равна сумме строки, как на форме документа. Раньше из суммы вычитался НДС, и в себестоимость упр. уходила заниженная сумма. + ## 1.3.1.131 (2026-10-13) ### #78: повторный выбор номенклатуры не пересчитывает сумму регл. diff --git a/VERSION b/VERSION index 4d488b9..a79b069 100644 --- a/VERSION +++ b/VERSION @@ -1 +1 @@ -1.3.1.131 +1.3.1.132 diff --git a/src/Configuration.xml b/src/Configuration.xml index 63fef3d..e5ee4d1 100644 --- a/src/Configuration.xml +++ b/src/Configuration.xml @@ -62,7 +62,7 @@ Role.РК_ОсновнаяРоль - 1.3.1.131 + 1.3.1.132 Language.Русский diff --git a/src/DataProcessors/РК_ЗагрузкаОстатков/Ext/ObjectModule.bsl b/src/DataProcessors/РК_ЗагрузкаОстатков/Ext/ObjectModule.bsl index 7f615a1..e00e9ba 100644 --- a/src/DataProcessors/РК_ЗагрузкаОстатков/Ext/ObjectModule.bsl +++ b/src/DataProcessors/РК_ЗагрузкаОстатков/Ext/ObjectModule.bsl @@ -1415,8 +1415,9 @@ КонецФункции -// Расчёт СуммаНДС / СуммаСНДС / СуммаБезНДС / НДСРегл после заполнения строк (#33). -// Штатный путь — ПакетнаяОбработкаТабличнойЧасти (как в форме/модуле ВводОстатковТоваров). +// Расчёт СуммаНДС / СуммаСНДС / СуммаБезНДС / НДСРегл после заполнения строк (#33, #79). +// Штатный путь — ПакетнаяОбработкаТабличнойЧасти, как на форме ВводОстатковТоваров: +// при ЦенаВключаетНДС = Ложь сумма без НДС равна сумме строки, а не сумме минус НДС. // Процедура ПересчитатьСуммыНДСДокументаВвода(Док) @@ -1429,10 +1430,17 @@ СтруктураДействий = Новый Структура; СтруктураДействий.Вставить("ПересчитатьСуммуНДС", СтруктураПересчетаСуммы); СтруктураДействий.Вставить("ПересчитатьСуммуСНДС", СтруктураПересчетаСуммы); - СтруктураДействий.Вставить("ПересчитатьСуммуБезНДС", СтруктураПересчетаСуммы); + Если Док.ЦенаВключаетНДС Тогда + СтруктураДействий.Вставить("ПересчитатьСуммуБезНДС", СтруктураПересчетаСуммы); + КонецЕсли; СтруктураДействий.Вставить("ПересчитатьНДСРегл", СтруктураПересчетаСуммы); Кэш = ПакетнаяОбработкаТабличнойЧастиКлиентСервер.ПолучитьСтруктуруКэшируемыеЗначения(); ПакетнаяОбработкаТабличнойЧастиСервер.ОбработатьТЧ(Док.Товары, СтруктураДействий, Кэш); + Если Не Док.ЦенаВключаетНДС Тогда + Для Каждого СтрТов Из Док.Товары Цикл + СтрТов.СуммаБезНДС = СтрТов.Сумма; + КонецЦикла; + КонецЕсли; Возврат; Исключение КонецПопытки;