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


Получение данных о контрагенте по ИНН - кто как делает?

Получение данных о контрагенте по ИНН - кто как делает?
Я
   fgaabbb
 
13.07.18 - 09:15
Дали задание прикрутить к старой УТ 11.1 получение данных контрагента по его ИНН. Какие сейчас есть варианты? запросов таких будет край 10-20 в день.
 
 
   oslokot
 
1 - 13.07.18 - 09:25
   Cyberhawk
 
2 - 13.07.18 - 09:29
(1) ТС спрашивает как, но ты подсовываешь ему то, что не дает ответ на этот вопрос
   oslokot
 
3 - 13.07.18 - 09:32
(2) Нет. ТС спрашивает "какие варианты" 

Вот пожалуйста, рабочий вариант
   Tonik992
 
4 - 13.07.18 - 09:37
https://dadata.ru/api/suggest/
вот тут есть что-то интересное
   Tonik992
 
5 - 13.07.18 - 09:38
А вообще вся инфа в самой налоговой:
https://www.nalog.ru/rn77/service/egrip2/
   ale-sarin
 
6 - 13.07.18 - 09:40
(0) Я как-то делал. Из УТ 11.2 (или 11.3, не помню, два года назад было) выпилил и сунул в УТ 11.1 все касаемо сервиса Контрагенты.
Задача как раз была такая же. Норм взлетело. Пару дней ушло на это.
   fgaabbb
 
7 - 13.07.18 - 10:16
(1) хм.. сбис... интересно, спасибо
(4) спасибо
(5) я так и думал )
(6) тоже думаю об этом
   ПегийЛунь
 
8 - 13.07.18 - 10:23
Можно из БП 3.0 утащить.
Общий модуль РаботаСКонтрагентами.
Начиная с 
Функция РеквизитыЮридическогоЛицаПоИНН(Знач ИНН) Экспорт
и далее всё что нужно.
   fgaabbb
 
9 - 14.07.18 - 15:37
(8) большое спасибо
   fgaabbb
 
10 - 16.07.18 - 06:54
+(4) для тех, кто будет потом сам делать, небольшой пример DaData:
Соединение = Новый HTTPСоединение(Сервер,,,,Новый ИнтернетПрокси(истина),, Новый ЗащищенноеСоединениеOpenSSL);
    Запрос = Новый HTTPЗапрос(Адрес);
    Запрос.Заголовки.Вставить("Content-Type",    "application/json");
    Запрос.Заголовки.Вставить("Accept",            "application/json");
    Запрос.Заголовки.Вставить("Authorization",     "Token " + ТокенДадада);
    Запрос.Заголовки.Вставить("X-Partner",         "1C"); 
    
    СтруктураЗапроса = Новый Структура;
    СтруктураЗапроса.Вставить("query", ПоискИНН);
    
    ТелоЗапроса = ПолучитьСтрокуJSON(СтруктураЗапроса);
    
    Запрос.УстановитьТелоИзСтроки(ТелоЗапроса);

    Ответ = Соединение.ОтправитьДляОбработки(Запрос);
    
    Чтение = Новый ЧтениеJSON;
    ОтветСтрокой = Ответ.ПолучитьТелоКакСтроку(); 
    Чтение.УстановитьСтроку(ОтветСтрокой);
    Результат = ПрочитатьJSON(Чтение);

а результат разбирайте, там вроде все понятно
 
 Рекламное место пустует
   fgaabbb
 
11 - 16.07.18 - 06:55
в начале, конечно:
Сервер = "suggestions.dadata.ru";
Адрес = "suggestions/api/4_1/rs/findById/party";
   abfm
 
12 - 16.07.18 - 07:10
https://1cbonus.ru молодцы ребята.

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