0
advert
05.03.12
✎
11:00
|
Доброго времнеи суток!
Создал небольшой веб-сервис для возврата табличной чатси расходного ордера на товары (УТ 11) по запросу его номера
Функция ПолучитьДанныеОтгрузки(КодДокумента) Экспорт
ДокументСсылка = Документы.РасходныйОрдерНаТовары.НайтиПоНомеру(КодДокумента);
Если ДокументСсылка.Пустая() Тогда
Возврат Неопределено;
КонецЕсли;
Документ = ДокументСсылка.ПолучитьОбъект();
НоменклатураТип = ФабрикаXDTO.Тип("http://www.localhost/ut002/order", "НоменклатураНаименованиеПолное");
РасходныйОрдерНаТоварыТип = ФабрикаXDTO.Тип("http://www.localhost/ut002/order", "РасходныйОрдерНаТовары");
ЭлементРасходногоОрдераНаТоварыТип = ФабрикаXDTO.Тип("http://www.localhost/ut002/order", "ЭлементРасходногоОрдераНаТовары");
РасходныйОрдерНаТовары = ФабрикаXDTO.Создать(РасходныйОрдерНаТоварыТип);
Для Каждого Элемент Из Документ.Состав Цикл
ЭлементРасходногоОрдераНаТовары = ФабрикаXDTO.Создать(ЭлементРасходногоОрдераНаТоварыТип);
Номенклатура = ФабрикаXDTO.Создать(НоменклатураТип);
Номенклатура.НаименованиеПолное = Элемент.Номенклатура.НаименованиеПолное;
ЭлементРасходногоОрдераНаТовары.Номенклатура = Номенклатура;
ЭлементРасходногоОрдераНаТовары.Упаковка = Элемент.Упаковка;
ЭлементРасходногоОрдераНаТовары.Количество = Элемент.Количество;
РасходныйОрдерНаТовары.Состав.Добавить(ЭлементРасходногоОрдераНаТовары);
КонецЦикла;
Возврат РасходныйОрдерНаТовары;
КонецФункции
Но данные в программу-приемник не попадают. Где может быть ошибка? Может неправильно созданы XDTO-пакеты?
|
|