Сумма и ствака НДС
4 |
0
5 августа 2016 в 16:10:19
(8 лет 20 недель 3 дня 3 часа назад)
Помогите подсчитать сумму НДС и общую сумму
Написал код но сказали переделать
Вот код:
Процедура ТоварСтавкиНДСПриИзменении(Элемент)
ТекущиеДанные = Элементы.Товар.ТекущиеДанные;
Если ТекущиеДанные.СтавкиНДС = ПредопределенноеЗначение("Перечисление.СтавкиНДС.НДС20") тогда
ТекущиеДанные.СуммаНДС = ТекущиеДанные.Количество * ТекущиеДанные.Цена/100 * 20
ИначеЕсли ТекущиеДанные.СтавкиНДС = ПредопределенноеЗначение("Перечисление.СтавкиНДС.НДС6") тогда
ТекущиеДанные.СуммаНДС = ТекущиеДанные.Количество * ТекущиеДанные.Цена/100 * 6
ИначеЕсли ТекущиеДанные.СтавкиНДС = ПредопределенноеЗначение("Перечисление.СтавкиНДС.БезНДС") тогда
ТекущиеДанные.СуммаНДС = 0
КонецЕсли;
ТекущиеДанные.Итого = ТекущиеДанные.Сумма + ТекущиеДанные.СуммаНДС;
КонецПроцедуры