Поиск по ИНН, переработана под другой сайт

05.10.18

Задачи пользователя - Поиск данных

Осуществляет поиск данных контрагента по инн, находит кпп, окпо, прочую информацию (смотри скриншот) Обычные формы. Для встройки требуется программист

Файлы

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование Скачано Купить файл
Поиск по ИНН
.epf 12,34Kb ver:1.3
14 1 850 руб. Купить

Подписка PRO — скачивайте любые файлы со скидкой до 85% из Базы знаний

Оформите подписку на компанию для решения рабочих задач

Оформить подписку и скачать решение со скидкой

Переделано, поправлено, опять работает. Минимальная интеграция.

Немного колхозно, но по сути тут представлен основной механизм, для встраивания в конфигурацию по своему желанию и по своей необходимости. 

У меня к конфигурации это "прибито гвоздями" вот таким способом:

В кнопке генерации кпп по инн добавлен код:

Если ЗначениеЗаполнено(ИНН) Тогда
        ОбработкаОбъект = Обработки.ПоискПоИнн.Создать();
        ОбработкаОбъект.ИНН = ИНН;
        ОбработкаОбъект.ПолучитьИнформациюПоИНН();
        ОбработкаОбъект.ПолучитьФорму("Форма", ЭтаФорма).Открыть();
КонецЕсли;

В конфигурацию, в дерево метаданных, добавлена обработка у которой есть самый главный метод ПолучитьИнформациюПоИНН();. Перед запуском метода в обработке этот самый ИНН надо заполнить.

Обратно в карточку контрагента это добро возвращается структурой через обработку оповещения.

Из обработки:

СтруктураВыбора = Новый Структура;
    СтруктураВыбора.Вставить("Команда",                 "ПоискПоИНН");
    СтруктураВыбора.Вставить("ИНН",                     ИНН);
    СтруктураВыбора.Вставить("КПП",                     КПП);
    СтруктураВыбора.Вставить("НаименованиеПолное",      НаименованиеПолное);
    СтруктураВыбора.Вставить("НаименованиеСокращенное", НаименованиеСокращенное);
    СтруктураВыбора.Вставить("ОГРН",                    ОГРН);
    СтруктураВыбора.Вставить("ОКВЭД",                   ОКВЭД);
    СтруктураВыбора.Вставить("Регион",                  Регион);
    СтруктураВыбора.Вставить("ЮрАдрес",                 ЮрАдрес);
    СтруктураВыбора.Вставить("ОКПО",                    ОКПО);
    
    ОповеститьОВыборе(СтруктураВыбора);


В форме элемента справочника "Контрагенты" :

Процедура ОбработкаВыбора(ЗначениеВыбора, Источник)

    //Типовой код .......

    ИначеЕсли ТипЗнч(ЗначениеВыбора) = Тип("Структура") Тогда
        Команда = "";
        Адрес = "";
        Если ЗначениеВыбора.Свойство("Команда", Команда) и Команда = "ПоискПоИНН" Тогда

          //Тут собственно ваш код загрузки в карточку

        КонецЕсли;

КонецЕсли;

КонецПроцедуры;

Поставляется в большей мере как механизм, из которого вы можете самостоятельно, с минимальными усилиями,  вылепить именно то, что вам требуется.

Тестировалось на УПП 1.3, для ут без изменений. Для бп 2.0 названия модулей немного другие, поэтому точное название модуля можно определить по имени метода. В остальном все осталось как прежде: главное заполнить поле ИНН и нажать кнопку Обновить.

Часть кода взята отсюда, спасибо Автору

И еще от кучи авторов с инфостарт, но за древностью лет уже не упомню кто это был. Спасибо добрые люди.

Премного благодарен автору

Вступайте в нашу телеграмм-группу Инфостарт

Обработка Поиск по ИНН обычные формы ут10.3 упп1.3 БП2.0

См. также

Информационная безопасность Поиск данных ServiceDesk, HelpDesk Журналы и реестры данных 8.3.14 Россия Бухгалтерский учет Бюджетный учет Налоговый учет Управленческий учет Платные (руб)

Полный контроль над изменениями в 1С без нагрузки на вашу базу. Мгновенный доступ к истории изменений, удобное сравнение и откат данных в один клик. Простой отчет с визуальным отображением изменений Откат на любую версию объекта в два клика История изменения данных хранится во внешней базе

180000 руб.

05.09.2025    1684    1    1    

3

Поиск данных Системный администратор Программист 1С v8.3 Управляемые формы 1C:Бухгалтерия 1С:Бухгалтерия 3.0 1С:Зарплата и Управление Персоналом 3.x 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 1.6 1С:Управление нашей фирмой 3.0 1С:Управление торговлей 11 1С:Розница 2 1С:Розница 3.0 Платные (руб)

Обработки помогут Вам легко и, главное, быстро (в 5 раз и быстрее штатной обработки 1С), выполнить поиск дублирующих данных в Ваших базах 1С на платформах 8.1-8.3. Это позволит уменьшить объем лишней информации в справочниках и документах, планах видов характеристик и др., упростит работу с данными пользователям. А так же можно, одним нажатием, узнать в каких ссылочных объектах есть вообще дубли! Понятное расположение команд и настроек, в сочетании с описанием и справкой, еще упростят процесс. А так же обновления Вы получаете бесплатно в течение года с момента приобретения данных обработок! (Обновление от 27.11.2023, версия 6.12)

13200 руб.

14.05.2012    164962    352    253    

585

Поиск данных 1С v8.3 1С:Библиотека стандартных подсистем Абонемент ($m)

Расширение добавляет возможность в 1С в любых полях и отборах выбирать значения не только Код, Наименование или Номер, но и Уникальный идентификатор, Навигационную ссылку, Объект не найден, Представление документа.

2 стартмани

18.08.2025    6196    34    sapervodichka    14    

75

Поиск данных ЭДО и ОФД Подбор и обработка объектов 1С v8.3 1С:Управление нашей фирмой 3.0 Россия Платные (руб)

Поиск номенклатуры при сопоставлении в ЭДО не интуитивный, не настраиваемый и просто неудобный. Данное решение - это альтернативный вариант расширенного поиска и сопоставления номенклатуры для 1С, который подключается в качестве расширения и решает эту проблему.

10000 руб.

10.04.2025    1479    1    1    

1

Математика и алгоритмы Инструментарий разработчика Универсальные функции Поиск данных Программист 1С v8.3 1C:Бухгалтерия 1С:ERP Управление предприятием 2 Абонемент ($m)

Несколько упакованных в один класс интерфейсов для обработки популярных универсальных коллекций. Для тех, кого раздражает отсутствие действительно единого интерфейса для универсальных коллекций.

5 стартмани

25.09.2024    4338    5    Артано    14    

21

Поиск данных Программист 1С v8.3 Россия Бесплатно (free)

В этой статье я хочу рассмотреть еще один кейс применения Clickhouse в связке с 1С - оптимизацию поиска в справочнике по ключевым словам. Здесь не будет готового решения, но будут описаны важные моменты, которые позволят легко применить данный кейс в реальности.

18.08.2024    3807    1cnik2    23    

19

Поиск данных Программист 1С v8.3 1C:Бухгалтерия Абонемент ($m)

Отображение и просмотр реквизитов справочника или документа - с бесконечным открытием подуровней.

2 стартмани

14.06.2024    5900    13    RustIG    33    

25
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. xraf 18 22.09.18 22:39 Сейчас в теме
Можно узнать, обработка еще работает?
2. vx_gas 32 27.09.18 03:53 Сейчас в теме
2 недели назад лавку прикрыли, не смотрю на сложности, ищу возможности...
3. vx_gas 32 27.09.18 03:54 Сейчас в теме
Когда решу задачу выложу обновления
4. vx_gas 32 05.10.18 04:52 Сейчас в теме
5. chkurs 101 08.01.19 22:30 Сейчас в теме
Почтовый индекс "postalCode" пропускает:
ШаблонПоиска = "<p class=""noMargin"" itemprop=""postalCode"">(.*?)<\/p>"; - не срабатывает, хотя в строке поиска присутствует.
6. chkurs 101 10.01.19 12:03 Сейчас в теме
(5)
Почтовый индекс "postalCode" пропускает:
ШаблонПоиска = "(.*?)"; - не срабатывает, хотя в строке поиска присутствует.
Исправил сам: надо в шаблонах поиска индекса, региона и города изменить "<p" на "<div", "/p" на "/div": ШаблонПоиска = "<div class=""noMargin"" itemprop=""postalCode"">(.*?)<\/div>"; ШаблонПоиска = "<div class=""noMargin"" itemprop=""addressRegion"">(.*?)<\/div>"; ШаблонПоиска = "<div class=""noMargin"" itemprop=""addressLocality"">(.*?)<\/div>";
7. newsleon 7 13.12.20 07:39 Сейчас в теме
ГетЗапрос.Status возвращает 200, (при том, что в браузере СтрокаПодключения возвращает корректный текст).
Подскажите, как побороть ошибку 200 ?
Для отправки сообщения требуется регистрация/авторизация