raschitat_skidki_nacenki_na_servere [wiki.hostingcloud.com.ua]

Эта страница только для чтения. Вы можете посмотреть её исходный текст, но не можете его изменить. Сообщите администратору, если считаете, что это неправильно.

<code>
//мОбъект - ДокументОбъект на котором необъодимо расчитат скидки и наценки
&НаСервере
Процедура ПересчитатьСкидкиНаценки(мОбъект)
		
	СтруктураПараметры = Новый Структура;
	СтруктураПараметры.Вставить("ПрименятьКОбъекту",                Истина);
	СтруктураПараметры.Вставить("ТолькоПредварительныйРасчет",      Ложь);
	СтруктураПараметры.Вставить("ВосстанавливатьУправляемыеСкидки", Истина);
	СтруктураПараметры.Вставить("УправляемыеСкидки", Новый СписокЗначений);
	
	Результат = СкидкиНаценкиСервер.Рассчитать(мОбъект,СтруктураПараметры);
	
	мОбъект.СкидкиРассчитаны = Истина;

КонецПроцедуры
</code>