новое событие
Информационный поток
Задания вакансии материалы разработки сообщения форума
cozac.eric
Приватное сообщение

Нужно вывести сумму вместе со ставкой НДС

4 |  0
5 августа 2016 в 16:10:19 (7 лет 33 недели 6 дней 17 часов назад)
Текст задания
Написал код ошибки никакой не выдает но не работает.Помогите решить проблему
Вот код:
НаКлиенте
Процедура ТоварыСтавкаНДСПриИзменении(Элемент)
ТекДанные = Элементы.Товар.ТекущиеДанные;
Если ТекДанные.Объект.Товар.СтавкиНДС.СтавкиНДС=Объект.Товар.СтавкиНДС.Перечисление. СтавкиНДС.НДС6 тогда
НДС=6;
ИначеЕсли ТекДанные.Объект.Товар.СтавкиНДС.СтавкиНДС=Объект.Товар.СтавкиНДС.Перечисление. СтавкиНДС.НДС20 тогда
НДС=20;

ИначеЕсли ТекДанные.Объект.Товар.СтавкиНДС.СтавкиНДС=Объект.Товар.СтавкиНДС.Перечисление. СтавкиНДС.БезНДС тогда
НДС=0;



КонецЕсли;
СуммаБезНДС = Объект.Товар.Количество*Объект.Товар.Цена;
СуммаНДС = Объект.Товар.Количество*Объект.Товар.Цена/100;
Итого = Объект.Товар.Количество*Объект.Товар.Цена*(1+НДС/100);
0
Отклики (2)