diff --git a/src/content/docs/knowledge-base/Общие/(БСП) Стандартные подсистемы/Свойства/Подключение к подсистеме Свойства.md b/src/content/docs/knowledge-base/Общие/(БСП) Стандартные подсистемы/Свойства/Подключение к подсистеме Свойства.md index 2954f94..e3b991c 100644 --- a/src/content/docs/knowledge-base/Общие/(БСП) Стандартные подсистемы/Свойства/Подключение к подсистеме Свойства.md +++ b/src/content/docs/knowledge-base/Общие/(БСП) Стандартные подсистемы/Свойства/Подключение к подсистеме Свойства.md @@ -326,14 +326,21 @@ __В модуле объекта метаданных, по которому о Процедура ЗаполнитьНаборСвойствПоВидуНоменклатуры(Номенклатура, ТипСсылки, НаборыСвойств) - // безопасная безопасность - Если ТипЗнч(Номенклатура) = ТипСсылки Тогда - ДанныеНоменклатуры = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Номенклатура, "ЭтоГруппа, ВидНоменклатуры"); + Строка = НаборыСвойств.Добавить(); + Строка.Набор = УправлениеСвойствами.НаборСвойствПоИмени("Справочник_Номенклатура"); + Строка.ОбщийНабор = Истина; + + Если ТипЗнч(Объект) = ТипСсылки Тогда + Номенклатура = ОбщегоНазначения.ЗначенияРеквизитовОбъекта( + Объект, "ЭтоГруппа, ВидНоменклатуры"); + Иначе + Номенклатура = Объект; КонецЕсли; - Если НЕ ДанныеНоменклатуры.ЭтоГруппа Тогда + Если Номенклатура.ЭтоГруппа = Ложь Тогда Строка = НаборыСвойств.Добавить(); - Строка.Набор = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ДанныеНоменклатуры.ВидНоменклатуры, "НаборСвойств"); + Строка.Набор = ОбщегоНазначения.ЗначениеРеквизитаОбъекта( + Номенклатура.ВидНоменклатуры, "НаборСвойств"); КонецЕсли; КонецПроцедуры