Процедура ПоказанияАбонента(Абонент,СтрокаДЗ)
	Запрос = Новый Запрос;
	Запрос.Текст = 
		"ВЫБРАТЬ
		|	ВводПоказанийСчетчиков.Ссылка,
		|	Протокол.ВремяЗаписи,
		|	Протокол.Записал
		|ИЗ
		|	Документ.ВводПоказанийСчетчиков КАК ВводПоказанийСчетчиков
		|		ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ДатыЗапретаРедактирования КАК ДатыЗапретаРедактирования
		|		ПО ВводПоказанийСчетчиков.Подразделение = ДатыЗапретаРедактирования.Подразделение
		|		ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.Протокол КАК Протокол
		|		ПО ВводПоказанийСчетчиков.Ссылка = Протокол.Объект
		|ГДЕ
		|	НЕ ВводПоказанийСчетчиков.ПометкаУдаления
		|	И ВводПоказанийСчетчиков.УчетныйМесяц = ДатыЗапретаРедактирования.РасчетныйПериод
		|	И ВводПоказанийСчетчиков.Абонент = &Абонент";
	Запрос.УстановитьПараметр("Абонент", Абонент);
	Результат = Запрос.Выполнить();
	Если Не Результат.Пустой() Тогда
		Выборка = Результат.Выбрать();
		НоваяГруппа=СтрокаДЗ.Строки.Добавить();
		НоваяГруппа.ВидДокумента="Показания";
		Пока Выборка.Следующий() Цикл
			Если Объект.Администратор Тогда
				НоваяСтрока = НоваяГруппа.Строки.Добавить();
				НоваяСтрока.Документ = Выборка.Ссылка;
				НоваяСтрока.ДатаДокумента = Выборка.ВремяЗаписи;
				НоваяСтрока.Автор = Выборка.Записал;
			Иначе
				Если СокрЛП(Выборка.Записал)=СокрЛП(ПолучитьТекущегоПользователя()) Тогда
					НоваяСтрока = НоваяГруппа.Строки.Добавить();
					НоваяСтрока.Документ = Выборка.Ссылка;
					НоваяСтрока.ДатаДокумента = Выборка.ВремяЗаписи;
					НоваяСтрока.Автор = Выборка.Записал;				
				КонецЕсли;
			КонецЕсли;
		КонецЦикла;
		Если НоваяГруппа.Строки.Количество()= 0 Тогда // вот здесь проверяю на наличие вложенных строк
                        //код удаления данной строки я так понимаю должен быть здесь но вот как это сделать я так и не понял
		КонецЕсли; 
	КонецЕсли;	
КонецПроцедуры

СтрокаДЗ.Строки.Удалить(НоваяГруппа);