Загрузка данных


Объем = 0;
ЕстьНезаполненные = Ложь;

ДокументыОснования = Объект.ДокументыОснования.Выгрузить().ВыгрузитьКолонку("ДокументОснование");

Запрос = Новый Запрос;
Запрос.Текст = 
"ВЫБРАТЬ
|    ЗаказПокупателяТовары.Номенклатура.ЕдиницаХраненияОстатков.Объем КАК Объем,
|    ЗаказПокупателяТовары.Количество КАК Количество
|ИЗ
|    Документ.ЗаказПокупателя.Товары КАК ЗаказПокупателяТовары
|ГДЕ
|    ЗаказПокупателяТовары.Ссылка В (&Ссылка)";

Запрос.УстановитьПараметр("Ссылка", ДокументыОснования);

Выборка = Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
    Если Выборка.Объем = 0 Тогда
        ЕстьНезаполненные = Истина;
        Прервать;
    КонецЕсли;
    Объем = Объем + Выборка.Объем * Выборка.Количество;
КонецЦикла;

Если ЕстьНезаполненные Тогда
    РезультатВычисления = 0; // или Неопределено — поле останется незаполненным, загорится красный флажок
Иначе
    РезультатВычисления = Объем;
КонецЕсли;