Написать запорос

Есть РегистрНакопления.Бонусы
Нужно что бы клиенту отправлялось смс с кол-вом бонусов ПОСЛЕ посещения (после проведения документа Оказания услуг)
Нужно именно настроить что бы подтягиволось количество бонусов от куда то.. т.е. из регистра накоплений...

Уже сделано:

&НаКлиенте
Процедура ОтправитьСМС1(Команда)
СмсКлиенту1();
КонецПроцедуры

//Если выбрали смс оповещение , то создаём документ "рассылка"
&НаСервере
Процедура СмсКлиенту1()
ЗапросТелефона = Новый Запрос;
ЗапросТелефона.Текст = "ВЫБРАТЬ
| КонтактнаяИнформация.Объект,
| КонтактнаяИнформация.Вид,
| КонтактнаяИнформация.Поле3,
| КонтактнаяИнформация.Представление
|ИЗ
| РегистрСведений.КонтактнаяИнформация КАК КонтактнаяИнформация
|ГДЕ
| КонтактнаяИнформация.Объект = &ТекущийКлиент";

ЗапросТелефона.УстановитьПараметр("ТекущийКлиент",Объект.Клиент);
ЗапросТелефона.УстановитьПараметр("СотовыйТелефон", Справочники.ВидыКонтактнойИнформации.НайтиПоНаименованию("Сотовый телефон"));
РезультатВыбораТелефона = ЗапросТелефона.Выполнить().Выбрать();
Пока РезультатВыбораТелефона.Следующий()Цикл
ТелефонКлиента = РезультатВыбораТелефона.Представление;
//КонецЕсли;
КонецЦикла;

НовоеСМС = Документы.Рассылка.СоздатьДокумент();

НовоеСМС.Дата = ТекущаяДата();
НовоеСМС.ОбработкаSMSРассылки = Справочники.ОбработкиSMSрассылки.НайтиПоНаименованию("Stream-Telecom SMS");
НовоеСМС.ДоставитьСообщениеВУказанноеВремя = Истина;
НовоеСМС.ДатаОтправки = ТекущаяДата();
НовоеСМС.ТекстФиксированный = ЛОЖЬ;
НовоеСМС.Комментарий = Объект.Ссылка;
НовоеСМС.Записать(РежимЗаписиДокумента.Проведение);

НаборЗаписейРегистра = РегистрыСведений.СообщенияSMS.СоздатьНаборЗаписей();
НаборЗаписейРегистра.Отбор.Источник.Установить(Объект.Ссылка);
НоваяЗАПИСЬ = НаборЗаписейРегистра.Добавить();
НоваяЗАПИСЬ.Рассылка = НовоеСМС.Ссылка;
НоваяЗАПИСЬ.ВидСообщения = Справочники.ВидыСообщенийСМС.НайтиПоНаименованию("Бонус");
НоваяЗАПИСЬ.Получатель = Объект.Пациент;
НоваяЗАПИСЬ.ДатаОтправки = ТекущаяДата();
НоваяЗАПИСЬ.Источник = Объект.Ссылка;
НоваяЗАПИСЬ.СтатусОтправки = Перечисления.СтатусыОтправкиСообщений.НеОтправлено;
НоваяЗАПИСЬ.ТелефонПолучателя =ТелефонКлиента;
ТекстСМС = ""+Объект.Клиент.Имя+" "+Объект.Клиент.Отчество+", Ваш бонусный баланс: "+Объект.Клиент.Бонус+" руб.";
НоваяЗАпись.Текст = ТекстСМС;

НаборЗаписейРегистра.Записать();

КонецПроцедуры