//------------------------------------------------------------------------------------------------------------ 
Процедура СоздатьКнопки(КоманднаяПанель)
	КоманднаяПанель.Очистить();
	Пиктограммы=ПутьККаталогуКартинок+"ПанельЖурнала.bmp";
	КвоКартинокПоУмолчание=КоманднаяПанель.КоличествоКартинок;
	КоманднаяПанель.ДобавитьПиктограммыВКоллекцию(Пиктограммы,38);
	
	Кнопка = КоманднаяПанель.Кнопка("Добавить",,,КвоКартинокПоУмолчание+1,"ДобавитьСтроку",);
	Кнопка.Подсказка = "Добавить новую строку";
	КоманднаяПанель.Добавить(Кнопка);
	
	Кнопка = КоманднаяПанель.Кнопка("Изменить",,,КвоКартинокПоУмолчание+2,"ИзменитьСтроку");
	Кнопка.Подсказка = "Изменить текущую строку";
	КоманднаяПанель.Добавить(Кнопка);
	
	Кнопка = КоманднаяПанель.Кнопка("Копировать",,,КвоКартинокПоУмолчание+3,"СкопироватьСтроку",);
	Кнопка.Подсказка = "Копировать текущую строку";
	КоманднаяПанель.Добавить(Кнопка);
	
	Кнопка = КоманднаяПанель.Кнопка("Удалить",,,КвоКартинокПоУмолчание+4,"УдалитьСтроку");
	Кнопка.Подсказка = "Удалить текущую строку";
	КоманднаяПанель.Добавить(Кнопка);
	
	КоманднаяПанель.Добавить(КоманднаяПанель.Кнопка("Разделитель_1",4));
	
	КоманднаяПанель.Обновить();
КонецПроцедуры
//======================================================================
Процедура СоздатьПДИТДляОбъема()
	ПДИТОбъем = СоздатьОбъект("ПоставщикДанных");
	ПДИТОбъем.ТипЗначений = "ИндексированнаяТаблица";
	ПДИТОбъем.КонтейнерТабличногоПоля = "ТПОбъем_";
	ПДИТОбъем.КонтейнерКоманднойПанели = "КПОбъем_";
	КоманднаяПанель=ПДИТОбъем.ТабличноеПоле.КоманднаяПанель;
	
	КоманднаяПанель.Очистить();
	Пиктограммы=ПутьККаталогуКартинок+"ПанельЖурнала.bmp";
	КвоКартинокПоУмолчание=КоманднаяПанель.КоличествоКартинок;
	КоманднаяПанель.ДобавитьПиктограммыВКоллекцию(Пиктограммы,38);
	//кнопка Добавить
	Кнопка = КоманднаяПанель.Кнопка("Добавить",,,КвоКартинокПоУмолчание+1,"ДобавитьСтроку");
	Кнопка.Подсказка = "Добавить новую строку";
	КоманднаяПанель.Добавить(Кнопка);
	//кнопка Изменить
	Кнопка = КоманднаяПанель.Кнопка("Изменить",,,КвоКартинокПоУмолчание+2,"ИзменитьСтроку");
	Кнопка.Подсказка = "Изменить текущую строку";
	КоманднаяПанель.Добавить(Кнопка);
	//кнопка Удалить
	Кнопка = КоманднаяПанель.Кнопка("Удалить",,,КвоКартинокПоУмолчание+4,"УдалитьСтроку");
	Кнопка.Подсказка = "Удалить текущую строку";
	КоманднаяПанель.Добавить(Кнопка);
	КоманднаяПанель.Добавить(КоманднаяПанель.Кнопка("Разделитель_1",4));
	
	КоманднаяПанель.Обновить();
	
	Данные = ПДИТОбъем.Данные;
	Данные.НоваяКолонка("Масса","Число",15,4,"Масса (кг.)",100);  
	Данные.НоваяКолонка("Тираж","Число",15,4,"Тираж (тыс.шт.)",100); 
	
	Данные.ИзменятьПорядокСтрок=0;
	Данные.ВыводНаПечать=0;
	Данные.ИзменятьПозициюКолонок=0;
	Данные.ИзменятьНастройкуКолонок=0;
	
	Колонки=Данные.Колонки;
	
	Для НомерЗначения=0 По (Колонки.Количество()-1) Цикл
		ОтборРеквизита = Колонки.Получить(НомерЗначения);
		ОтборРеквизита.ШрифтЗаголовка=ШрифтЗаголовка;
	КонецЦикла;
	ПДИТОбъем.ТабличноеПоле.АвтоШирина();
КонецПроцедуры // СоздатьПДИТДляОбъема
//======================================================================
Процедура СоздатьПДИТДляМенеджера()
	ПДИТМенеджер = СоздатьОбъект("ПоставщикДанных");
	ПДИТМенеджер.ТипЗначений = "ИндексированнаяТаблица";
	ПДИТМенеджер.КонтейнерТабличногоПоля = "ТПМенеджер_";
	ПДИТМенеджер.КонтейнерКоманднойПанели = "КПМенеджер_";
	КоманднаяПанель=ПДИТМенеджер.ТабличноеПоле.КоманднаяПанель;
	СоздатьКнопки(КоманднаяПанель);
	
	Данные = ПДИТМенеджер.Данные;
	
	Данные.НоваяКолонка("Код","Строка",9,,"Код",40);
	Данные.НоваяКолонка("Дизайн","Справочник.ТМЦ",,,"Название",100);
	Данные.НоваяКолонка("ВысотаДизайна","Число",10,2,"Высота",40);
	Данные.НоваяКолонка("ШиринаДизайна","Число",10,2,"Ширина",40);
	Данные.НоваяКолонка("СостояниеДизайна","Перечисление.СостояниеДизайна",,,"Состояние",40);  
	Данные.НоваяКолонка("ОбъемДизайна","Срока",50,,"Объем дизайна",40);
	Данные.НоваяКолонка("НомерСтрокиДокумента","Число",10,0); 
	
	Данные.ИзменятьПорядокСтрок=0;
	Данные.ВыводНаПечать=0;
	Данные.ИзменятьПозициюКолонок=0;
	Данные.ИзменятьНастройкуКолонок=0;
	НаборПрав=НазваниеНабораПрав();
	ИзменятьСоставСтрок=1;
	Если Форма.ТолькоПросмотр()=1 Тогда 
		ИзменятьСоставСтрок=0;
	ИначеЕсли Проведен()=1 Тогда    
		ИзменятьСоставСтрок=0;
	ИначеЕсли ЗакрытьДоступ=1 Тогда  
		ИзменятьСоставСтрок=0;
	ИначеЕсли тбКонтрагенты.КоличествоСтрок()=0 Тогда  
		ИзменятьСоставСтрок=0;
	Иначе
		Если  (НаборПрав="Администратор")Тогда
			ЗакрытьДоступСтраницаМенеджер=0;
		ИначеЕсли (НаборПрав="ГлавныйЭкономист") Тогда    
			ЗакрытьДоступСтраницаМенеджер=0;
		ИначеЕсли (фПодписьМенеджера=1) Тогда    
			ЗакрытьДоступСтраницаМенеджер=1;
		Иначе
			ЗакрытьДоступСтраницаМенеджер=0;
		КонецЕсли;  
		
		Если ЗакрытьДоступСтраницаМенеджер=1 Тогда
			ИзменятьСоставСтрок=0;
		КонецЕсли;
	КонецЕсли;	
	Данные.ИзменятьСоставСтрок=ИзменятьСоставСтрок;
	
	Колонки=Данные.Колонки;
	
	Колонки.НомерСтрокиДокумента.Видимость=0;
	
	
	
	Для НомерЗначения=0 По (Колонки.Количество()-1) Цикл
		ОтборРеквизита = Колонки.Получить(НомерЗначения);
		ОтборРеквизита.ШрифтЗаголовка=ШрифтЗаголовка;
	КонецЦикла;
	Данные.ВосстановитьПозициюКолонок();	
	
КонецПроцедуры // СоздатьПДИТДляМенеджера
//======================================================================
Процедура СоздатьПДИТДляТехнолога()
	ПДИнТбТехнолог = СоздатьОбъект("ПоставщикДанных");
	ПДИнТбТехнолог.ТипЗначений = "ИндексированнаяТаблица";
	ПДИнТбТехнолог.КонтейнерТабличногоПоля = "ТПТехнолог_";
	
	Данные = ПДИнТбТехнолог.Данные;
	
	Данные.НоваяКолонка("Код","Строка",9,,"Код",2);
	Данные.НоваяКолонка("Дизайн","Справочник.ТМЦ",,,"Название",65);
	Данные.НоваяКолонка("ШагПечати","Число",10,2,"Шаг Печати",3);
	Данные.НоваяКолонка("ШиринаДорожки","Число",10,2,"Ширина Дорожки",3);
	Данные.НоваяКолонка("ВысотаДизайна","Число",10,2,"Высота",3);
	Данные.НоваяКолонка("ШиринаДизайна","Число",10,2,"Ширина",3);
	Данные.НоваяКолонка("КолДорожек","Число",3,0,"К-во дорожек",3); 
	Данные.НоваяКолонка("РазверткаДизайна","Число",10,0,"Развертка Дизайна",3); 
	Данные.НоваяКолонка("БоковаяЗакладка","Число",10,2,"Бок.закладка",3);  
	Данные.НоваяКолонка("НижняяЗакладка","Число",10,2,"Ниж.закладка",3);  
	Данные.НоваяКолонка("ВерхняяЗакладка","Число",10,2,"Верх. закладка",3);  
	Данные.НоваяКолонка("ШиринаРучки","Число",10,2,"Ширина ручки",3);  
	Данные.НоваяКолонка("ДлинаРучки","Число",10,2,"Длина ручки",3); 
	Данные.НоваяКолонка("ТипПакета","Перечисление.ТипыПакетов",,,"Тип Пакета",5); 
	Данные.НоваяКолонка("ТипРучки","Перечисление.ТипыРучек",,,"Тип Ручки",3); 
	Данные.НоваяКолонка("СостояниеДизайна","Перечисление.СостояниеДизайна",,,"Состояние",5);   
	Данные.НоваяКолонка("РисунокДизайна","Справочник.Дизайны",,,"Рисунок дизайна",5);   
	
	Данные.ИзменятьПорядокСтрок=0;
	Данные.ВыводНаПечать=0;
	Данные.ИзменятьПозициюКолонок=0;
	Данные.ИзменятьНастройкуКолонок=0;
	НаборПрав=НазваниеНабораПрав();
	ИзменятьСоставСтрок=1;
	Если Форма.ТолькоПросмотр()=1 Тогда 
		ИзменятьСоставСтрок=0;
	ИначеЕсли Проведен()=1 Тогда    
		ИзменятьСоставСтрок=0;
	ИначеЕсли ЗакрытьДоступ=1 Тогда  
		ИзменятьСоставСтрок=0;
	ИначеЕсли тбКонтрагенты.КоличествоСтрок()=0 Тогда  
		ИзменятьСоставСтрок=0;
	Иначе
		Если  (НаборПрав="Администратор")Тогда
			ЗакрытьДоступКТехнологичПолям=0;
		ИначеЕсли (НаборПрав="ГлавныйЭкономист") Тогда    
			ЗакрытьДоступКТехнологичПолям=0;
		ИначеЕсли (фПодписьТехнолога=1) Тогда    
			ЗакрытьДоступКТехнологичПолям=1;
		Иначе
			ЗакрытьДоступКТехнологичПолям=0;
		КонецЕсли;  
		
		Если ЗакрытьДоступКТехнологичПолям=1 Тогда
			ИзменятьСоставСтрок=0;
		КонецЕсли;
	КонецЕсли;	
	Данные.ИзменятьСоставСтрок=ИзменятьСоставСтрок;
	
	Колонки=Данные.Колонки;
	Если фПакетоделание=0 Тогда   
		Колонки.БоковаяЗакладка.Видимость=0;
		Колонки.НижняяЗакладка.Видимость=0;
		Колонки.ВерхняяЗакладка.Видимость=0;
		Колонки.ТипПакета.Видимость=0;     
		Колонки.ТипРучки.Видимость=0;     
	Иначе    
		Колонки.БоковаяЗакладка.Видимость=1;     
		Колонки.НижняяЗакладка.Видимость=1;     
		Колонки.ВерхняяЗакладка.Видимость=1;  
		Колонки.ТипПакета.Видимость=1; 
		Колонки.ТипРучки.Видимость=1;        
	КонецЕсли;    
	Колонки.ШагПечати.Видимость=0;
	Колонки.ШиринаДорожки.Видимость=0;
	Колонки.ШиринаРучки.Видимость=0;
	Колонки.ДлинаРучки.Видимость=0;
	Колонки.РисунокДизайна.Видимость=0;
	
	
	Для НомерЗначения=0 По (Колонки.Количество()-1) Цикл
		ОтборРеквизита = Колонки.Получить(НомерЗначения);
		ОтборРеквизита.ШрифтЗаголовка=ШрифтЗаголовка;
	КонецЦикла;
	ИТЗТехнолог=ПДИнТбТехнолог.Данные.ИндексированнаяТаблица;
	ИТЗТехнолог.УдалитьСтроки();
	ВыбратьСтроки();
	Пока ПолучитьСтроку()=1 Цикл 
		ИТЗТехнолог.НоваяСтрока();   
		ИТЗТехнолог.Код=Дизайн.Код;
		ИТЗТехнолог.Дизайн=Дизайн;
		ИТЗТехнолог.ШагПечати=ШагПечати;
		ИТЗТехнолог.ШиринаДорожки=ШиринаДорожки;
		ИТЗТехнолог.ВысотаДизайна=ВысотаДизайна;
		ИТЗТехнолог.ШиринаДизайна=ШиринаДизайна;
		ИТЗТехнолог.КолДорожек=КолДорожек;
		ИТЗТехнолог.БоковаяЗакладка=БоковаяЗакладка;
		ИТЗТехнолог.НижняяЗакладка=НижняяЗакладка;
		ИТЗТехнолог.ВерхняяЗакладка=ВерхняяЗакладка;
		ИТЗТехнолог.ШиринаРучки=ШиринаРучки;
		ИТЗТехнолог.ДлинаРучки=ДлинаРучки;
		ИТЗТехнолог.ТипПакета=ТипПакета;
		ИТЗТехнолог.ТипРучки=ТипРучки;  
		ИТЗТехнолог.СостояниеДизайна=СостояниеДизайна;       
		ИТЗТехнолог.РазверткаДизайна=РазверткаДизайна;       
		ИТЗТехнолог.РисунокДизайна=РисунокДизайна;       
	КонецЦикла; 
	
	Данные.ВосстановитьПозициюКолонок();	
	
	ПДИТКраски = СоздатьОбъект("ПоставщикДанных");
	ПДИТКраски.ТипЗначений = "ИндексированнаяТаблица";
	ПДИТКраски.КонтейнерТабличногоПоля = "ТПКраски_";
	ПДИТКраски.КонтейнерКоманднойПанели = "КПКраски_";
	КоманднаяПанель=ПДИТКраски.ТабличноеПоле.КоманднаяПанель;
	СоздатьКнопки(КоманднаяПанель);
	
	Данные = ПДИТКраски.Данные;
	Данные.ИзменятьПорядокСтрок=0;
	Данные.ВыводНаПечать=0;
	Данные.ИзменятьНастройкуКолонок=0;
	Данные.ИзменятьПозициюКолонок=0;
	ПереченьНаборовПрав="Администратор,Технолог,ТехнологНикатор";
	Если Найти(ПереченьНаборовПрав,НаборПрав)=0 Тогда
		Данные.РазрешитьНачалоПеретаскивания=0;
		Данные.РазрешитьПеретаскивание=0;
		Данные.РежимВыделения=0;
	Иначе
		Данные.РазрешитьНачалоПеретаскивания=1;
		Данные.РазрешитьПеретаскивание=1;
		Данные.РежимВыделения=1;
	КонецЕсли;
	
	ИзменятьСоставСтрок=1;
	Если Форма.ТолькоПросмотр()=1 Тогда 
		ИзменятьСоставСтрок=0;
	ИначеЕсли Проведен()=1 Тогда    
		ИзменятьСоставСтрок=0;
	ИначеЕсли ЗакрытьДоступ=1 Тогда  
		ИзменятьСоставСтрок=0;
	Иначе
		Если  (НаборПрав="Администратор")Тогда
			ЗакрытьДоступКТехнологичПолям=0;
		ИначеЕсли (НаборПрав="ГлавныйЭкономист") Тогда    
			ЗакрытьДоступКТехнологичПолям=0;
		ИначеЕсли (фПодписьТехнолога=1) Тогда    
			ЗакрытьДоступКТехнологичПолям=1;
		Иначе
			ЗакрытьДоступКТехнологичПолям=0;
		КонецЕсли;  
		
		Если ЗакрытьДоступКТехнологичПолям=1 Тогда
			ИзменятьСоставСтрок=0;
		КонецЕсли;
	КонецЕсли;	
	Данные.ИзменятьСоставСтрок=ИзменятьСоставСтрок;
	
	Если ИзменятьСоставСтрок=0 Тогда
		Кнопки=КоманднаяПанель.Кнопки;
		Для НомерЗначения=0 По (Кнопки.Количество()-1) Цикл
			ОтборРеквизита = Кнопки.Получить(НомерЗначения);
			ОтборРеквизита.Доступность=ИзменятьСоставСтрок;
		КонецЦикла;
	КонецЕсли;
	списокАнилоксов=ВернутьАнилоксы(ПечатнаяМашина);
	Данные.НоваяКолонка("Краска","Справочник.ПоизводственныеМатериалы",,,"Краски",8);
	Данные.НоваяКолонка("ПроцентЗапечатки","Число",4,0,"% запечатки",5);
	Данные.НоваяКолонка("КвоФотоФорм","Число",4,0,"Кол-во ф.форм",5);
	Данные.НоваяКолонка("ПроцентСвязующего","Число",2,0,"% Связующего",5);
	Данные.НоваяКолонка("Цена","Число",10,2,"Цена",3); 
	Данные.НоваяКолонка("Анилокс","СписокЗначений",списокАнилоксов,,"Анилокс",5); 
	Колонки=Данные.Колонки;
	
	
	Для НомерЗначения=0 По (Колонки.Количество()-1) Цикл
		ОтборРеквизита = Колонки.Получить(НомерЗначения);
		ОтборРеквизита.ШрифтЗаголовка=ШрифтЗаголовка;
	КонецЦикла;
	
	
	Данные.ВосстановитьПозициюКолонок();	
	ПДИнТбТехнолог.Обновить();
	
КонецПроцедуры // СоздатьПДИТДляТехнолога
//======================================================================
Процедура СоздатьПДИТДляТПЛаминаторщика()
	ПДИнТбЛаминаторщик = СоздатьОбъект("ПоставщикДанных");
	ПДИнТбЛаминаторщик.ТипЗначений = "ИндексированнаяТаблица";
	ПДИнТбЛаминаторщик.КонтейнерТабличногоПоля = "ТПЛаминация_";
	
	Данные = ПДИнТбЛаминаторщик.Данные;
	
	Данные.НоваяКолонка("Код","Строка",9,,"Код",2);
	Данные.НоваяКолонка("Дизайн","Справочник.ТМЦ",,,"Название",65);
	Данные.НоваяКолонка("ШагПечати","Число",10,2,"Шаг Печати",3);
	Данные.НоваяКолонка("ШиринаДорожки","Число",10,2,"Ширина Дорожки",3);
	Данные.НоваяКолонка("ВысотаДизайна","Число",10,2,"Высота",3);
	Данные.НоваяКолонка("ШиринаДизайна","Число",10,2,"Ширина",3);
	Данные.НоваяКолонка("КолДорожек","Число",3,0,"К-во дорожек",3); 
	Данные.НоваяКолонка("РазверткаДизайна","Число",10,0,"Развертка Дизайна",3); 
	Данные.НоваяКолонка("БоковаяЗакладка","Число",10,2,"Бок.закладка",3);  
	Данные.НоваяКолонка("НижняяЗакладка","Число",10,2,"Ниж.закладка",3);  
	Данные.НоваяКолонка("ВерхняяЗакладка","Число",10,2,"Верх. закладка",3);  
	Данные.НоваяКолонка("ШиринаРучки","Число",10,2,"Ширина ручки",3);  
	Данные.НоваяКолонка("ДлинаРучки","Число",10,2,"Длина ручки",3); 
	Данные.НоваяКолонка("ТипПакета","Перечисление.ТипыПакетов",,,"Тип Пакета",5); 
	Данные.НоваяКолонка("ТипРучки","Перечисление.ТипыРучек",,,"Тип Ручки",3); 
	Данные.НоваяКолонка("СостояниеДизайна","Перечисление.СостояниеДизайна",,,"Состояние",5);   
	Данные.НоваяКолонка("РисунокДизайна","Справочник.Дизайны",,,"Рисунок дизайна",5);   
	
	Данные.ИзменятьПорядокСтрок=0;
	Данные.ВыводНаПечать=0;
	Данные.ИзменятьПозициюКолонок=0;
	Данные.ИзменятьНастройкуКолонок=0;
	НаборПрав=НазваниеНабораПрав();
	ИзменятьСоставСтрок=1;
	Если Форма.ТолькоПросмотр()=1 Тогда 
		ИзменятьСоставСтрок=0;
	ИначеЕсли Проведен()=1 Тогда    
		ИзменятьСоставСтрок=0;
	ИначеЕсли ЗакрытьДоступ=1 Тогда  
		ИзменятьСоставСтрок=0;
	ИначеЕсли тбКонтрагенты.КоличествоСтрок()=0 Тогда  
		ИзменятьСоставСтрок=0;
	Иначе
		Если (фПодписьЛаминаторщика=1) Тогда    
			ЗакрытьДоступКПолям=1;
		Иначе
			ЗакрытьДоступКПолям=0;
		КонецЕсли;  
		
		Если ЗакрытьДоступКПолям=1 Тогда
			ИзменятьСоставСтрок=0;
		КонецЕсли;
	КонецЕсли;	
	Данные.ИзменятьСоставСтрок=ИзменятьСоставСтрок;
	
	Колонки=Данные.Колонки;
	Если фПакетоделание=0 Тогда   
		Колонки.БоковаяЗакладка.Видимость=0;
		Колонки.НижняяЗакладка.Видимость=0;
		Колонки.ВерхняяЗакладка.Видимость=0;
		Колонки.ТипПакета.Видимость=0;     
		Колонки.ТипРучки.Видимость=0;     
	Иначе    
		Колонки.БоковаяЗакладка.Видимость=1;     
		Колонки.НижняяЗакладка.Видимость=1;     
		Колонки.ВерхняяЗакладка.Видимость=1;  
		Колонки.ТипПакета.Видимость=1; 
		Колонки.ТипРучки.Видимость=1;        
	КонецЕсли;    
	Колонки.ШагПечати.Видимость=0;
	Колонки.ШиринаДорожки.Видимость=0;
	Колонки.ШиринаРучки.Видимость=0;
	Колонки.ДлинаРучки.Видимость=0;
	Колонки.РисунокДизайна.Видимость=0;
	
	
	Для НомерЗначения=0 По (Колонки.Количество()-1) Цикл
		ОтборРеквизита = Колонки.Получить(НомерЗначения);
		ОтборРеквизита.ШрифтЗаголовка=ШрифтЗаголовка;
	КонецЦикла;
	ИТЗЛаминаторщик=ПДИнТбЛаминаторщик.Данные.ИндексированнаяТаблица;
	ИТЗЛаминаторщик.УдалитьСтроки();
	ВыбратьСтроки();
	Пока ПолучитьСтроку()=1 Цикл 
		ИТЗЛаминаторщик.НоваяСтрока();   
		ИТЗЛаминаторщик.Код=Дизайн.Код;
		ИТЗЛаминаторщик.Дизайн=Дизайн;
		ИТЗЛаминаторщик.ШагПечати=ШагПечати;
		ИТЗЛаминаторщик.ШиринаДорожки=ШиринаДорожки;
		ИТЗЛаминаторщик.ВысотаДизайна=ВысотаДизайна;
		ИТЗЛаминаторщик.ШиринаДизайна=ШиринаДизайна;
		ИТЗЛаминаторщик.КолДорожек=КолДорожек;
		ИТЗЛаминаторщик.БоковаяЗакладка=БоковаяЗакладка;
		ИТЗЛаминаторщик.НижняяЗакладка=НижняяЗакладка;
		ИТЗЛаминаторщик.ВерхняяЗакладка=ВерхняяЗакладка;
		ИТЗЛаминаторщик.ШиринаРучки=ШиринаРучки;
		ИТЗЛаминаторщик.ДлинаРучки=ДлинаРучки;
		ИТЗЛаминаторщик.ТипПакета=ТипПакета;
		ИТЗЛаминаторщик.ТипРучки=ТипРучки;  
		ИТЗЛаминаторщик.СостояниеДизайна=СостояниеДизайна;       
		ИТЗЛаминаторщик.РазверткаДизайна=РазверткаДизайна;       
		ИТЗЛаминаторщик.РисунокДизайна=РисунокДизайна;       
	КонецЦикла; 
	
	Данные.ВосстановитьПозициюКолонок();	
	
	
	ПДИнТбЛаминаторщик.Обновить();
	
КонецПроцедуры // СоздатьПДИТДляТехнолога
//======================================================================
Процедура СоздатьПДПродажа()
	//для менеджера
	ПДИТПродажа = СоздатьОбъект("ПоставщикДанных");
	ПДИТПродажа.ТипЗначений = "ИндексированнаяТаблица";
	ПДИТПродажа.КонтейнерТабличногоПоля = "ТППродажа_";
	
	Данные = ПДИТПродажа.Данные;
	Данные.АвтоКонтекстноеМеню=0;
	Данные.ИзменятьПорядокСтрок=0;
	Данные.ВыводНаПечать=0;
	Данные.ИзменятьПозициюКолонок=0;
	Данные.ИзменятьНастройкуКолонок=0;
	
	Данные.НоваяКолонка("Контрагент","Справочник",,,"Заказчик");
	СписокЗначений=СоздатьОбъект("СписокЗначений");
	СписокЗначений.ДобавитьЗначение(0,"В цене");
	СписокЗначений.ДобавитьЗначение(1,"Отдельно");
	Данные.НоваяКолонка("фДругаяСтоимостьФорм","СписокЗначений",СписокЗначений,0,"Способ расчета");   
	Данные.НоваяКолонка("СебистоимостьПечатныхФорм","Число",19,4,"Себистоимость Печ.Форм");   
	Данные.НоваяКолонка("ПродажнаяСтоимостьФорм","Число",19,4,"Стоимость");    
	Данные.НоваяКолонка("УстановленныйОбъем","Число",19,4,"Объем");   
	Данные.НоваяКолонка("НестандартныйОбъем","Число",19,4,"Официал.объем");
	Данные.НоваяКолонка("УстановленнаяЦенаБезФорм","Число",19,3,"Цена б/ф");   
	Данные.НоваяКолонка("УстановленнаяЦена","Число",19,3,"Цена с/ф");   
	Данные.НоваяКолонка("Откат","Число",19,3,"Бонус");   
	Данные.НоваяКолонка("УстановленнаяЦенаПоДокументам","Число",19,3,"Цена(для док.)");   
	Данные.НоваяКолонка("РентабельностьЗаказа","Перечисление.Рентабельность",,,"Рентабельность");   
	Данные.НоваяКолонка("ЗаказВакиля","Документ",,,"КПЗ"); 
	
	Данные.СтильЗаголовков=0;
	Данные.СтильАктивногоЗаголовка=0;
	Колонки=Данные.Колонки;
	
	Для НомерЗначения=0 По (Колонки.Количество()-1) Цикл
		ОтборРеквизита = Колонки.Получить(НомерЗначения);
		ОтборРеквизита.ШрифтЗаголовка=ШрифтЗаголовка;
		ОтборРеквизита.ЦветФонаЗаголовка=глПолучитьЦвет(200,200,200);
	КонецЦикла;
	Колонки.фДругаяСтоимостьФорм.ИзменениеРазмера=1;
	
	ПриНажатииВидимыеКолонкиВТППродажа("кПродажныеЦены");
	//ИзмВидимостьКолонокВТППродажныеЦены();
	
	//Данные.ВосстановитьПозициюКолонок();	
	
КонецПроцедуры // СоздатьПДПродажа
//======================================================================
Процедура СоздатьПДКонтрагентыПодчДоки()
	
	ПДКонтрагентыПодчДоки = СоздатьОбъект("ПоставщикДанных");
	ПДКонтрагентыПодчДоки.ТипЗначений = "ИндексированнаяТаблица";
	ПДКонтрагентыПодчДоки.КонтейнерТабличногоПоля = "ТПКонтрагентыПодчДоки_";
	
	Данные = ПДКонтрагентыПодчДоки.Данные;
	Данные.АвтоКонтекстноеМеню=0;
	
	Данные.НоваяКолонка("Контрагент","Справочник",,,"Заказчик");
	Данные.НоваяКолонка("Менеджер","Справочник",,,"Менеджер");
	Данные.НоваяКолонка("ЗаказВакиля","Документ",,,"КПЗ");
	
	Данные.ИзменятьПорядокСтрок=0;
	Данные.ВыводНаПечать=0;
	Данные.ИзменятьПозициюКолонок=0;
	Данные.ИзменятьНастройкуКолонок=0;
	
	Данные.РазрешитьНачалоПеретаскивания=0;
	Данные.РазрешитьПеретаскивание=0;
	Данные.ТаймаутБыстрогоПоиска=0;
	Колонки=Данные.Колонки;
	Данные.СтильЗаголовков=0;
	Данные.СтильАктивногоЗаголовка=0;
	Колонки=Данные.Колонки;
	
	Для НомерЗначения=0 По (Колонки.Количество()-1) Цикл
		ОтборРеквизита = Колонки.Получить(НомерЗначения);
		ОтборРеквизита.ШрифтЗаголовка=ШрифтЗаголовка;
		ОтборРеквизита.ЦветФонаЗаголовка=глПолучитьЦвет(200,200,200);
	КонецЦикла;
	
	
КонецПроцедуры // 
//======================================================================
Процедура ПослеСозданияФормы()
	СоздатьПДИТДляОбъема();
	СоздатьПДИТДляМенеджера();
	СоздатьПДИТДляТехнолога();
	СоздатьПДИТДляТПЛаминаторщика();
	СоздатьПДПродажа();
	СоздатьПДКонтрагентыПодчДоки();
	ОбновитьТаблицыДокумента();
	
	
	
КонецПроцедуры
// ===============================