|
|
|
|
Что я не так делаю? Набор записей РН не выгружается в ТЗ. |
☑ |
0
Обработка
21.01.21
✎
07:34
|
Вот код:
ИС_Пятерка = НомераГТДСервер.ПолучитьИсточникПроисхожденияПоУмолчанию();
// РегистрыНакопления.ТоварыОрганизацийБУ.УстановитьИспользованиеИтогов(Ложь);
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| ТоварыОрганизацийБУ.Регистратор
|ИЗ
| РегистрНакопления.ТоварыОрганизацийБУ КАК ТоварыОрганизацийБУ
|ГДЕ
| ТоварыОрганизацийБУ.Период > &НачалоПериода
| И ТоварыОрганизацийБУ.ИсточникПроисхождения = ЗНАЧЕНИЕ(Справочник.ИсточникиПроисхождения.ПустаяСсылка)
|СГРУППИРОВАТЬ ПО
| ТоварыОрганизацийБУ.Регистратор";
Запрос.УстановитьПараметр("НачалоПериода", НачалоПериода);
Рег = РегистрыНакопления.ТоварыОрганизацийБУ;
Выборка = Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
ОбработкаПрерыванияПользователя();
Сообщить(Выборка.Регистратор);
Рег = РегистрыНакопления.ТоварыОрганизацийБУ;
НаборЗаписей = Рег.СоздатьНаборЗаписей();
НаборЗаписей.Отбор.Регистратор.Значение = Выборка.Регистратор;
ТЗ = НаборЗаписей.Выгрузить();
Для Каждого стр из ТЗ Цикл
Если Стр.ИсточникПроисхождения = Справочники.ИсточникиПроисхождения.ПустаяСсылка() Тогда
Стр.ИсточникПроисхождения = ИС_Пятерка;
КонецЕсли;
КонецЦикла;
НаборЗаписей.Очистить();
НаборЗаписей.Загрузить(ТЗ);
НаборЗаписей.Записать();
прервать;
КонецЦикла;
// РегистрыНакопления.ТоварыОрганизацийБУ.УстановитьИспользованиеИтогов(Истина);
|
|
1
ДенисЧ
21.01.21
✎
07:35
|
.Прочитать()
|
|
2
Обработка
21.01.21
✎
07:42
|
|
|
2 + 2 = 3.9999999999999999999999999999999...