Процедура new()
	Перем Запрос, ТекстЗапроса, Таб;
	//Создание объекта типа Запрос
	Запрос = СоздатьОбъект("Запрос");
	ТекстЗапроса = 
	"//{{ЗАПРОС(new)
	|с ВыбНачПериода по ВыбКонПериода;
	|Обрабатывать НеПомеченныеНаУдаление;
	|Фамилия=Справочник.Первый.Фамилия;
	|Начало_к=Справочник.Второй.Начало_к;
	|Группировка Фамилия; 
	|"//}}ЗАПРОС
	;
	Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
		Возврат;
	КонецЕсли;
	Таб = СоздатьОбъект("Таблица");
	Таб.ИсходнаяТаблица("new");
	Таб.ВывестиСекцию("Заголовок");
	Состояние("Заполнение выходной таблицы...");
	Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
	Пока Запрос.Группировка(1) = 1 Цикл
		Таб.ВывестиСекцию("Фамилия");
	КонецЦикла;
	Таб.ТолькоПросмотр(1);
	Таб.Показать("new", "");
КонецПроцедуры