Имя: Пароль:
1C
1С v8
Добавление WS-ссылки проверки контрагентов
0 rooffy
 
14.05.15
12:10
Не получается добавить сторонний веб-сервис в 1с.
вот ссылка на сервис:
http://npchk.nalog.ru/FNSNDSCAWS_2?wsdl
Через СОАП проверяю - все работает, через 1с выдает ошибку:

{ОбщийМодуль.КонтрагентыНаСервере.Модуль(514)}: Ошибка при вызове метода контекста (NdsRequest2)
    res = WSProxy.NdsRequest2(WSПараметр);
по причине:
Ошибка вызова операции сервиса:  {http://ws.unisoft}:FNSNDSCAWS2:NdsRequest2()
по причине:
Неизвестная ошибка. Ошибка работы с Интернет:  Couldn't connect to server
по причине:
Ошибка работы с Интернет:  Couldn't connect to server

код:

Функция ПроверитьКонтрагента(инн,кпп, дт) Экспорт
    Перем выхРез;
            
    ВебСерв = WSСсылки.NpchkNalog.ПолучитьWSОпределения();
        
    Services = ВебСерв.Сервисы;

    WSProxy = WSСсылки.NpchkNalog.СоздатьWSПрокси("http://ws.unisoft";, "FNSNDSCAWS2", "FNSNDSCAWS2_Port");
    
    ТипWSПараметра = WSProxy.ФабрикаXDTO.Пакеты.Получить("http://ws.unisoft/FNSNDSCAWS2/Request2").Получить("NdsRequest2_NP";);
    WSПараметр       = WSProxy.ФабрикаXDTO.Создать(ТипWSПараметра);
    WSПараметр.INN = инн;
    WSПараметр.KPP = кпп;
    WSПараметр.DT = дт;

    
    выхРез = "";
    
    res = WSProxy.NdsRequest2(WSПараметр);
    
    Возврат "";
КонецФункции
1 Мигрень
 
14.05.15
12:43
<?xml version="1.0" encoding="UTF-8"?>
<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/"; xmlns:req="http://ws.unisoft/FNSNDSCAWS2/Request">;
   <soapenv:Header/>
   <soapenv:Body>
      <req:NdsRequest2>
         <!--1 to 10000 repetitions:-->
         <req:NP INN="?" KPP="?" DT="?"/>
      </req:NdsRequest2>
   </soapenv:Body>
</soapenv:Envelope>



А что такое DT в строке ниже, кто знает?

<req:NP INN="?" KPP="?" DT="?"/>
2 cw014
 
14.05.15
13:15
DT - дата. Причем в строковом формате "ДД.ММ.ГГГГ"
3 cw014
 
14.05.15
13:16
Я эту дурь кодом подцеплял - через вс-ссылки не делал
4 cw014
 
14.05.15
13:19
Couldn't connect to server - проверь подключение к интернету
5 cw014
 
14.05.15
13:20
ВходнойМассив = WSПроки.ФабрикаXDTO.Создать(WSПроки.ФабрикаXDTO.Тип("http://ws.unisoft/FNSNDSCAWS/Request";, "NdsRequest"));

Параметр = WSПроки.ФабрикаXDTO.Создать(WSПроки.ФабрикаXDTO.Тип("http://ws.unisoft/FNSNDSCAWS/Request";, "NdsRequest_NP"));

Результат = WSПроки.NdsRequest(ВходнойМассив);
6 Drac0
 
14.05.15
13:21
(0) файервол не пускает 1С может?
7 rooffy
 
14.05.15
13:48
С интернетом все нормально, была настроена проверка раньше через сайт фсс, но там по одному контрагенту и довольно долго.
А здесь можно сразу до 10000 загнать и более информативные результаты проверки.

(3) кодом это напрямую обращением на сайт?
Есть два вида языков, одни постоянно ругают, а вторыми никто не пользуется.