Набор записей регистра сведений. Не могу понять глюк.
|
Антиквар
26.05.2009 - 17:24
|
1С 8.0. Хочу автоматически заполнить регистр сведений. Он непериодический, регистратору не подчинен. Код вроде примитивный, не могу понять почему в регистр ничего не пишется, хотя отладчиком если сканировать, то записи добавляются. Но в итоге пусто. Для Каждого СтрокаТЗПрайсЛиста Из ТЗПрайсЛиста Цикл ..... Производитель1С = ПолучитьПроизводителя1C(ТекПрайс, ТекПроизводитель); ..... КонецЦикла Функция ПолучитьПроизводителя1C(ТекПрайс, ТекПроизводитель) Экспорт Перем НаборКроссов; НаборКроссов = РегистрыСведений.ВАНКроссТаблицаПроизводителей.СоздатьНаборЗаписей(); НаборКроссов.Отбор.ПрайсПоставщика.Значение = ТекПрайс.Ссылка; НаборКроссов.Отбор.ПрайсПоставщика.Использование=Истина; НаборКроссов.Отбор.ПроизводительВПрайсе.Значение = ТекПроизводитель; НаборКроссов.Отбор.ПроизводительВПрайсе.Использование=Истина; НаборКроссов.Прочитать(); Если НаборКроссов.Количество() = 0 Тогда НовНабор = НаборКроссов.Добавить(); НовНабор.ПрайсПоставщика = ТекПрайс.Ссылка; НовНабор.ПроизводительВПрайсе = ТекПроизводитель; НовНабор.Производитель1С = Справочники.Производители.ПустаяСсылка(); НаборКроссов.Записать(); Возврат Неопределено; Иначе Возврат НаборКроссов[0].Производитель1С; КонецЕсли; КонецФункции У регистра 2 измерения: ПрайсПоставщика (справочник) и ПроизводительВПрайсе (строка). По ним отбор и делаю. В отладчике после строки НаборКроссов.Записать() по выражению НаборКроссов[0] выдает реальную строку регистра, заполненную как надо. Но после обработки в регистре в 1С пусто. Что за ерунда... вроде не раз такое проделывал |