Веб-сервисы, возвращающие строку - работают.
пытаюсь возвратить список с помощью XDTO пакетов.
Создал пакет, создал веб-сервис, который его вызывает. Код обработчика:
Функция ReturnAccountsSum(date)
// Вставить содержимое обработчика.
Если Не ЗначениеЗаполнено(date) тогда
ВОзврат "date not set";
КонецЕсли;
//date в формате годмесяцдень
Попытка
ДатаДокумента = Дата(date);
исключение
ВОзврат "date not correct. Date should be as 'yaermonthday' (20120117)"; //20141404
КонецПопытки;
Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
| ПоступлениеНаРасчетныйСчет.Контрагент.ИНН КАК ИНН,
| СУММА(ПоступлениеНаРасчетныйСчет.СуммаДокумента) КАК СуммаДокумента
|ИЗ
| Документ.ПоступлениеНаРасчетныйСчет КАК ПоступлениеНаРасчетныйСчет
|ГДЕ
| НАЧАЛОПЕРИОДА(ПоступлениеНаРасчетныйСчет.Дата, МЕСЯЦ) = &Дата
|
|СГРУППИРОВАТЬ ПО
| ПоступлениеНаРасчетныйСчет.Контрагент.ИНН";
Запрос.УстановитьПараметр("Дата",НачалоМесяца(ДатаДокумента));
Выборка = Запрос.Выполнить().Выбрать();
КлиентТип = ФабрикаXDTO.Тип("http://www.sample-package.org", "Клиент");
КлиентыТип = ФабрикаXDTO.Тип("http://www.sample-package.org", "Клиенты");
СписокКлиентов = ФабрикаXDTO.Создать(КлиентыТип);
Пока Выборка.Следующий() ЦИкл Клиент = ФабрикаXDTO.Создать(КлиентТип);
Клиент.Сумма = Строка(Выборка.СуммаДокумента);
Клиент.ИНН = Выборка.ИНН; СписокКлиентов.Клиент.Добавить(Клиент);
КонецЦикла;
Возврат СписокКлиентов
КонецФункции