Подскажите по коду как правильно будет

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

	 Запрос = Новый Запрос;
	 Запрос.Текст = 
		"ВЫБРАТЬ
		|	ФизическиеЛицаКонтактнаяИнформация.Ссылка КАК Ссылка,
		|	ФизическиеЛицаКонтактнаяИнформация.АдресЭП КАК АдресЭП
		|ИЗ
		|	Справочник.ФизическиеЛица.КонтактнаяИнформация КАК ФизическиеЛицаКонтактнаяИнформация
		|ГДЕ
		|	ФизическиеЛицаКонтактнаяИнформация.Тип = &Тип
		|	И ФизическиеЛицаКонтактнаяИнформация.Вид = &Вид
		|	И ФизическиеЛицаКонтактнаяИнформация.АдресЭП <> """"""""
		|	И НЕ ФизическиеЛицаКонтактнаяИнформация.Ссылка.ПометкаУдаления
		|	И ФизическиеЛицаКонтактнаяИнформация.Ссылка.Наименование = &Наименование";
		
	
	Запрос.УстановитьПараметр("Наименование", 	Справочники.ФизическиеЛица.НайтиПоНаименованию("Иванов Иван"));	
	Запрос.УстановитьПараметр("ВидКИЭлПочта", 	Справочники.ВидыКонтактнойИнформации.НайтиПоНаименованию("Электронная почта"));
	Запрос.УстановитьПараметр("ТипКИЭлПочта", 	Перечисления.ТипыКонтактнойИнформации.АдресЭлектроннойПочты);
	
	РезультатЗапроса = Запрос.Выполнить();
	
	ВыборкаДетальныеЗаписи2 = РезультатЗапроса.Выбрать();
	
	Пока ВыборкаДетальныеЗаписи2.Следующий() Цикл
	
	КонецЦикла;
	
	
	
	
	
	
КонецПроцедуры

&НаСервере
Функция  ОтправитьУведомлениеНаСервере() 
	
	УведомлениеОтправлено = ЛОЖЬ;
	
	темаПисьма = "Весят очереди чеков";
	
	телоПисьма = темаПисьма + "." + СИМВОЛЫ.ПС;
	
	телоПисьма = телоПисьма + СИМВОЛЫ.ПС + СИМВОЛЫ.ПС
			+ "С уважением," + СИМВОЛЫ.ПС 
			+ "  Некто";

		СтруктураПолучатель = Новый Структура("Адрес,Представление");
		СтруктураПолучатель.Адрес			= ВыполнитьПоискНужныхЗаписей.АдресЭП;
		СтруктураПолучатель.Представление	= ВыполнитьПоискНужныхЗаписей.Ссылка;
		
		времПолучателиСообщения = Новый Массив;
		времПолучателиСообщения.Добавить(СтруктураПолучатель);

		//СтруктураОтправитель = Новый Структура("Адрес,Представление");
		//СтруктураОтправитель.Адрес			= УчЗаписьЭлПочты;
		//СтруктураОтправитель.Представление	= СТРОКА(УчЗаписьЭлПочты); // "Системная учетная запись";
		//времАдресаОтвета = Новый Массив;
		//времАдресаОтвета.Добавить(СтруктураОтправитель);

		времПараметрыПисьма = Новый Структура();	
		времПараметрыПисьма.Вставить("Кому", 						ВыполнитьПоискНужныхЗаписей.АдресЭП);
		времПараметрыПисьма.Вставить("ПолучателиСообщения",			времПолучателиСообщения);
		времПараметрыПисьма.Вставить("Тема",						темаПисьма);
		времПараметрыПисьма.Вставить("Тело",						телоПисьма);
		времПараметрыПисьма.Вставить("ТипТекста",					Перечисления.ТипыТекстовЭлектронныхПисем.ПростойТекст);

	   	ИдентификаторПочтовогоСообщения = РаботаСПочтовымиСообщениями.ОтправитьПочтовоеСообщение(времПараметрыПисьма);
		
		УведомлениеОтправлено = ИСТИНА;
		
		
		Возврат УведомлениеОтправлено;
		
КонецФункции

&НаКлиенте
Функция ОтправитьУведомление(Команда)
	ОтправитьУведомлениеНаСервере();
КонецФункции

темаПисьма = "Весят очереди чеков" + " " + ВыборкаДетальныеЗаписи1.Номер + " от " +
ВыборкаДетальныеЗаписи1.Дата;;

телоПисьма = темаПисьма + "." + СИМВОЛЫ.ПС;