Перем ПоставщикДанных;
Перем ВидыСравнения;

//ТабличноеПоле//:ПоставщикДанных.ТабличноеПоле
//Колонки//:КолонкиТабличногоПоля
//Колонка//:КолонкаТабличногоПоля
//Данные//:ПоставщикДанных.Справочник
//КоманднаяПанель//:ПоставщикДанных.КоманднаяПанель

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

	ОписаниеТипов = СоздатьОбъект("ПоставщикДанных.ОписаниеТипов");
	ОписаниеТипов.Добавить("Справочник.Контрагенты");
	ОписаниеТипов.Добавить("Справочник.Договоры");
	ОписаниеТипов.Добавить("Число",19,2);
	ОписаниеТипов.Добавить("Число",19,2);
	ОписаниеТипов.ИспользоватьСписок = 1;
	
	Данные = ПоставщикДанных.Данные;
	Данные.НоваяКолонка("Контрагенты","Справочник.Контрагенты",,,"Справочник: Контрагенты",,,1);
	Данные.НоваяКолонка("Число","Число",19,2,"Число",,1);
	Данные.НоваяКолонка("Флажок","Число",1,0,"Флажок");
	Данные.НоваяКолонка("ВидСубконто","ВидСубконто",,,"Вид субконто");
	Данные.НоваяКолонка("Субконто","Субконто",,,"Субконто");
	Данные.НоваяКолонка("ВидСравнения","ВидСравнения",0,0,"Вид сравнения");
	Данные.НоваяКолонка("ОписаниеТипов",ОписаниеТипов,,,"Описание типов");
	Данные.СоздатьКнопкиПоУмолчанию();
	
	ТабличноеПоле.Реквизиты.Контрагенты.ВыборГруппы = 1;
	
	ИндексированнаяТаблица = Данные.ИндексированнаяТаблица;
	Для П = 1 По 5000 Цикл
		Состояние("Заполнение строки № "+П+" из 5000.");
		ИндексированнаяТаблица.НоваяСтрока();
		ИндексированнаяТаблица.Число = (1000.65+П)*П/5;
		ИндексированнаяТаблица.Флажок = ?(Цел(П/2) = П/2,1,0);
	КонецЦикла;
	
	ТабличноеПоле.ВосстановитьПозициюКолонок();
	ПоставщикДанных.Обновить();
КонецПроцедуры	// УстановитьПоставщикаДанныхИТ


Процедура ПослеОткрытия()
	Форма.ИДКоманднаяПанель.Видимость(0);
	Форма.ИДКоманднаяПанель.Видимость(1);
КонецПроцедуры

Процедура ПослеСозданияФормы()
	ВидыСравнения = СоздатьОбъект("ПоставщикДанных.ВидыСравнения");
	
	УстановитьПоставщикаДанныхИндексированнаяТаблица();
КонецПроцедуры	// ПослеСозданияФормы

Процедура ПриОткрытии()
	УправлениеФормой = СоздатьОбъект("УправлениеФормой");
	Привязка = УправлениеФормой.ПривязкаЭлементов;
	//Привязка//:УправлениеФормой.Привязка
	Параметры = Привязка.Добавить("ИндексированнаяТаблицаСписок");
	Параметры.Право.Вид = Привязка.ПраваяГраница;
	Параметры.Право.Элемент = "Форма";	
	Параметры.Низ.Вид = Привязка.НижняяГраница;
	Параметры.Низ.Элемент = "Форма";
	
	Параметры = Привязка.Добавить("ИДКоманднаяПанель");
	Параметры.Низ.Вид = Привязка.НижняяГраница;
	Параметры.Низ.Элемент = "Форма";
	
	Привязка.Привязать();
КонецПроцедуры

Процедура ПриЗакрытии()
КонецПроцедуры