[color=red]Процедура[/color] ВыбДокСогласноВиду(Элемент)
	// в примере отсутствуют  2  нижеидущие строки:
	ТабДок = New ТабличныйДокумент; 
	Макет = Документы.ПриходнаяНакладная.ПолучитьМакет("Макет"); 

	Для каждого Стр из ПолеСписка1 цикл  
			Если Стр.Пометка =  false then 
			
		ДокМен = Документы[Стр.Значение.Имя]; 
		ДокВыборка = ДокМен.Выбрать(НачПериода,КонПериода);  
		Область = Макет.ПолучитьОбласть("ВидДок");  
		
                         Область.Параметры.ВидДок = Стр.Значение.Синоним;  
		[color=red]// {Отчет.РеестрДокументов.Форма.ФормаОтчета( 312 )}: 
		// Поле объекта не обнаружено (ВидДок)
		// Область.Параметры.ВидДок = Стр.Значение.Синоним; [/color] 
	
		ТабДок.Вывести(Область);   
		Область = Макет.ПолучитьОбласть("Документ"); 
		Пока ДокВыборка.Следующий() цикл
			Область.Параметры.Док = Строка(ДокВыборка); 
			ТабДок.Вывести(Область);  
	 	КонецЦикла;
	КонецЕсли;   
КонецЦикла;
ТабДок.Показать(); 
[color=red]КонецПроцедуры[/color]