Заполнение/исправление контрагентов в Альфа-Авто 6, Альфа-Авто 5 по ИНН из сервиса DaData.ru

29.09.25

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

+4 –

С помощью данной обработки можно заполнить сведения в карточке Контрагента как при вводе нового, перезаполнить существующие, так и групповой обработкой исправить некорректные данные в Альфа-Авто 6, Альфа-Авто 5.

Файлы

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

Наименование	Скачано	Купить файл	По подписке PRO
Заполнение/исправление контрагентов в Альфа-Авто 5 по ИНН из сервиса DaData.ru .epf 23,83Kb 1	1	2 500 руб. Купить	1 SM Скачать
Заполнение/исправление контрагентов в Альфа-Авто 6 по ИНН .epf 23,91Kb 4	4	2 500 руб. Купить	1 SM Скачать

Вы можете заказать платную доработку или адаптацию этой разработки под вашу конфигурацию на «Бирже заказов».

0% комиссии — оплата напрямую исполнителю;
Исполнители любого масштаба — от отдельных специалистов до команд под проект;
Прямой обмен контактами между заказчиком и исполнителем;
Безопасная сделка — при необходимости;
Рейтинги, кейсы и прозрачная система откликов.

Очень часто сталкивался с тем, что в базах Альфа-Авто 6, Альфа-Авто 5 неверно заполнены данные по контрагентам, особенно формы собственности - Юр.лицо или Индивидуальный предприниматель.

Обработка позволяет заполнять реквизиты контрагента из сервиса DaData.ru без использования подписки ИТС.

Краткие инструкции:

Обе обработки практически идентичны, и это относится к обеим.

Сначала необходимо зарегистрироваться на DaData.ru и получить API ключ ("APIКлючDaData").

	ВрТокен = ЗаявкиПО.гтсКонстантыЕдинственноеЗначениеПоИмениПредопределенного("APIКлючDaData");

"APIКлючDaData" - хранится в специальном справочнике "Константы" и получается оттуда. Можно/нужно изменить на собственный код получения.

Подключение к Альфа-Авто 5 - загружаем в конфигурацию, в раздел "Обработки".

В справочник "Контрагенты" добавляем реквизит "ПрошелПроверкуИНН".

Подключение к Альфа-Авто 6 - создаем расширение, загружаем в раздел "Обработки".

В расширение добавляем справочник "Контрагенты" и добавляем реквизит "ПрошелПроверкуИНН".

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

Как это работает.

Групповая обработка.

Вызывается:

- для Альфа-Авто 5 - "Сервис" -> "Все операции" -> "Обработка",

- для Альфа-Авто 6 - "Функции технического специалиста" -> "Обработки"
=> "_Проверка Контрагентов по ИНН".

Если заполнено количество - получаются первые N контрагентов для проверки и перезаполнения. Полезно для отладки/тестирования. Если не заполнен - все.

При нажатии кнопки "Получить данные" получаются данные из сервиса DaData и перезаписываются в карточку контрагента.

Не забываем учитывать, что при бесплатной регистрации DaData ограничение - 10000 обращений в сутки.

Колонка "Ответ JSON" содержит полные "сырые" данные ответа сервиса.

Колонка "Данные контрагента" - нормализованные для Альфа-Авто.

Кнопка в карточке контрагента.

Проверка/перезаполнение данных, сохранение контактных данных.

До:

Вопрос по заполнению:

После:

Аналогично для новых Контрагентов, нужно внести ИНН и нажать кнопку.

Чтобы работало, на форме элемента необходимо добавить кнопку и прописать соответствующий код:

&НаКлиенте
Процедура ПроверитьЗаполнитьПоИНННажатие(Элемент)
	РезультатПроверкиСтрукт = АА5_ПроверитьЗаполнитьПоИННПослеНаСервере();
	Если РезультатПроверкиСтрукт.Ошибка <> "" Тогда  
		ПроцедурыОбщегоНазначенияКлиентСервер.СообщитьПользователю(РезультатПроверкиСтрукт.Ошибка);
		Возврат;
	Иначе
		РезультатСтрукт = РезультатПроверкиСтрукт.Результат; 
	КонецЕсли;
	Если РезультатСтрукт <> Неопределено Тогда
		Режим = РежимДиалогаВопрос.ДаНетОтмена; 
		тхтДанные = "";
		Для каждого КлючИЗначение Из РезультатСтрукт Цикл
		    тхтДанные = тхтДанные + КлючИЗначение.Ключ + " : " + КлючИЗначение.Значение + Символы.ПС;
		КонецЦикла; 
		тхтДанные = тхтДанные + Символы.ПС + "`ДА` - Заменить всё." + Символы.ПС + "`НЕТ` - Заменить всё, кроме `Наименования`."+ Символы.ПС + "`Отмена` - Ничего не заменять.";  
		Оповещение = Новый ОписаниеОповещения("АА5_ПослеЗакрытияВопросаПосле", ЭтаФорма, РезультатСтрукт);
		ПоказатьВопрос(Оповещение, тхтДанные, Режим, 0,,"Сделайте выбор.");
	КонецЕсли;
КонецПроцедуры

&НаСервере
Функция АА5_ПроверитьЗаполнитьПоИННПослеНаСервере()
	ИНН = СокрЛП(ЭтотОбъект.ИНН); 
	Если ПустаяСтрока(ИНН) Тогда
	    РезультатПроверкиСтрукт = Новый Структура;
		РезультатПроверкиСтрукт.Вставить("Ошибка","ИНН не заполнен!");
	Иначе	
		ОбработкаПроверки = Обработки.ПроверкаКонтрагентовПоИНН.Создать();
		РезультатПроверкиСтрукт = ОбработкаПроверки.РезультатПроверкиПоИННСтруктура(ИНН); 
		ОбработкаПроверки = Неопределено;
	КонецЕсли;
	Возврат РезультатПроверкиСтрукт;
КонецФункции

&НаКлиенте
Процедура АА5_ПослеЗакрытияВопросаПосле(Результат, Параметры) Экспорт
	Если Результат = КодВозвратаДиалога.Да Тогда
	ИначеЕсли Результат = КодВозвратаДиалога.Нет Тогда    
		Если ЗначениеЗаполнено(ЭтотОбъект.Наименование) Тогда
		    Параметры.Удалить("Наименование");
		КонецЕсли;
	Иначе
        Возврат;
    КонецЕсли;
	Если ЭтотОбъект.Ссылка.Пустая() Тогда
		ЗаполнитьЗначенияСвойств(ЭтотОбъект, Параметры); 
	    ПроцедурыОбщегоНазначенияКлиентСервер.СообщитьПользователю("Контрагент не записан, адрес и контактная информция не заполнены. После записи нажмите кнопку проверки ещё раз.");
	Иначе 
		Если Параметры.ФормаСобственности = ПредопределенноеЗначение("Перечисление.ФормыСобственности.ЮридическоеЛицо") Тогда
			ЗаполнитьЗначенияСвойств(ЭтотОбъект,Параметры,,"ИНН, КПП"); 
		Иначе
			ЗаполнитьЗначенияСвойств(ЭтотОбъект,Параметры,,"ИНН"); 
		КонецЕсли;
		АдресЮридический = "";
	    Если Параметры.Свойство("ПолныйАдрес") Тогда
		    АдресЮридический = Параметры.ПолныйАдрес;
		КонецЕсли;
		КонтИнформация = "";
	    Если Параметры.Свойство("Фио") Тогда
		    КонтИнформация = Параметры.Фио;
			Если Параметры.Свойство("Должность") И ЗначениеЗаполнено(КонтИнформация) Тогда
				КонтИнформация = Параметры.Должность + " " + КонтИнформация;
			КонецЕсли;   
		КонецЕсли;
		Если ЗначениеЗаполнено(АдресЮридический) Тогда  
			АА5_ЗаписатьВРегистрКонтИнфоАА5После(АдресЮридический, "Адрес Юридический")
		КонецЕсли;
		Если ЗначениеЗаполнено(КонтИнформация) Тогда
			АА5_ЗаписатьВРегистрКонтИнфоАА5После(КонтИнформация, "Контактная информация")
		КонецЕсли;
	
	КонецЕсли;
КонецПроцедуры     

&НаСервере
Процедура АА5_ЗаписатьВРегистрКонтИнфоАА5После(ДанныеЗаписи, ВидДанных)
	РегЗапись = РегистрыСведений.КонтактнаяИнформация.СоздатьМенеджерЗаписи(); 
	РегЗапись.Объект = ЭтотОбъект.Ссылка;
	Если ВидДанных = "Адрес Юридический" Тогда
		РегЗапись.Тип = Перечисления.ТипыКонтактнойИнформации.Адрес;
		РегЗапись.Вид = Справочники.ВидыКонтактнойИнформации.АдресЮридический;
	Иначе
		РегЗапись.Тип = Перечисления.ТипыКонтактнойИнформации.Другое;
		РегЗапись.Вид = Справочники.ВидыКонтактнойИнформации.ПрочаяИнформация;
	КонецЕсли;
	РегЗапись.Представление = ДанныеЗаписи;
	РегЗапись.Комментарий = "По результатам проверки через интернет сервис.";
	Попытка
		РегЗапись.Записать(Истина); 
		ПроцедурыОбщегоНазначенияКлиентСервер.СообщитьПользователю("Записан " + ВидДанных + ", см. на вкладке `Контактная информация`");
	Исключение
		ПроцедурыОбщегоНазначенияКлиентСервер.СообщитьПользователю("Не удалось записать " + ВидДанных + ".");
	КонецПопытки;
КонецПроцедуры

В Альфа-Авто 6 в коде заменить "ЭтотОбъект" на "Объект".

Процедура "АА5_ЗаписатьВРегистрКонтИнфоАА5После" для Альфа-Авто 6 не подойдет (можно удалить), т.к. не использовалось.

Уверен, что при небольших модификациях, подойдёт и для других конфигураций.

Проверено и работает на следующих конфигурациях и релизах:

Альфа-Авто: Автосалон+Автосервис+Автозапчасти ПРОФ. Редакция 5.0, релиз 5.1.12.02
Альфа-Авто: Автосалон+Автосервис+Автозапчасти Корп. Редакция 6, релиз 6.1.15.14

*Исправлена мелкая ошибка обработки для Альфа-Авто 6 по замечанию, файл перезагружен.

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

DaData Альфа-Авто 6 Альфа-Авто 5 Альфа Авто Альфа Авто 5 Альфа Авто 6

+4 –

См. также

SALE! %

AI Обработка банковской выписки по правилам при загрузке

Банковские операции Обмен с интернет-банком Мастера заполнения Нейросети Разработчик Бухгалтер Пользователь 1С:Предприятие 8 1C:ERP 1С:Бухгалтерия 3.0 1С:ERP Управление предприятием 2 1С:Управление холдингом 1С:ERP. Управление холдингом 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Управление торговлей 11 1С:Розница 3.0 Платные (руб)

Корректируйте банковские документы быстро и легко! Создайте правило обработки — и оно автоматически применится при загрузке выписки (отбор по любому реквизиту или регулярному выражению). Решение заполняет расшифровку платежа, комиссию эквайринга, подбирает ведомости на выплату зарплаты, помечает дубли из банка на удаление и многое другое. Доплачивать за алгоритмы не нужно — они включены в решение. Обработка работает при загрузке из файлов клиент-банка и через DirectBank. Новое — искусственный интеллект: модель приводит нестандартные назначения платежа к виду, понятному алгоритмам, а ИИ-ассистент прямо в 1С консультирует по решению и разбирает код правил и алгоритмов. Поддерживаются локальные и облачные OpenAI-совместимые модели — данные могут не покидать ваш контур.

17500 руб.

20.12.2024 21560 105 32

Интеграция 1С с API Boxberry, СДЭК, Энергия, Почта России, DPD, ПЭК, Grastin, Деловые Линии, КСЕ, Dalli, ЯндексДоставка

WEB-интеграция Рабочее место Оптовая торговля Розничная торговля Логистика, склад и ТМЦ Пользователь 1С:Предприятие 8 1С:Бухгалтерия 2.0 1С:Бухгалтерия 3.0 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 1.6 1С:Управление нашей фирмой 3.0 1С:Управление торговлей 10 1С:Управление торговлей 11 1С:Розница 2 1С:Розница 3.0 Оптовая торговля, дистрибуция, логистика Россия Управленческий учет Платные (руб)

Программный продукт "Управление доставками в 1С" позволяет обмениваться с личным кабинетом Boxberry, СДЭК, Энергия, Почта России, DPD, ПЭК, Grastin, Деловые Линии, КСЕ, Dalli, ЯндексДоставка. Упрощает создание заявок и резервирование заказов прямо в интерфейсе 1С

24400 руб.

10.03.2016 76145 321 100

Экспортер — автоматизация выгрузки данных из 1С в Spot2D

WEB-интеграция Разработчик Аналитик 1С:Предприятие 8 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Оптовая торговля, дистрибуция, логистика ИТ-компания Платные (руб)

Модуль "Экспортер" — это расширение для 1С, предназначенное для автоматизации процессов выгрузки данных. Оно позволяет эффективно извлекать, преобразовывать и передавать данные из систем 1С в интеграционную платформу Spot2D. Подсистема упрощает настройку, снижает количество ручных операций и обеспечивает удобный контроль данных.

17568 руб.

20.12.2024 7770 35 4

Ввод ЭПД на основании реализации для 1С:Бухгалтерия 3.0, 1С:УНФ 3.0

ЭДО и ОФД Мастера заполнения 1С 8.3 1С 8.5 1С:Бухгалтерия 3.0 1С:Управление нашей фирмой 3.0 Россия Платные (руб)

Расширение добавляет возможность создавать ЭТрН и электронный заказ (заявку) на основании документа «Реализация товаров и услуг». При создании документа автоматически заполняются основные данные: участники перевозки, адреса, транспорт, водитель и сведения о грузе. Работает как расширение, не требует изменения типовой конфигурации и быстро подключается.

6000 руб.

13.05.2026 3827 35 7

Интеграция Альфа Авто 5 и 6 и AUTOCRM + LOGICSTARS

Сайты и интернет-магазины WEB-интеграция Системный администратор Разработчик Пользователь 1С:Предприятие 8 1C:Бухгалтерия 1С:Управление торговлей 11 Автомобили, автосервисы Россия Управленческий учет Платные (руб)

Интеграционный модуль обмена между конфигурацией Альфа Авто 5 и Альфа Авто 6 и порталом AUTOCRM / LOGICSTARS. Данный модуль универсален. Позволяет работать с несколькими обменами AUTOCRM / LOGICSTAR разных брендов в одной информационной базе в ручном и автоматическом режиме.

42700 руб.

03.08.2020 25843 42 26

Сравнение документов между базами 1С: найдите расхождения за пару кликов

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

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

9760 руб.

14.11.2025 6194 28 8

Infostart MagicInput: улучшенный поиск по строке в 1С

Мастера заполнения Поиск данных Инструментарий разработчика Подбор и обработка объектов 1С 8.3 1С 8.5 Платные (руб)

Infostart MagicInput улучшает подбор в полях ввода 1С: ищет по любой части названия и по нескольким ключевым фрагментам, распознаёт ввод в другой раскладке и показывает иконки/статусы объектов прямо в списке. Поддерживает вставку навигационной ссылки/представления документа для автоподбора; для разработчиков доступны поиск по GUID и полному имени предопределённого. Работает в управляемых формах и подключается в большинстве конфигураций 1С 8.3/8.5. Работает на возможностях платформы, внешние компоненты не используются.

6000 руб.

25.02.2026 6693 23 1

Поиск и исправление отрицательных остатков во всех регистрах накопления (с детализацией до документов) в 1С

Задачи пользователя Инструментарий разработчика Корректировка данных Закрытие периода Разработчик Аналитик Бухгалтер Пользователь Руководитель проекта Стажер 1С 8.3 1С:ERP Управление предприятием 2 1С:Управление нашей фирмой 3.0 Управленческий учет Платные (руб)

Обработка предназначена для поиска, анализа и исправления отрицательных остатков во всех регистрах накопления информационной базы 1С.

6100 руб.

27.02.2026 3212 18 3

Комментарии

Подписаться на ответы Инфостарт бот

Свернуть все

1. Avins 24.09.25 17:22 Сейчас в теме

Здравствуйте! При попытке установить в 1с Альфа-Авто 6 возникает ошибка. Скрин прилагаю.

Прикрепленные файлы:

2. osivv 286 29.09.25 22:56 Сейчас в теме

(1) Извиняюсь, там отсылка к общей функции конвертации:

Функция гтс_JSONВСтруктуруСоответствие(ТекстСообщения, ПрочитатьВСоответствие = Ложь, СтрокаДатДляПреобразованияISO = "") Экспорт  
	
	ЧтениеJSON = Новый ЧтениеJSON;
	ЧтениеJSON.УстановитьСтроку(ТекстСообщения);
	СтруктураJSON = ПрочитатьJSON(ЧтениеJSON, ПрочитатьВСоответствие, СтрокаДатДляПреобразованияISO, ФорматДатыJSON.ISO);
	ЧтениеJSON.Закрыть();
	
	Возврат СтруктураJSON;
	
КонецФункции

Показать

Добавьте в обработку и будет работать.
Упустил, спасибо что сообщили.

3. Avins 30.09.25 14:13 Сейчас в теме

Не выходит. Ошибки сыплются.

{ВнешняяОбработка.ПроверкаКонтрагентовПоИНН.МодульОбъекта(45,19)}: Переменная не определена (АА5_ОбщегоНазначения)
				СтрукОтвета = <<?>>АА5_ОбщегоНазначения.гтс_JSONВСтруктуруСоответствие(СтрокаJSON); (Проверка: Сервер)
{ВнешняяОбработка.ПроверкаКонтрагентовПоИНН.МодульОбъекта(217,12)}: Переменная не определена (ЗаявкиПО)
	ВрТокен = <<?>>ЗаявкиПО.гтсКонстантыЕдинственноеЗначениеПоИмениПредопределенного("APIКлючDaData");  (Проверка: Сервер)

Прикрепленные файлы:

4. osivv 286 30.09.25 23:09 Сейчас в теме

(3) По скрину вижу что добавили функцию.
Теперь должно быть так:

СтрукОтвета = гтс_JSONВСтруктуруСоответствие(СтрокаJSON);

>> Сначала необходимо зарегистрироваться на DaData.ru и получить API ключ ("APIКлючDaData").

ВрТокен = ЗаявкиПО.гтсКонстантыЕдинственноеЗначениеПоИмениПредопределенного("APIКлючDaData");
"APIКлючDaData" - хранится в специальном справочнике "Константы" и получается оттуда. Можно/нужно изменить на собственный код получения.
В вашем случае должно быть:

ВрТокен = "ВашПерсональныйТокенAPIКлючDaData";

5. Avins 01.10.25 13:34 Сейчас в теме

А можно получить готовый файл для корректной работы с Альфа-Авто 6? Так как я самостоятельно не могу разобраться в коде.

6. osivv 286 01.10.25 15:04 Сейчас в теме

Можно, написали бы сразу, напишите в личку куда скинуть.

7. Kiw 14.01.26 09:37 Сейчас в теме

вылетает ошибка {ВнешняяОбработка.ПроверкаКонтрагентовПоИНН.Форма.Форма.Форма(98,21)}: Переменная не определена (АА5_ОбщегоНазначения)
СтрукОтвета = <<?>>АА5_ОбщегоНазначения.гтс_JSONВСтруктуруСоответствие(СтрокаJSON);
{ВнешняяОбработка.ПроверкаКонтрагентовПоИНН.Форма.Форма.Форма(109,36)}: Переменная не определена (АА5_ОбщегоНазначения)
Стр.ДанныеКонтрагентаJSON = <<?>>АА5_ОбщегоНазначения.гтс_ЗначениеВJSON(СтруктАА6);
[ОшибкаКомпиляцииВстроенногоЯзыка]

можете скинуть исправленную?

8. osivv 286 14.01.26 23:16 Сейчас в теме

(7) Могу, вы какой скачали для 5 или 6? напишите куда.

10. пользователь 15.01.26 08:17

Сообщение было скрыто модератором.

...

12. osivv 286 18.01.26 16:47 Сейчас в теме

(7) См. тут:
https://infostart.ru/ajax/comment_pub.php?t=330765&c=1
1. добавьте функцию.
2. удалите >АА5_ОбщегоНазначения.< везде где встречается.

13. Kiw 19.01.26 08:28 Сейчас в теме

(12)
1.Сделал все как указано выше, ошибка остается.
{ВнешняяОбработка.ПроверкаКонтрагентовПоИНН.Форма.Форма.Форма(109,36)}: Процедура или функция с указанным именем не определена (гтс_ЗначениеВJSON)
Стр.ДанныеКонтрагентаJSON = <<?>>гтс_ЗначениеВJSON(СтруктАА6); (Проверка: Сервер)
2. Функционал с добавление кнопки тоже не срабатывает. Поле объекта не обнаружено (ПроверкаКонтрагентовПоИНН)
{Кнопка Справочник.Контрагенты.Форма.ФормаЭлемента.Форма(30)}:ОбработкаПроверки = Обработки.ПроверкаКонтрагентовПоИНН.Создать();
{Кнопка Справочник.Контрагенты.Форма.ФормаЭлемента.Форма(4)}:РезультатПроверкиСтрукт = АА5_ПроверитьЗаполнитьПоИННПослеНаСервере();

Есть ли возможность отправить рабочую обработку?

Прикрепленные файлы:

9. пользователь 15.01.26 08:17

Сообщение было скрыто модератором.

...

11. Kiw 15.01.26 08:18 Сейчас в теме

6 версия

Для отправки сообщения требуется регистрация/авторизация

Автор:

Валерий Осин (osivv)

Рейтинг: 286

Вы можете заказать платную консультацию или разработку у автора. Будет создан приватный заказ на «Бирже заказов» для автора.

Публикация:

№ 2472268

Создание 03.09.25 16:00

Обновление 29.09.25 23:17

Статистика:

Просмотры 2709

Загрузки 5

Рейтинг 4

Комментарии 11

Характеристики:

Код открыт Да

Рубрики Мастера заполнения Корректировка данных WEB-интеграция

Кому Разработчик ,
Пользователь

Тип файла Внешняя обработка (ert,epf)

Платформа 1С:Предприятие 8

Конфигурация Отраслевые

Операционная система Не имеет значения

Страна Россия

Отрасль Не имеет значения

Налоги Не имеет значения

Вид учета Не имеет значения

Доступ к файлу Абонемент ($m)

Заполнение/исправление контрагентов в Альфа-Авто 6, Альфа-Авто 5 по ИНН из сервиса DaData.ru

Файлы

См. также

Журнал

База знаний

Лаборатория

Анализ & Управление

Сопровождение 1С

Корпоративные решения

Обучение

Маркетплейс

Проектный офис

Мероприятия

Видеозаписи

Биржа заказов

Форум

Мерч

О компании