Вход | Регистрация


Помогите с SOAP сервисом

Помогите с SOAP сервисом
Я
   korstin
 
28.09.16 - 11:16
Есть SOAP-сервис (закрытый), необходимо выполнить запрос

Пример запроса:
<?xml version="1.0" encoding="utf-8"?>
<soap12:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"; xmlns:xsd="http://www.w3.org/2001/XMLSchema"; xmlns:soap12="http://www.w3.org/2003/05/soap-envelope">;
  <soap12:Body>

    <BulkSearchByCodes xmlns="http://myurl/soap">;
      <codes>
        <CodeSet>
          <INN>string</INN>
          <KPP>string</KPP>
        </CodeSet>
      </codes>
    </BulkSearchByCodes>
  </soap12:Body>
</soap12:Envelope>

Пример ответа:
<?xml version="1.0" encoding="utf-8"?>
<soap12:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"; xmlns:xsd="http://www.w3.org/2001/XMLSchema"; xmlns:soap12="http://www.w3.org/2003/05/soap-envelope">;
  <soap12:Body>

    <BulkSearchByCodesResponse xmlns="http://myurl/soap">;
      <result>
        <data>
          <card>
            ...
          </card>
          <card>
            ...
          </card>
        </data>
        <truncated>boolean</truncated>
      </result>
    </BulkSearchByCodesResponse>
  </soap12:Body>
</soap12:Envelope>
 
 
   korstin
 
1 - 28.09.16 - 11:18
WS Ссылку проимпортировал


ВебСсылка = WSСсылки.МояСсылка;
ssl = Новый ЗащищенноеСоединениеOpenSSL();
ВебСервис = ВебСсылка.СоздатьWSПрокси("http://myurl/soap";, "SearchService", "SearchServiceSoap12", , , ssl);
ТипWSПараметра = ВебСервис.ФабрикаXDTO.Пакеты.Получить("http://myurl/soap").Получить("BulkSearchByCodes";);
WSПараметр = ВебСервис.ФабрикаXDTO.Создать(ТипWSПараметра);
ТипArrayOfCodeSet = ВебСервис.ФабрикаXDTO.Тип("http://myurl/soap";, "ArrayOfCodeSet");
ТипCodeSet = ВебСервис.ФабрикаXDTO.Тип("http://myurl/soap";, "CodeSet");

ЗначениеArrayOfCodeSet = ВебСервис.ФабрикаXDTO.Создать(ТипArrayOfCodeSet);    

ЗначениеCodeSet = ВебСервис.ФабрикаXDTO.Создать(ТипCodeSet);
ЗначениеCodeSet.INN = "ааааа";
ЗначениеCodeSet.KPP = "ббббб";
ЗначениеArrayOfCodeSet.CodeSet.Добавить(ЗначениеCodeSet);

ЗначениеCodeSet = ВебСервис.ФабрикаXDTO.Создать(ТипCodeSet);
ЗначениеCodeSet.INN = "ввввв";
ЗначениеCodeSet.KPP = "ггггг";
ЗначениеArrayOfCodeSet.CodeSet.Добавить(ЗначениеCodeSet);

WSПараметр.codes = ЗначениеArrayOfCodeSet;
Результат = ВебСервис.BulkSearchByCodes(WSПараметр);
Для Каждого СтрокаДанных Из Результат.data Цикл
    Сообщить(СтрокаДанных);
КонецЦикла;
   korstin
 
2 - 28.09.16 - 11:19
Прошу прощения, последние строки должны быть как

Для Каждого СтрокаДанных Из Результат.data.card Цикл
    Сообщить(СтрокаДанных);
КонецЦикла;
   korstin
 
3 - 28.09.16 - 11:20
Так вот, возвращенных данных нет. Через SoapUI проверил - данные возвращаются с этими параметрами.

Знающие, подскажите, где ошибка и куда копать?
   korstin
 
4 - 28.09.16 - 11:56
Вопрос снят, помог Fiddler

Список тем форума
Рекламное место пустует  Рекламное место пустует
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.
Тема не обновлялась длительное время, и была помечена как архивная. Добавление сообщений невозможно.
Но вы можете создать новую ветку и вам обязательно ответят!
Каждый час на Волшебном форуме бывает более 2000 человек.
Рекламное место пустует