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

Форум Программирование Общие вопросы программирования (Dev)

Конфигурации 1cv8 1С:CRM ПРОФ, КОРП 1С:ERP Управление предприятием 2 Платформа 1С v8.3 8.3.14 8.3.6 8.3.8

1. user1816391 20.03.23 08:56 Сейчас в теме

В форме документа вызываю свой общий модуль при создании на сервере,

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

Показать

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

	КонецЕсли;
	
КонецПроцедуры

Показать

Заметил, что при добавлении сотрудников в табличную часть, в момент, когда нажимаешь на кнопку "Показать все", появляется ошибка "Поле объекта не обнаружено (Объект)"

По теме из базы знаний

Ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. anton13m 3 20.03.23 09:12 Сейчас в теме

(1)

появляется ошибка

Может потому что в открываемой форме выбора нет поля Объект? В чем вопрос?

3. user1863362 20.03.23 09:25 Сейчас в теме

(1)

когда нажимаешь на кнопку "Показать все"

То открывается форма ~~списка~~ выбора. Зачем ты её испортил?

4. user1816391 20.03.23 13:59 Сейчас в теме

(3) я не специально :((
но уже разобрался, добавил

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

Оставьте свое сообщение

E-mail: