Внедрение 1С
Проектная технология с гарантированным запуском программного продукта в эксплуатацию
&НаКлиенте
Функция РассчитатьПроцентНаценки(ЦенаЗакупки, ЦенаПродажи)
ПроцентНаценки = 0;
Если ЦенаЗакупки <> 0 Тогда
ПроцентНаценки = (ЦенаПродажи - ЦенаЗакупки) * 100 / ЦенаЗакупки;
КонецЕсли;
Возврат ПроцентНаценки;
КонецФункции
&НаКлиенте
Процедура ПоследняяЦенаЗакупкиПриИзменении(Элемент)
Объект.ПроцентНаценки = РассчитатьПроцентНаценки(Объект.ПоследняяЦенаЗакупки,
Объект.ЦенаПродажи);
КонецПроцедуры
&НаКлиенте
Процедура ЦенаПродажиПриИзменении(Элемент)
Объект.ПроцентНаценки = РассчитатьПроцентНаценки(Объект.ПоследняяЦенаЗакупки,
Объект.ЦенаПродажи);
КонецПроцедуры | Сопровождение программных продуктов 1С: Сопровождение от 2500 руб./ч Использование дифференцированных ставок от уровня специалиста на услуги:
|