Конфигурация Управление торговли. Ситуация такая, мне необходимо в справочнике Номенклатура сделать так, что при изменении артикула изменялся дополнительный реквизит "Товарный код". В товарный код записывается артикул. Подскажите как возможно это сделать? Если можно какой-нибудь пример код. Создал событие в поле артикул "при изменении". [1C-CODE]&НаСервере Процедура ДополнениеАртикулПриИзмененииПослеНаСервере() КонецПроцедуры[/1C-CODE] [1C-CODE]&НаКлиенте Процедура ДополнениеАртикулПриИзмененииПосле(Элемент) КонецПроцедуры[/1C-CODE] PS. Заранее извиняюсь, новичок ещё в 1С.

Как заполнить дополнительные реквизиты в справочнике Номенклатура

Загрузка номенклатуры в УТ11, КА 2, ERP 2, Розница 2 из Excel. Дополнительные реквизиты и сведения, характеристики, картинки, цены, остатки
Набор: Дополнительные обработки для конфигураций на БСП (УТ 11 и аналогов)
Пример переноса справочников, документов и движений через Эксель и "Конвертацию данных 2" из оптовой учетной системы 1С 7.7 Комплексной 4.2 и розничной учетной системы Рарус Торговый комплекс -> в 1С 8.3 ЕРП 2.4 (расширение и дополнительные реквизиты)
1С:БСП Дополнительные реквизиты и сведения
Этюды по программированию: хитрости использования дополнительных реквизитов в сериях номенклатуры УТ, КА, ERP

9. KVIKS 440 14.10.21 17:07 Сейчас в теме

(8)

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

КонецЦикла;
Если не Нашел тогда 
НовСтр=Объект.ДополнительныеРеквизиты.Добавить();
НовСтр.Свойство=ПланВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоНаименованию("Товарный код") ;
Новстр.Значение=Объект.Артикул; 
КонецЕсли;

Показать

Что то типа такого

2. RustamZz 14.10.21 16:14 Сейчас в теме

(1) В УТ 10 обычные формы, а у вас код для управляемых.

3. ARTFIRE 14.10.21 16:17 Сейчас в теме

(2) Не то указал, Управление Торговли редакция 3.4

4. Airlord 14.10.21 16:25 Сейчас в теме

(3) Добрый день! Такой тоже нет. Есть редакция 11.4.хх и т.д. Вы уверены. что у вас не "Розница" или другой какой-то продукт? Справка, О программе поможет вам узнать и номер платформы и редакцию и версию релиза.

5. RustamZz 14.10.21 16:27 Сейчас в теме

(3)

УправлениеСвойствами.ЗаписатьСвойстваУОбъекта(

6. Andrekaa 14.10.21 16:30 Сейчас в теме

Сейчас доп реквизиты это табличная часть справочника
просто перезаписываете его

7. KVIKS 440 14.10.21 16:45 Сейчас в теме

(6)

Сейчас доп реквизиты это табличная часть справочника
просто перезаписываете его

Точнее надо проверить есть ли в ТЧ это свойство, если да то перезаписать значение, если нет то добавить новую строку.

8. ARTFIRE 14.10.21 16:50 Сейчас в теме

(7) Можно пример как делать?

9. KVIKS 440 14.10.21 17:07 Сейчас в теме

(8)

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

КонецЦикла;
Если не Нашел тогда 
НовСтр=Объект.ДополнительныеРеквизиты.Добавить();
НовСтр.Свойство=ПланВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоНаименованию("Товарный код") ;
Новстр.Значение=Объект.Артикул; 
КонецЕсли;

Показать

Что то типа такого

10. ARTFIRE 15.10.21 09:13 Сейчас в теме

(9) Ошибку выдаёт.
{Дополнение Справочник.Номенклатура.Форма.ФормаЭлемента.Форма(635,21)}: Переменная не определена (ПланВидовХарактеристик)
Если Стр.Свойство=<<?>>ПланВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоНаименованию("Товарный код") тогда (Проверка: Сервер)
{Дополнение Справочник.Номенклатура.Форма.ФормаЭлемента.Форма(641,20)}: Переменная не определена (ПланВидовХарактеристик)
НовСтр.Свойство=<<?>>ПланВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоНаименованию("Товарный код") ; (Проверка: Сервер)

11. KVIKS 440 15.10.21 12:12 Сейчас в теме

(10) надо в серверной процедуре это делать или конфа у вас другая нежели в моем примере

12. Release 15.10.21 12:16 Сейчас в теме

(11) А разве не "ПланыВидовХарактеристик"?

Элементы коллекции:
ПланВидовХарактеристикМенеджер.<Имя плана видов характеристик>
...
Описание:
Предназначен для управления планами видов характеристик и предоставляет доступ к значениям типа ПланВидовХарактеристикМенеджер.<Имя плана видов характеристик>. Доступ к объекту осуществляется через свойство глобального контекста ПланыВидовХарактеристик.

13. gybson 15.10.21 12:42 Сейчас в теме

(9) Тогда уж так

Свойство = ПланВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоРеквизиту("Имя", ИмяСвойстваДляПрограммистов);

СтрокаСвойства = Объект.ДополнительныеРеквизиты.Найти(Свойство, "Свойство");
Если СтрокаСвойства = Неопределено Тогда
СтрокаСвойства  = Объект.ДополнительныеРеквизиты.Добавить();
СтрокаСвойства.Свойство = Свойство;
КонецЕсли;
СтрокаСвойства .Значение = Объект.Артикул;

Показать