Подписка на 1С есть. Как читать из 1С:7.7. Не обидим любимый 7.7.
«1С:Контрагент» включает следующие возможности:
- Автоматическое заполнение реквизитов контрагентов и организаций по ИНН или наименованию на основе данных из ЕГРЮЛ/ЕГРИП и получение актуальных сведений из федеральной информационной адресной системы (ФИАС);
- Автоматическое заполнение и проверка реквизитов инспекций ФНС и филиалов ФСС и ПФР;
- "Досье контрагента" – отчет со сведениями, полезными для оценки благонадежности контрагентов, в том числе информация о проверках государственными органами.
Сервис доступен для оформивших подписку на сервис или подписанных на ИТС ПРОФ
Работа с сервисом доступна в начиная с версии бухгалтерии 3.0 (8.З).
Код ниже позволит получить реквизиты по ИНН в конфигурациях 1С:7.7 после оформления подписки или имея ПРОФ подписку
Схема xml доступна по ссылке https://api.orgregister.1c.ru/orgregister/v7?wsdl (пароль и логин ИТС)
INN = "7721562305";
// URL="https://api.orgregister.1c.ru/orgregister/v5?wsdl"; // старая ссылка
URL="https://api.orgregister.1c.ru/orgregister/v7?wsdl";
WinHttp=создатьобъект("WinHttp.WinHttpRequest.5.1");
t1 = "<?xml version=""1.0"" encoding=""UTF-8"" standalone=""no""?>
|<SOAP-ENV:Envelope xmlns:SOAPSDK1=""http://www.w3.org/2001/XMLSchema""
| xmlns:SOAPSDK2=""http://www.w3.org/2001/XMLSchema-instance""
| xmlns:SOAPSDK3=""http://schemas.xmlsoap.org/soap/encoding/""
| xmlns:SOAP-ENV=""http://schemas.xmlsoap.org/soap/envelope/""
| xmlns:ns1=""http://ws.orgregister.company1c.com/"">
|<SOAP-ENV:Body>
| <ns1:getCorporationRequisitesByINN >
| <ns1:INN >"+INN+"</ns1:INN>
| <ns1:configurationName>0</ns1:configurationName>
| <ns1:getCorporationRequisitesByINN>
|</SOAP-ENV:Body>
|</SOAP-ENV:Envelope>";
WinHttp.Open("POST",URL);
WinHttp.SetCredentials("Логин","Пароль",0); //к сожалению, подписка ИТС должна быть
WinHttp.send(t1);
Ответ = WinHttp.responsetext();
Сообщить(WinHttp.Status);
Если WinHttp.Status = 200 тогда // выводим для отладки
т1 = 1;
для ии=1 по 25 Цикл
Сообщить(сред(Ответ,т1,250));
т1 = т1 + 250;
КонецЦикла;
КонецЕсли;
Вступайте в нашу телеграмм-группу Инфостарт
