Имя: Пароль:
1C
1С v8
Неуникальное имя реквизита УФ
0 Slaventiya
 
19.02.14
14:01
Подскажите что вызывает Ошибку в теме.

Код:

Процедура  ДобавитьВФильтрНаСервере(ЭлементСтруктуры)
    
    НазваниеЭлемента     = ЭлементСтруктуры.Ключ;
    ТипЭлемента            = ЭлементСтруктуры.Значение;
    
    ТипыРеквизита = Новый Массив;
    ТипыРеквизита.Добавить(ТипЭлемента);

    ОписаниеТиповДляРеквизита = Новый ОписаниеТипов(ТипыРеквизита);

    НовыйРеквизит = Новый РеквизитФормы(НазваниеЭлемента, ОписаниеТиповДляРеквизита,, НазваниеЭлемента, Истина);    
    
    ДобавляемыеРеквизиты = Новый Массив;
    ДобавляемыеРеквизиты.Добавить(НовыйРеквизит);
    ИзменитьРеквизиты(ДобавляемыеРеквизиты);
    
    НовыйЭлемент = Элементы.Добавить(НазваниеЭлемента, Тип("ПолеФормы"), Элементы.Группа_Фильтры);
    НовыйЭлемент.Вид             = ВидПоляФормы.ПолеВвода;
    НовыйЭлемент.ПутьКДанным     = НазваниеЭлемента;
    
КонецПроцедуры
1 Euguln
 
19.02.14
14:06
Есть уже реквизит с названием НазваниеЭлемента.
2 Euguln
 
19.02.14
14:07
+(1) Если формируешь реквизиты второй раз, сначала их надо удалить. И проверять на существование элементы формы.
3 Slaventiya
 
19.02.14
14:12
Все разобрался, спасибо