Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
22 ноя 2024, 13:35

Ошибка при пересчёте суммы

Автор dimalf, 01 окт 2015, 14:13

0 Пользователей и 1 гость просматривают эту тему.

dimalf

Добрый день!

Дорабатываю УТ 10. Добавил в табличную часть Товары новый реквизит дополнительная скидка. Если скидка устанавливается автоматически для всех строк, то сумма рассчитывается правильно, а НДС с ошибкой (как без учёта скидки). Если скидку в строчке поменять вручную, то сумма становится такой, как будто скидки и нет. Не пойму, где ошибка. При отладке все цифры правильные, а в документ выходят с ошибкой.

cska-fanat-kz

от нас то вы чего хотите?
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

dimalf

Прошу помочь разобраться в чём ошибка и как её исправить.

vitasw

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

dimalf

В общем модуле ОбработкаТабличныхЧастей Процедура РасчитатьСуммуТабЧасти()
      Если (ТипЗнч(ДокументОбъект) = Тип("ДокументОбъект.СчетНаОплатуПокупателю")) ИЛИ
      (ТипЗнч(ДокументОбъект) = Тип("ДокументОбъект.РеализацияТоваровУслуг")) ИЛИ
      (ТипЗнч(ДокументОбъект) = Тип("ДокументОбъект.ЗаказПокупателя")) Тогда
      
      СуммаСкидки = ?(СуммаСкидки = 0, 0, Число(Формат(СуммаСкидки, "ЧЦ=15; ЧДЦ=2")));
      ДопСкидка = ?(СтрокаТабличнойЧасти.ДополнительнаяСкидка = 0, 0, СтрокаТабличнойЧасти.ДополнительнаяСкидка / 100);
   
      СтрокаТабличнойЧасти.Сумма = (Сумма - СуммаСкидки) * (1 - ДопСкидка);
   
   Иначе
   
      СтрокаТабличнойЧасти.Сумма = Сумма - СуммаСкидки;
   
   КонецЕсли;

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск