Код IT
← Каталог

Управляемые формы 1С — Директивы компиляции

Фрагмент из «Управляемые формы 1С»: Директивы компиляции.

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

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

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