Здравствуйте. Я плохо знаю русский. Извините за этого. Я еще новичок в 1С программирование. Конфигурация УТ 10.3. В документа инвентаризация товаров на складе надо установить отбор по основной поставщикам. Форму добавил поле ввода но не работает. В событиях при изменении указал путь но это тоже не помогает. Как исправиться с этим? Где проблемный код?
Спасибо всем за ранее
События при изменении -
Процедура ПолеВидаСравнения1ПриИзменении(Элемент, ВыбранноеЗначение, СтандартнаяОбработка)
УправлениеОтчетами.ПолеВидаСравненияПриИзменении(Элемент, ЭлементыФормы);
КонецПроцедуры
Общий модуль -
Процедура ПолеВидаСравненияПриИзменении(Элемент, ЭлементыФормы) Экспорт
ИмяОтбора = Сред(Элемент.Имя, Найти(Элемент.Имя, "ПолеВидаСравнения")+СтрДлина("ПолеВидаСравнения"));
// Управление полями настройки в зависимости от вида сравнения
Если Элемент.Значение = ВидСравнения.Интервал
ИЛИ Элемент.Значение = ВидСравнения.ИнтервалВключаяГраницы
ИЛИ Элемент.Значение = ВидСравнения.ИнтервалВключаяНачало
ИЛИ Элемент.Значение = ВидСравнения.ИнтервалВключаяОкончание Тогда
Если ЭлементыФормы.Найти("ПолеНастройки" + ИмяОтбора) <> НеОпределено Тогда
ЭлементыФормы["ПолеНастройки"+ИмяОтбора].Видимость = Ложь;
КонецЕсли;
Если ЭлементыФормы.Найти("ПолеНастройкиС" + ИмяОтбора) <> НеОпределено Тогда
ЭлементыФормы["ПолеНастройкиС"+ИмяОтбора].Видимость = Истина;
КонецЕсли;
Если ЭлементыФормы.Найти("ПолеНастройкиПо" + ИмяОтбора) <> НеОпределено Тогда
ЭлементыФормы["ПолеНастройкиПо"+ИмяОтбора].Видимость = Истина;
КонецЕсли;
Иначе
Если ЭлементыФормы.Найти("ПолеНастройки" + ИмяОтбора) <> НеОпределено Тогда
ПолеНастройки = ЭлементыФормы["ПолеНастройки"+ИмяОтбора];
ПолеНастройки.Видимость = Истина;
Если Элемент.Значение = ВидСравнения.ВСписке
ИЛИ Элемент.Значение = ВидСравнения.НеВСписке
ИЛИ Элемент.Значение = ВидСравнения.ВСпискеПоИерархии
ИЛИ Элемент.Значение = ВидСравнения.НеВСпискеПоИерархии Тогда
ПолеНастройки.ОграничениеТипа = Новый ОписаниеТипов("СписокЗначений");
Иначе
ПолеНастройки.ОграничениеТипа = Новый ОписаниеТипов(ПолеНастройки.ТипЗначения,, "СписокЗначений");
КонецЕсли;
КонецЕсли;
Если ЭлементыФормы.Найти("ПолеНастройкиС" + ИмяОтбора) <> НеОпределено Тогда
ЭлементыФормы["ПолеНастройкиС"+ИмяОтбора].Видимость = Ложь;
КонецЕсли;
Если ЭлементыФормы.Найти("ПолеНастройкиПо" + ИмяОтбора) <> НеОпределено Тогда
ЭлементыФормы["ПолеНастройкиПо"+ИмяОтбора].Видимость = Ложь;
КонецЕсли;
КонецЕсли;
КонецПроцедуры
Показать