|
Функция СредняяСтоимостьПокупки ()
ДБФ.Последняя
();
Уплачено = 0;
Записей = 0;
Пока ДБФ.ВКонце () = 0 Цикл
Уплачено = Уплачено
+ ДБФ.AMOUNT;
Записей = Записей
+ 1;
ДБФ.Следующая ();
КонецЦикла;
Если
Записей > 0 Тогда
Уплачено = Уплачено
/ Записей;
КонецЕсли;
Возврат
Уплачено;
КонецПроцедуры
|