Ошибка "Поле объекта не обнаружено (Объект)"

1. user1816391 20.03.23 08:56 Сейчас в теме
В форме документа вызываю свой общий модуль при создании на сервере,

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


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

	КонецЕсли;
	
КонецПроцедуры
Показать


Заметил, что при добавлении сотрудников в табличную часть, в момент, когда нажимаешь на кнопку "Показать все", появляется ошибка "Поле объекта не обнаружено (Объект)"
Ответы
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
2. anton13m 2 20.03.23 09:12 Сейчас в теме
(1)
появляется ошибка

Может потому что в открываемой форме выбора нет поля Объект? В чем вопрос?
3. user1863362 20.03.23 09:25 Сейчас в теме
(1)
когда нажимаешь на кнопку "Показать все"
То открывается форма списка выбора. Зачем ты её испортил?
4. user1816391 20.03.23 13:59 Сейчас в теме
(3) я не специально :((
но уже разобрался, добавил

Если Имя = "Документ.ДанныеДляРасчетаЗарплаты.Форма.ФормаДокумента" Тогда
		ВидДокумента = Форма.Объект.ВидДокумента.ПредставлениеДокумента;
КонецЕсли;
Оставьте свое сообщение
Вакансии
Консультант 1С
Москва
зарплата от 80 000 руб. до 150 000 руб.
Полный день

Программист 1С (ERP, УХ, КА 2, УТ 11), удаленно
Москва
зарплата от 160 000 руб.
Полный день

Аналитик 1С
Москва
зарплата от 200 000 руб.
Полный день

Консультант 1С / Специалист поддержки 1C
Екатеринбург
зарплата от 70 000 руб.
Полный день

Технический архитектор 1С
Екатеринбург
зарплата от 200 000 руб.
Полный день