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

	Запрос.УстановитьПараметр("Кошелек", Кошелек);	
	
	Результат = Запрос.Выполнить();
	Выборка = Результат.Выбрать();
	Пока Выборка Цикл
	   ТипДвижения = СокрЛП(Выборка.ВидДвижения);		
	   Если ТипДвижения = "Приход" Тогда
		  ИтогСумма =  ИтогСумма + Выборка.Сумма;		  
	   Иначе
		  ИтогСумма =  ИтогСумма - Выборка.Сумма; 					
	   КонецЕсли;
		//Сообщить(Выборка.Кошелек);
		ОблЭлемент.Параметры.Заполнить(Выборка);
		ОблЭлемент.Параметры.Дата = Формат(Выборка.Дата, "ДЛФ=ДД");
		ОблЭлемент.Параметры.Кошелек = Выборка.Кошелек;
		ТабДок.Вывести(ОблЭлемент);				
	
	КонецЦикла; 
	            					
	     ОблПодвал.Параметры.Итого = ИтогСумма;
	     ТабДок.Вывести(ОблПодвал);

		 		
			 

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

{Отчет.ОтчетПоДвижениямВКошельках1.Форма.ФормаОтчета.Форма( 29 , 39 )}: Переменная не определена (Кошелек)
	Запрос.УстановитьПараметр("Кошелек", <<?>>Кошелек);	 (Проверка: Сервер)