Из модуля справочника номенклатура в событии ПриЗаписи() хочу записать в регистр сведений "Значения свойств объектов"
Почему то не записывается.
А во внешнем отчете например записывает. В чем может быть дело?


        РС = РегистрыСведений.ЗначенияСвойствОбъектов.СоздатьМенеджерЗаписи();
        РС.Объект = Ссылка;
        РС.Свойство = ПланыВидовХарактеристик.СвойстваОбъектов.НайтиПоНаименованию("Для переноса в УПП");
        РС.Значение = Справочники.ЗначенияСвойствОбъектов.НайтиПоНаименованию("Истина");
        РС.Записать();

плохо, и ошибки никакой?

(1) нет

"РС.Значение = Справочники.ЗначенияСвойствОбъектов.НайтиПоНаименованию("Истина");" прикольно.
(0) Не записывается даже при перезаписи существующего элемента? Может, в ПослеЗаписи() эту запись регистра перенести?

(0) Все записывается, просто:
ПланыВидовХарактеристик.СвойстваОбъектов.НайтиПоНаименованию("Для переноса в УПП")
И/ИЛИ
Справочники.ЗначенияСвойствОбъектов.НайтиПоНаименованию("Истина")

Возвращают пустые ссылки. Посмотри непосредственно в регистре с отбором по объекту.

Возможно и Ссылка не заполнена

(3) "Может, в ПослеЗаписи() эту запись регистра перенести?"
У модуля объекта справочника нету такого события.

(4) в отладчике все реквизиты записи заполнены

(5) Значит, получи и установи ссылку нового. Или через подписку регистр пиши.

(7) существуюшие справочники тоже не пишет

(0) Почему думаешь не записывается?

(9) Вера, глубокая вера.

(9) хз

(11) Сделай запросик - проверь:
    Запрос = Новый Запрос;
    Запрос.Текст =
    "ВЫБРАТЬ
    |    ЗначенияСвойствОбъектов.Свойство,
    |    ЗначенияСвойствОбъектов.Значение
    |ИЗ
    |    РегистрСведений.ЗначенияСвойствОбъектов КАК ЗначенияСвойствОбъектов
    |ГДЕ
    |    ЗначенияСвойствОбъектов.Объект = &Объект";
    
    Запрос.УстановитьПараметр("Объект", МойСпр);
    
    Результат = Запрос.Выполнить();
    Выборка = Результат.Выбрать();
    
    Пока Выборка.Следующий() Цикл
    
        Сообщить("" + Выборка.Свойство+" "+Выборка.Значение);
    
    КонецЦикла;

А ссылка точно не пустая?

(13) Никто не знает, автор тоже, он не умеет пользоваться отладчиком

(13) вот
http://s020.radikal.ru/i709/1508/50/2acd41a9063d.png

может кто нить попробует это у себя?

(12) Самое интересное.
Я этот код добавил в модуле справочника после "РС.Записать()".
Сообщение выводится

(17) Значит все записалось

(18) но после записи в консоле запроса все пусто!

(19) Отборы проверял?

(19) Проверяй свою консоль.
И естественно проверь, что справочник записался полностью

(20) в запросе отобрал все записи регистра. вооще пусто

(22) Перед "Записать()" добавь "Прочитать()"

Запрос покажи

(21) вот журнал регистрации

http://s019.radikal.ru/i617/1508/e6/7e44b5abd2ef.png

(24)

ВЫБРАТЬ
    ЗначенияСвойствОбъектов.Объект,
    ЗначенияСвойствОбъектов.Свойство,
    ЗначенияСвойствОбъектов.Значение
ИЗ
    РегистрСведений.ЗначенияСвойствОбъектов КАК ЗначенияСвойствОбъектов

(23) пробовал. безнадега

Может, РЛС?

Фрагмент кода покажи. Может быть, ты без отбора пишешь и стираешь напрочь весь регистр

(28) У админа с полными правами?

(15) в (29)

(25) Тебе все говорит что зафиксировано, но ты упорно утверждаешь что нет....

(23) Никогда больше не пытайся открывать рот, а иначе засмеют

(31)Сначала надо сделать отбор, потом прочитать, а потом только записывать. У тебя вместо новой записи стирается весь регистр.

(34) рукалицо....

(34) Это для набора записей, а не для менеджера записей.

Например
Набор = РегистрыСведений.МойРегистр.СоздатьНаборЗаписей();
  
  Набор.Прочитать();
  
  НовЗапись = Набор.Добавить();
  НовЗапись.МоёИзмерение1= КакоетоЗначение1;
  НовЗапись.МоёИзмерение2= КакоетоЗначение2;
  НовЗапись.МойРесурс = КакоетоЧисло;
  Набор.Записать();

(37) Причем тут набор записей?
Зачем прочитать?

мда... люди вы что курите?

Наконец-то пришёл МАСТЕР. Он нам всё покажет ))

кто нибуд пробовал у себя?

(39) ну да, для того, чтобы прочитать в набор пару десятков миллионов записей и записать их обратно, добавив одну самую любимую, мастером быть не надо...

(40) Просто регистр сведений записывать, естественно

(40) каждый день рс пишу

(0) Такое ощущение, что у вас несколько таких объектов Справочники.ЗначенияСвойствОбъектов.НайтиПоНаименованию("Истина") и пишется не тот, который нужен. попробуйте указать правильного владельца в этом методе последним параметром

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

(44) проверил, там один

(46) В журнале регистрации написано что все записалось. С чего ты вообще взял, что это не так? Где-то не видишь это что ли?

(46) Совет один, позови специалиста, он тыкнет носом.

(46)Операции - Регистры сведений - Значения свойств объектов открой. Там что видишь?

(49) там вообще пусто

(50) покажи скрин

(50)Ч.т.д.
Сделай отдельную обработку и проверь (45). я это выдрал из обработки, которая работает и записывает.

(51) http://s017.radikal.ru/i440/1508/cc/22dd70101f44.png

(470 журнал еще ни о чем не говорит. Может был откат транзакции.

(53) ты уверен что справочник записался без ошибки? И не было отказа в записи?

(55) смотри здесь (25)

(56) а почему там два раза в журнале запись. Покажи, где второй раз пишешь?

(57) Там один раз запись.
Предыдущая - на три минуты раньше.

(57) второй раз записал из обработки. Там нормально. регистр записывается

(59) Значит идёт откат транзакции.
Смотри (55)

(60) но в журнале регистрации транзакция зафиксировано

(60) В справочнике изменил реквизит, этот реквизит записался. Значить отката не было получается

Посмотри что в модуле набора записей регистра?

Вот что интересно. В (17) написано, что отладочное сообщение не выводится. Значит, этот фрагмент кода вообще не работает. В ЖР есть записи, что регистр пишется - значит, еще есть какое-то место, откуда это происходит.

(63)
Процедура ПередЗаписью(Отказ, Замещение)
    
    Если (Не ОбменДанными.Загрузка) И
        (ПланыОбмена.ГлавныйУзел() <> Неопределено) И
        НЕ Константы.РазрешитьРедактированиеДанныхВПериферийныхИБ.Получить() Тогда
        Отказ = Истина;
    КонецЕсли;
    
КонецПроцедуры


Но там условия дают ложь

(64) врал, ща выходит сообщение

(66) Закоментируй в спр. "номенклатура" все что до кода в (0) и все что после.

(67) зачем?

(68) у тебя есть получше идеи?

Кстати, что выдает:
Сообщить(ПланыВидовХарактеристик.СвойстваОбъектов.НайтиПоНаименованию("Для переноса в УПП"));
Сообщить(Справочники.ЗначенияСвойствОбъектов.НайтиПоНаименованию("Истина"));

Кажется понял.
В форме справочника есть закладка "свойства", а там это свойство пусто. Соответсвтенно при записи справочника если в форме это свойство пусто, тогда запись регистра удаляется.
Какой же я дурень!

все спасибо за внимание