&НаКлиенте
Процедура Рассчитать(Команда)
    Если НЕ ЗначениеЗаполнено(Объект.Количество) Тогда
        Предупреждение("Укажите количество");
        Возврат;
    КонецЕсли;
    Сумма = РассчитатьНаСервере(Объект.Количество, Объект.Цена);
    Объект.Сумма = Сумма;
КонецПроцедуры

&НаСервере
Функция РассчитатьНаСервере(Количество, Цена)
    Возврат Количество * Цена;
КонецФункции