Изменение результата запроса

[alinka1628]

Добрый день!
Подскажите пожалуйста, можно ли при выполнении некоторых условий изменить результат запроса?

Код: (1C v8)

Запрос1 = Новый Запрос;
                Запрос1.УстановитьПараметр("НаименованиеНоменклатуры", ВыборкаДетальныеЗаписи.Номенклатура);
                Запрос1.Текст = СформироватьТекстЗапроса();
                Результат1 = Запрос1.Выполнить();
                ВыборкаДетальныеЗаписи1 = Результат1.Выбрать();
                                       
                //вывод выборки комплектующих номенклатуры из справочника Спецификация номенклатуры
                Если НЕ Результат1.Пустой() Тогда
                 ОбластьДетальныхЗаписей.Параметры.Заполнить(ВыборкаДетальныеЗаписи);
                 ДокументРезультат.Вывести(ОбластьДетальныхЗаписей, ВыборкаДетальныеЗаписи.Уровень());
                 ДокументРезультат.Вывести(ОбластьШапкаДеталиКомплект);
               
                СуммаИтог1 = 0;
                Пока ВыборкаДетальныеЗаписи1.Следующий() Цикл
                  ОбластьДеталиКомплект.Параметры.Заполнить(ВыборкаДетальныеЗаписи1);
                  ДокументРезультат.Вывести(ОбластьДеталиКомплект, ВыборкаДетальныеЗаписи1.Уровень());
                  СуммаИтог1 = СуммаИтог1 + ВыборкаДетальныеЗаписи1.Стоимость;
            КонецЦикла;
                 
                  ВыборкаДетальныеЗаписи.Цена = 0;
                  ВыборкаДетальныеЗаписи.Цена = СуммаИтог1;
                  ОбластьДетальныхЗаписей.Параметры.Цена = ВыборкаДетальныеЗаписи.Цена;
                  ВыборкаДетальныеЗаписи.Стоимость = ВыборкаДетальныеЗаписи.Цена * ВыборкаДетальныеЗаписи.Количество;
                  ОбластьДетальныхЗаписей.Параметры.Стоимость = ВыборкаДетальныеЗаписи.Стоимость;

      Иначе
          //вывод строки основного запроса
            ОбластьДетальныхЗаписей.Параметры.Заполнить(ВыборкаДетальныеЗаписи);  
                ДокументРезультат.Вывести(ОбластьДетальныхЗаписей, ВыборкаДетальныеЗаписи.Уровень());
         
        КонецЕсли;

Выдает ошибку:
{Отчет.СебестоимостьПоКомплектующим.Форма.СебестоимостьПоКомплектующим.Форма(78)}: Поле объекта недоступно для записи (Цена)
        ВыборкаДетальныеЗаписи.Цена = 0;

[Dest]

Нет результат запроса изменить нельзя.
Но в вашем случае, по моему, можно обойтись и так:

Код:

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

            ОбластьДетальныхЗаписей.Параметры.Цена = СуммаИтог1;
            ОбластьДетальныхЗаписей.Параметры.Стоимость = СуммаИтог1 * ВыборкаДетальныеЗаписи.Количество;

   Иначе
          //вывод строки основного запроса
            ОбластьДетальныхЗаписей.Параметры.Заполнить(ВыборкаДетальныеЗаписи);  
             ДокументРезультат.Вывести(ОбластьДетальныхЗаписей, ВыборкаДетальныеЗаписи.Уровень());
   КонецЕсли;

Сомневаюсь в полной правильности этого куска кода и его оптимальности, потому  что задачу не знаю и всего вашего кода не видел.
А еще, для меня остается загадкой, зачем вы пытались "изменить результат запроса".

[alinka1628]

Спасибо за ответ! хотелось оптимизировать, не нельзя так нельзя, значит сделала правильно. У меня выполняется 2 запроса, поэтому в некоторых случаях необходимо менять значения. Еще раз спасибо, нашла альтернативу!