Имя: Пароль:
1C
1С v8
Что я не так делаю? Набор записей РН не выгружается в ТЗ.
0 Обработка
 
21.01.21
07:34
Вот  код:

    ИС_Пятерка =  НомераГТДСервер.ПолучитьИсточникПроисхожденияПоУмолчанию();
  //  РегистрыНакопления.ТоварыОрганизацийБУ.УстановитьИспользованиеИтогов(Ложь);
    Запрос = Новый Запрос;
    Запрос.Текст =
        "ВЫБРАТЬ
            |    ТоварыОрганизацийБУ.Регистратор
            |ИЗ
            |    РегистрНакопления.ТоварыОрганизацийБУ КАК ТоварыОрганизацийБУ
            |ГДЕ
            |    ТоварыОрганизацийБУ.Период > &НачалоПериода
            |    И ТоварыОрганизацийБУ.ИсточникПроисхождения = ЗНАЧЕНИЕ(Справочник.ИсточникиПроисхождения.ПустаяСсылка)

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

Потом ищешь ошибки.
Кaк может человек ожидaть, что его мольбaм о снисхождении ответит тот, кто превыше, когдa сaм он откaзывaет в милосердии тем, кто ниже его? Петр Трубецкой