1.3.1.132: при цене без НДС сумма без НДС равна сумме строки.

Себестоимость комиссии на 01.09 уже без разрыва НДС, шапка остаётся с ЦенаВключаетНДС = Ложь. Иначе проведение пишет заниженную стоимость упр.

Co-authored-by: Cursor <cursoragent@cursor.com>
This commit is contained in:
mihailkudravcev
2026-10-13 12:30:23 +03:00
parent 77212884f2
commit 20e4cf51a8
4 changed files with 20 additions and 5 deletions
+7
View File
@@ -4,6 +4,13 @@
---
## 1.3.1.132 (2026-10-13)
### #79: сумма без НДС при выключенном «Цена включает НДС»
- Себестоимость комиссии в исходной базе на 01.09.2026 не включает НДС, шапка КБ остаётся с ЦенаВключаетНДС = Ложь.
- После расчёта НДС сумма без НДС равна сумме строки, как на форме документа. Раньше из суммы вычитался НДС, и в себестоимость упр. уходила заниженная сумма.
## 1.3.1.131 (2026-10-13)
### #78: повторный выбор номенклатуры не пересчитывает сумму регл.
+1 -1
View File
@@ -1 +1 @@
1.3.1.131
1.3.1.132
+1 -1
View File
@@ -62,7 +62,7 @@
<xr:Item xsi:type="xr:MDObjectRef">Role.РК_ОсновнаяРоль</xr:Item>
</DefaultRoles>
<Vendor/>
<Version>1.3.1.131</Version>
<Version>1.3.1.132</Version>
<DefaultStyle/>
<DefaultLanguage>Language.Русский</DefaultLanguage>
<BriefInformation/>
@@ -1415,8 +1415,9 @@
КонецФункции
// Расчёт СуммаНДС / СуммаСНДС / СуммаБезНДС / НДСРегл после заполнения строк (#33).
// Штатный путь — ПакетнаяОбработкаТабличнойЧасти (как в форме/модуле ВводОстатковТоваров).
// Расчёт СуммаНДС / СуммаСНДС / СуммаБезНДС / НДСРегл после заполнения строк (#33, #79).
// Штатный путь — ПакетнаяОбработкаТабличнойЧасти, как на форме ВводОстатковТоваров:
// при ЦенаВключаетНДС = Ложь сумма без НДС равна сумме строки, а не сумме минус НДС.
//
Процедура ПересчитатьСуммыНДСДокументаВвода(Док)
@@ -1429,10 +1430,17 @@
СтруктураДействий = Новый Структура;
СтруктураДействий.Вставить("ПересчитатьСуммуНДС", СтруктураПересчетаСуммы);
СтруктураДействий.Вставить("ПересчитатьСуммуСНДС", СтруктураПересчетаСуммы);
СтруктураДействий.Вставить("ПересчитатьСуммуБезНДС", СтруктураПересчетаСуммы);
Если Док.ЦенаВключаетНДС Тогда
СтруктураДействий.Вставить("ПересчитатьСуммуБезНДС", СтруктураПересчетаСуммы);
КонецЕсли;
СтруктураДействий.Вставить("ПересчитатьНДСРегл", СтруктураПересчетаСуммы);
Кэш = ПакетнаяОбработкаТабличнойЧастиКлиентСервер.ПолучитьСтруктуруКэшируемыеЗначения();
ПакетнаяОбработкаТабличнойЧастиСервер.ОбработатьТЧ(Док.Товары, СтруктураДействий, Кэш);
Если Не Док.ЦенаВключаетНДС Тогда
Для Каждого СтрТов Из Док.Товары Цикл
СтрТов.СуммаБезНДС = СтрТов.Сумма;
КонецЦикла;
КонецЕсли;
Возврат;
Исключение
КонецПопытки;