Изменение ВидКонтрагента из внешней обработки.

1С v8

06.08.15

✎

14:50

Народ кто знает как поменять вид контрагента, через внешнюю обработку, никак не хочет меняться. Подскажите малознающему в этой области.

&НаКлиенте
Процедура ИзменитьЗначениеВидКонтрагента(Команда)
    ИзменитьЗначениеВидКонтрагента2()
КонецПроцедуры

&НаСервере
Процедура ИзменитьЗначениеВидКонтрагента2()

    номен = Справочники.Контрагенты;
элементСсылка = номен.НайтиПоНаименованию("7007");
Если НЕ элементСсылка.Пустая() тогда
    Сообщить("Найден элемент " + элементСсылка);
конецЕсли;
элементОбъект = ЭлементСсылка.ПолучитьОбъект();
ВидКонтрагента3 = Перечисления.ЮридическоеФизическоеЛицо.ЮридическоеЛицо;
элементОбъект.ЮридическоеФизическоеЛицо = ВидКонтрагента3;
элементОбъект.Записать()

КонецПроцедуры

1 lubitelxml

06.08.15

✎

14:55

элементОбъект.ВидКонтрагента3

2 lubitelxml

06.08.15

✎

14:55

ссори, тупанул

3 salvator

06.08.15

✎

14:58

Элемент-то находится? Сообщение выводится?

4 creator_mc

06.08.15

✎

15:03

Находится выводится, менять могу все кроме перечислений.

5 salvator

06.08.15

✎

15:08

(4) Тип реквизита "ЮридическоеФизическоеЛицо" и тип переменной "ВидКонтрагента3" совпадает?

6 creator_mc

06.08.15

✎

15:09

Всё ок, всё работает, кому надо на заметку для общего развития (опыта, скила и т.п.).

&НаСервере
Процедура ИзменитьЗначениеВидКонтрагента2()
    номен = Справочники.Контрагенты;
элементСсылка = номен.НайтиПоНаименованию("7007");
Если НЕ элементСсылка.Пустая() тогда
    Сообщить("Найден элемент " + элементСсылка);
конецЕсли;
элементОбъект = ЭлементСсылка.ПолучитьОбъект();
элементОбъект.ЮридическоеФизическоеЛицо = Перечисления.ЮридическоеФизическоеЛицо.ЮридическоеЛицо;
элементОбъект.ЮрФизЛицо = Перечисления.ЮрФизЛицо.ЮрЛицо;
элементОбъект.Записать()
КонецПроцедуры

Спасибо всем кто откликнулся на помощь.

7 salvator

06.08.15

✎

15:11

Значит в (5) я был прав.