O
Oleh
Помогите пожалуйста!
Эсть табличное поле з колонками Реквізит и Значення
Необхідно щоб при введені значення Реквізит в текуший строці в колонці (Значення) задавася тип як у реквізита для полегшення подальшого заповнення!
В колонці Значення типи полів даних можуть бути різними в залежності від типів реквізитів!
Реквізити автоматично вносяться в табличнеПоле при виборі документу в Полеввода(ТипДокумента)!
Эсть табличное поле з колонками Реквізит и Значення
Необхідно щоб при введені значення Реквізит в текуший строці в колонці (Значення) задавася тип як у реквізита для полегшення подальшого заповнення!
В колонці Значення типи полів даних можуть бути різними в залежності від типів реквізитів!
Реквізити автоматично вносяться в табличнеПоле при виборі документу в Полеввода(ТипДокумента)!
Код:
Процедура ТипДокументаПриИзменении(Элемент)
Если ЗначениеЗаполнено(Элемент.Значение) Тогда
ЭтаФорма.ТабличноеПоле1.Очистить();
Для Каждого док Из Метаданные.Документы[Элемент.Значение].Реквизиты
Цикл
Имя = Док.Имя;
Синоним = Док.Синоним;
ЭлементыФормы.ТабличноеПоле1.ДобавитьСтроку();
ЭлементыФормы.ТабличноеПоле1.ТекущиеДанные.Реквізит=Имя;
ТипЗнач=Метаданные.НайтиПоТипу(Метаданные.Документы[Элемент.Значение].Реквизиты[Имя].Тип.Типы()[0]).ПолноеИмя();
//ТипЗнач=СправочникСсылка.Склад --- работает, а вот дальше как?
//Может так, но выдает ошибку!
МассивТипов=Новый Массив();
МассивТипов.Добавить(Тип(ТипЗнач));
ЭлементыФормы.ТабличноеПоле1.ТекущиеДанные["Значення"] = Новый ОписаниеТипов(МассивТипов);
КонецЦикла;
КонецЕсли;
КонецПроцедуры