0
scanduta
15.08.16
✎
17:25
|
Пытаюсь подрубиться к веб сервису "Проверка контрагента" от ФНС России.
Делаю так:
Параметры = Новый Массив;
Параметры.Добавить(";);
Параметры.Добавить(5);
ИнтернетПрокси111= ПолучитьПрокси();
WSОпределения = Новый WSОпределения(";, "", "", ИнтернетПрокси111, 5);
//WSОпределения = Новый(Тип("WSОпределения"), Параметры);
// Получаем следующий код:
Прокси = Новый WSПрокси(WSОпределения, ";, "FNSNDSCAWS2", "FNSNDSCAWS2_Port");
Запрос = Прокси.ФабрикаXDTO.Создать(Прокси.ФабрикаXDTO.Тип(";, "NdsRequest2"));
Контрагент = Прокси.ФабрикаXDTO.Создать(Прокси.ФабрикаXDTO.Тип(";, "NdsRequest2_NP"));
//Пусть данные по контрагентам находятся в некоторой таблице ДанныеПоКонтрагентам с полями {ИНН, КПП, ДатаДляПроверки}. Заполним из этой таблицы коллекцию контрагентов для веб-сервиса:
Контрагент.INN = "7707083893";
Контрагент.KPP = "775003035";
Контрагент.DT = Формат(ТекущаяДата(), "ДФ=dd.MM.yyyy");
Запрос.NP.Добавить(Контрагент);
//Передадим веб-сервису данные и выполним запрос:
РезультатЗапроса = Прокси.NdsRequest2(Запрос);
Для каждого ОтветДляКонтрагента из РезультатЗапроса.NP Цикл
Сообщить(ОтветДляКонтрагента.State);
КонецЦикла;
Подключение к веб-сервису прокатывает но , при получении данных по контрагенту на строке РезультатЗапроса = Прокси.NdsRequest2(Запрос); вылетает ошибка:
Ошибка работы с Интернет: Не могу установить соединение
Не пойму , что делаю не так. Кто уже делал подскажите.
|
|