пересчет реквизита табличной части обычной формы

Андрей 23 4
1С

пересчет реквизита табличной части обычной формы

Процедура Пересчет()
	СтрокаТабличнойЧасти = ЭлементыФормы.Товар.ТекущиеДанные;
	Рекв = ЭлементыФормы.Товар.ТекущаяКолонка.Данные;
	Если Рекв = "Номенклатура" Тогда
		ЦенаТ = ПолучитьЦену(СтрокаТабличнойЧасти.Номенклатура);
		СтрокаТабличнойЧасти.Цена = ЦенаТ;
		СтрокаТабличнойЧасти.Количество = 1;
		СтрокаТабличнойЧасти.Сумма = СтрокаТабличнойЧасти.Цена*СтрокаТабличнойЧасти.Количество;
	ИначеЕсли Рекв = "Количество" Тогда	
		СтрокаТабличнойЧасти.Сумма = СтрокаТабличнойЧасти.Цена*СтрокаТабличнойЧасти.Количество;
	ИначеЕсли Рекв = "Цена" Тогда
		СтрокаТабличнойЧасти.Сумма = СтрокаТабличнойЧасти.Цена*СтрокаТабличнойЧасти.Количество;
	ИначеЕсли Рекв = "Сумма" Тогда	
		СтрокаТабличнойЧасти.Цена = СтрокаТабличнойЧасти.Сумма/?(СтрокаТабличнойЧасти.Количество=0,1,СтрокаТабличнойЧасти.Количество);
	КонецЕсли;	
КонецПроцедуры
0 
Описание дублирует название. Удалите описание, если информации в заголовке достаточно.
‹ ›

См. также

Пересчет сумм в табличной части документа

Раскраска строки табличной части документа (обычные формы) по условию

ПеренестиЗначенияИзРеквизитовФормыВОбъект (БСП)

МетаданныеРеквизитаТабличнойЧасти (БСП)

Оформление (раскраска) строки табличной части обычной формы по условию, при получении данных

Конвертировать объект в структуру

ПоказатьФормуЗагрузки (БСП)

Заполнить реквизит "СуммаДокумента "на форме документа

ЗаполнитьЗначенияСвойствОбъекта (БСП)

Модератору