На форме есть поле ввода с типом Значения ЛюбаяСсылка. Хочу ограничить тип только видами субконто счета, на этой же форме.

Процедура Счет(Элемент)
   МассивТипов = Новый Массив();
   Для Ном = 1 по 3 Цикл
   Если Ном <= СчетИскать.ВидыСубконто.Количество() Тогда
   МассивТипов.Добавить(СчетИскать.ВидыСубконто[Ном-1].ВидСубконто.ТипЗначения);
КОнецЕсли;
КонецЦикла;

   ЭлементыФОрмы.Субконто.ОграничениеТипа = Новый ОписаниеТипов(МассивТипов);

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


Код не работает - доступны все типы. Если использовать
ЭлементыФОрмы.Субконто.ОграничениеТипа = Новый ОписаниеТипов(МассивТипов[0])
или
ЭлементыФОрмы.Субконто.ОграничениеТипа = Новый ОписаниеТипов(МассивТипов[1])
то все работает. В Массиве всего 2 значения.

А как быть с массивом, почему ограничение на массив не работает?

(0) посмотреть типовую бух не але ?

может сделать ему тип Характеристика.ВидыСубконто??

(0) ты что, вслепую код пишешь? СчетИскать.ВидыСубконто[Ном-1].ВидСубконто.ТипЗначения - это не Тип.

(1) смотрю. Там добавляют явно:
   МассивТипов = Новый Массив();
   МассивТипов.Добавить(Тип("ПланОбменаСсылка.Полный"));
   МассивТипов.Добавить(Тип("ПланОбменаСсылка.ПоОрганизации"));
   
   ФормаЭлемента = Элемент.ТекущиеДанные.Ссылка.ПолучитьФорму(, Элемент);
   ФормаЭлемента.УстановитьНедоступностьИзмененияТипаУзла(МассивТипов);
   ФормаЭлемента.Открыть();

Велосипедист

(4) это что за код. Посмотри платежку например

(4) Не туда смотришь. Где тут про субконто?

Вот так и пишутся нетленки ...

(8)давай свой код

<
Для Ном = 1 по 3 Цикл
   Если Ном <= СчетИскать.ВидыСубконто.Количество() Тогда
>
Почему нельзя было просто написать:
Для Ном=0 по СчетИскать.ВидыСубконто.Количество()-1

(9) открой ка упп бп и посмотри

(10) скатал с СП, честно. Все вопросы к ним

еще небольшой пример может поможет:

   Типы = Новый Массив;
   ВидыТипов = Новый Структура("Справочники,Документы");
   Для каждого КлючИЗначение Из ВидыТипов Цикл
       Для каждого ОбъектМетаданных Из Метаданные[КлючИЗначение.Ключ] Цикл
           Если ОбъектМетаданных.ТабличныеЧасти.Количество() Тогда
               Типы.Добавить(Тип(СтрЗаменить(ОбъектМетаданных.ПолноеИмя(),".","Ссылка.")));
           КонецЕсли;
       КонецЦикла;
   КонецЦикла;
   
   ЭлементыФормы.СсылкаИсточника.ОграничениеТипа = Новый ОписаниеТипов(Типы);

МассивТипов.Добавить(СчетИскать.ВидыСубконто[Ном-1].ВидСубконто.ТипЗначения.ПривестиЗначение())

тоже не работает

(11)смотрю. Там через перечисление типов, тупо перебираются основные типы объектов

Ответ же в (3) уже написан. О чем разговор?