//Привяжем к нашей таблице вызов процедуры обработки

//события "ПередОкончаниемРедактирования" !!! процедура должна существовать !!!

ДействиеОбработкаВыбора = Новый Действие("ОбработкаВыбораЗнач");    

ЭлементыФормы["Таблица"].УстановитьДействие("ПередОкончаниемРедактирования",ДействиеОбработкаВыбора);   

 //--- создаем новую закладку 

    тмпСтраницы = ЭлементыФормы.ОсновнаяПанель.Страницы;

    СтраницаПанелиОПЗС = тмпСтраницы.Добавить("Производство", "Производство");

    ЭлементыФормы.ОсновнаяПанель.ТекущаяСтраница = СтраницаПанелиОПЗС;

    ПолеДокументов = ЭлементыФормы.Добавить(Тип("ТабличноеПоле"), "ап_Призводство", Истина, ЭлементыФормы.ОсновнаяПанель);

    ПолеДокументов.Данные = "ап_Производство";

    ПолеДокументов.УстановитьДействие("ПередУдалением", Новый Действие("апПроизводствоПередУдалением"));

    ПолеДокументов.УстановитьДействие("ПередНачаломДобавления", Новый Действие("апПроизводствоПередНачаломДобавления"));

    ПолеДокументов.УстановитьДействие("ПриПолученииДанных", Новый Действие("апПроизводствоПриПолученииДанных"));   

 Колонка.ЭлементУправления.УстановитьДействие("НачалоВыбора",Новый Действие(Действие"));   

 ЭлементыФормы.РасшифровкаПлатежа.Колонки.СтатьяДвиженияДенежныхСредств.ЭлементУправления.УстановитьДействие("НачалоВыбора",Новый Действие("_СтатьяДвиженияДенежныхСредствНачалоВыбора"))   

 Процедура ПриОткрытии() 

 	Если ЭтоНовый() = Ложь Тогда 

		ЭлементыФормы.Панель.ТекущаяСтраница = ЭлементыФормы.Панель.Страницы.СчетаИДоговоры; 

	КонецЕсли; 

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

 //Перебор Основных Реквизитов формы

	Для Каждого Рек из ЭтаФорма.Метаданные().Реквизиты Цикл

		Сообщить(рек.Имя+" - "+рек.Синоним+" - "+Строка(рек.Тип));

	КонецЦикла;

	// или так

	Для Каждого Рек из Метаданные().Реквизиты Цикл

		Сообщить(рек.Имя+" - "+рек.Синоним+" - "+Строка(рек.Тип));

	КонецЦикла;

	

	//Реквизиты формы - Надписи, Поля Ввода и т.д

	//можно и через ЭтаФорма.ЭлементыФормы

	Для Каждого Рек из ЭлементыФормы Цикл

		Сообщить(Строка(рек)+" - "+рек.имя);

    КонецЦикла;   

 Процедура ПриВыбореЗакладки(НомерЗакладки, ЗначениеЗакладки)

    ТекущаяСтраница = ЗначениеЗакладки;

    Форма.ИспользоватьСлой("Кнопки,"+СокрЛП(ТекущаяСтраница), 2);

    

    Если ТекущаяСтраница="зклдПодписание" Тогда

    Для Инд = 1 По Метаданные.Справочник("ДоговораНов").Реквизит() Цикл



         Реквизит = Метаданные.Справочник("ДоговораНов").Реквизит(Инд);

         Если Форма.ПолучитьАтрибут(Реквизит).Видимость() = 1 Тогда

               Форма.ПолучитьАтрибут(Реквизит).Доступность(0);

         КонецЕсли;



    КонецЦикла;

    КонецЕсли;



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