Имя: Пароль:
1C
1С v8
Не могу записать в регистр
0 R1A1
 
10.01.12
13:05
В общем модуле создал экспортную процедуру для записи в регистр накопления (остатки). Не могу записать в регистр набор записей. Вроде никаких косяков нет. Ошибок системой не выдается, но и не пишется.

Процедура СформироватьДвиженияПоступленияПоРегиструПМО(СтруктураШапкиДокумента,_ТаблицаПоПМО, Отказ) экспорт    
           
   Регистратор=СтруктураШапкиДокумента.Ссылка.ПолучитьОбъект();
   Если Тип("ДокументСсылка.ПоступлениеТоваровУслуг") = ТипЗнч(СтруктураШапкиДокумента.Ссылка) Тогда
       Приход=Истина;
   ИначеЕсли Тип("ДокументСсылка._ОплатаВРазнос") = ТипЗнч(СтруктураШапкиДокумента.Ссылка) Тогда
       Приход=Ложь;
   Иначе
       Возврат;
   КонецЕсли;    
   СчетФактура=СтруктураШапкиДокумента.ПредъявленСчетФактура;    
   Дата=СтруктураШапкиДокумента.Дата;
   ПМО=РегистрыНакопления.ПМО;
   НаборЗаписей=ПМО.СоздатьНаборЗаписей();
   НаборЗаписей.Отбор.Регистратор.Установить(СтруктураШапкиДокумента.Ссылка);
   
   Для Каждого ТекСтр Из  _ТаблицаПоПМО Цикл
       Если (ТекСтр.ВидЦенности = Перечисления.ВидыЦенностей.Материалы) И  (НЕ ТекСтр.Услуга) И
           ((ТекСтр.СчетУчета=ПланыСчетов.Хозрасчетный.СырьеИМатериалы) ИЛИ (ТекСтр.СчетУчета=ПланыСчетов.Хозрасчетный.ИнвентарьИХозяйственныеПринадлежности))
           Тогда    
           Движение=НаборЗаписей.Добавить();
           Если Приход Тогда
               Движение.ВидДвижения=ВидДвиженияНакопления.Приход;
           Иначе
               Движение.ВидДвижения=ВидДвиженияНакопления.Расход
           КонецЕсли;
           Движение.Регистратор=СтруктураШапкиДокумента.Ссылка;
           Движение.Период=Дата;
           Движение.Материал=ТекСтр.Номенклатура;
           Движение.СтавкаНДС=ТекСтр.СтавкаНДС;
           Движение.СуммаНДС =ТекСтр.НДС;
           Движение.Сумма=ТекСтр.СуммаБезНДС;
       КонецЕсли;
   КонецЦикла;
       НаборЗаписей.Записать();
КонецПроцедуры
1 Wobland
 
10.01.12
13:06
Движение=Движения.ТвойРегистр.Добавить();
2 SnarkHunter
 
10.01.12
13:06
Условия не выполняются...
3 R1A1
 
10.01.12
13:09
(2) Условия выполняются, набор создается, это видно в отладчике. Но не записывается.
4 vicof
 
10.01.12
13:12
НаборЗаписей.Записывать = Истина;
5 R1A1
 
10.01.12
13:16
(4) Это для документов где стоит свойство "Записывать выбранные"
Но в любом случае не пишет.
6 R1A1
 
10.01.12
13:36
пробовал делать
НаборЗаписей.Отбор.Регистратор.Использование=Истина;
Все равно не пишет.
7 Maxus43
 
10.01.12
13:40
у регистра ПМО этот док точно может быть регистратором?
8 R1A1
 
10.01.12
13:42
(7) Да у него установлен регистр ПМО
9 Maxus43
 
10.01.12
13:44
точку останова при записи в регистр поставь. скорей всего затирается это потом опять
10 hhhh
 
10.01.12
13:45
(8) ну может кто-то другой после тебя пишет в этот же регистр.
11 R1A1
 
10.01.12
14:20
Что то трет регистр после проведения. Не пойму что и почему.
12 vicof
 
10.01.12
14:21
(11) подписка на событие?
13 Maxus43
 
10.01.12
14:39
(11) после (9) в момент кода трёт - стэк вызовов погляди, должнопоказать откуда затирает
14 Ненавижу 1С
 
гуру
10.01.12
14:42
шедевр конечно:

Регистратор=СтруктураШапкиДокумента.Ссылка.ПолучитьОбъект();
НаборЗаписей.Отбор.Регистратор.Установить(СтруктураШапкиДокумента.Ссылка);
15 Maxus43
 
10.01.12
14:43
(14) может и шедевр, но не оно) регистратором ссылку делает всё равно, не объект