Заполнение по ИНН или наименованию реквизитов контрагента по данным сайта ФНС (egrul.nalog.ru) для БП 3.0, УТ 11.3, КА 2.2, ERP 2.2, УНФ 1.6

Обработки - Обработка справочников

Обработка является альтернативой механизму, разработанному фирмой 1С и заполняющему реквизиты контрагента по ИНН или наименованию. Не требуется действующей подписки ИТС. Вызывается как внешняя дополнительная обработка, т.е. используется, непосредственно, из карточки контрагента.

При поиске по бескрайним просторам интернета я, к сожалению, не нашел подобную обработку, и сделал свою. Мои требования: БП 3.0 - управляемые формы, сайт-только egrul.nalog.ru (к остальным доверия нет), обработка не должна вносить изменения в конфигурацию и должна вызываться из карточки контрагента, т.к. именно в ней изначально и задаются критерии для поиска (ИНН, ОГРН, наименование).

Это внешняя дополнительная обработка на управляемых формах с видом «ЗаполнениеОбъекта». Она вызывается из элемента справочника «Контрагенты» или «Партнеры» по кнопке «Заполнение»->«Заполнить по ИНН или наименованию». Обработка производит поиск данных на сайте egrul.nalog.ru по ИНН, по ОГРН или по наименованию. Ищет данные как юридических лиц, так и физических лиц. Блок запросов и ответов с сайта я взял из //infostart.ru/public/281276/ (спасибо, добрый человек), остальное кусками собирал около 2 недель. 

Данные, которые заполняет обработка:

  1. Наименование (по правилам механизма 1С:Контрагент);
  2. Полное наименование (по правилам механизма 1С:Контрагент);
  3. ИНН;
  4. КПП (для юридических лиц);
  5. ОГРН;
  6. Адрес (приводится к классификатору, даже, если нет загруженного классификатора или не используется веб-сервис 1С для ввода и проверки адресов). Для физических лиц сайт egrul.nalog.ru не выдает адреса. Но, если перед поиском реквизитов адрес в карточке контрагента присутствует, а запрос поиска выдает пустой адрес, то адрес в карточке остается не тронутым. 
  7. Есть возможность заполнить дополнительные реквизиты, такие как Ф.И.О. и должность руководителя или телефон контрагента, которые можно получить только из PDF-файла по запросу с сайта egrul.nalog.ru. Для этого в обработку добавлена функциональная опция «ИспользоватьPDF». Если опция «ИспользоватьPDF» установлена в положение «Истина», то происходит парсинг PDF-файла.

Немного о парсинге PDF-файлов:

В большинстве случаев в обработках парсинга PDF используются 3 вспомогательных файла: «pdftotext.exe», «hstart.exe», «xpdfrc». «hstart.exe» нужен для скрытия командного окна при запуске приложения «pdftotext.exe». Текст программы, примерно, такой:

&НаКлиенте
Процедура КонвертерPDFвTXT(ФайлPDF,ФайлTXT)
	
	КаталогВрФл 	= КаталогВременныхФайлов();
	Попытка
		МакетФайла	= ПолучитьМакетНаСервере("pdftotext");
		МакетФайла.Записать(КаталогВрФл + "pdftotext.exe");
	Исключение
	КонецПопытки;
	Попытка
		МакетФайла	= ПолучитьМакетНаСервере("hstart");
		МакетФайла.Записать(КаталогВрФл + "hstart.exe");
	Исключение
	КонецПопытки;
	Попытка
		МакетФайла	= ПолучитьМакетНаСервере("xpdfrc");
		МакетФайла.Записать(КаталогВрФл + "xpdfrc");
	Исключение
	КонецПопытки;
	
    ТекстКоманды 	= """" + КаталогВрФл + "hstart.exe"" /NOCONSOLE /WAIT ""pdftotext.exe -layout """ + ФайлPDF + """ """ + ФайлTXT + """";
	
    WshShell 		= Новый COMОбъект("WScript.Shell");
    WshShell.Run(ТекстКоманды, 5, 1);

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

&НаСервере
Функция ПолучитьМакетНаСервере(ИмяМакета)
	ОбъектЗн 	= РеквизитФормыВЗначение("Объект");
	Макет 		= ОбъектЗн.ПолучитьМакет(ИмяМакета);
	Возврат Макет;
КонецФункции

Но на моем компьютере антивирус сразу блокирует файл «hstart.exe». Более того, на сайте https://www.virustotal.com 19 антивирусов этот файл считают заразным. Я решил использовать только 1 вспомогательный файл: «pdftotext.exe» и скрипт VBS. Есть вероятность, что при определенных правах пользователя системы скрипт может не работать (таких ситуаций не обнаружил). Текст программы, примерно, такой:

&НаКлиенте
Процедура КонвертерPDFвTXT(ФайлPDF,ФайлTXT)
	
	ФайлTXT 		= ПолучитьИмяВременногоФайла(".txt");
	КаталогВрФл 	= КаталогВременныхФайлов();
	
	Попытка
		МакетФайла	= ПолучитьМакетНаСервере("pdftotext");
		МакетФайла.Записать(КаталогВрФл + "pdftotext.exe");
	Исключение
	КонецПопытки;
	
	ВыполнитьСкрипт(КаталогВрФл + "pdftotext.exe", ФайлPDF, ФайлTXT);
	
КонецПроцедуры

&НаСервере
Функция ПолучитьМакетНаСервере(ИмяМакета)
	ОбъектЗн 	= РеквизитФормыВЗначение("Объект");
	Макет 		= ОбъектЗн.ПолучитьМакет(ИмяМакета);
	Возврат Макет;
КонецФункции

&НаКлиенте
Процедура ВыполнитьСкрипт(ФайлPdftoTxt, ФайлPDF, ФайлTXT)
	
	КодФункции 				=
    "Function ConvertPDF
	|	strPath      = """ + ФайлPdftoTxt + """" + " + "" -enc UTF-8 -layout "" + " + """" + ФайлPDF + """" + " + "" "" + " + """" + ФайлTXT + """
	|	Set WshShell = CreateObject(""" + "WScript.Shell"")
	|	RetCode	     = WshShell.Run(strPath, 0, true)
    | End Function";
	
	Script 		 			= Новый COMОбъект("MSScriptControl.ScriptControl.1");
	Script.Language			= "vbscript";
	СтрокаВызова 			= "Script.Run(""" + "ConvertPDF""" + ")";
	
	Попытка
		Script.AddCode(КодФункции);
		Выполнить(СтрокаВызова);
	Исключение
		ГдеОшибка 			= "{" + Script.Error.Line + ", " + Script.Error.Column + "}";
		КакаяОшибка 		= Script.Error.Source + ": " + Script.Error.Description;
		Если ЗначениеЗаполнено(Script.Error.Text) Тогда
			КакаяОшибка 	= КакаяОшибка + " (" + Script.Error.Text + ")";
		КонецЕсли;
		Сообщить(ГдеОшибка + " " + КакаяОшибка);
	КонецПопытки;

КонецПроцедуры // ВыполнитьСкрипт() 

После заполнения карточки контрагента, есть возможность отказаться от изменений - выйти из элемента справочника не сохраняясь. Имейте ввиду, что при выборе обработки из формы элемента справочника, данные этого элемента сохраняются.

  • обработка работает на управляемых формах. Перечень предназначенных конфигураций и номера проверенных релизов:

Наименование конфигурации

Номер релиза

1

Бухгалтерия предприятия, редакция 3.0

3.0.49.20

2

Бухгалтерия предприятия (базовая), редакция 3.0

3.0.49.20

3

Бухгалтерия предприятия КОРП, редакция 3.0

3.0.49.20

4

Управление торговлей, редакция 11.3

11.3.3.163

5

Управление торговлей, редакция 11.3 базовая

11.3.3.163

6

Комплексная автоматизация, редакция 2.2

2.2.2.228

7

ERP Управление предприятием 2.0

2.0.10.172

8

ERP Управление предприятием 2.2

2.2.3.162

9

Управление небольшой фирмой редакция 1.6

1.6.9.43

10

Управление небольшой фирмой редакция 1.6 базовая

1.6.9.43

  • доработка для других конфигураций в пределах того же функционала бесплатна.
  • код программы полностью открыт. Для доработки собственными силами ограничений нет.
  • подписка на ИТС не требуется.
  • техподдержка по программе бесплатная в течение 12 мес., а после этого уже можно приобретать платную.
  • лицензирования не требуется. Ограничений в использовании, количестве рабочих мест, компьютеров, сетевом использовании и т.д. нет.
  • обработка подключается как внешняя дополнительная обработка с видом «ЗаполнениеОбъекта» (Администрирование->Печатные формы, отчеты и обработки). Регистрации не требуется.

Гарантия возврата денег

Гарантия возврата денег

ООО "Инфостарт" гарантирует Вам 100% возврат оплаты, если программа не соответствует заявленному функционалу из описания. Деньги можно вернуть в полном объеме, если вы заявите об этом течение 14-ти дней со дня поступления денег на наш счет.

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

Для возврата оплаты просто свяжитесь с нами.

Скачать файлы

Наименование Файл Версия Размер
Заполнение по ИНН или наименованию реквизитов контрагента по данным сайта ФНС (egrul.nalog.ru) для БП 3.0, УТ 11.3, КА 2.2, ERP 2.2, УНФ 1.6:
13.04.2017
1500 руб.

Моментальная
доставка

Техническая поддержка на 12 месяцев
12.04.2017
500 руб.

См. также

Комментарии
1. Иван Пешков (JohnPawn) 10 24.04.16 22:56 Сейчас в теме
2. Renat Sitdikov (renmy) 59 28.04.16 15:05 Сейчас в теме
3. Иван Пешков (JohnPawn) 10 28.04.16 16:14 Сейчас в теме
(2) renmy, похожесть есть, но там расширение, а значит присутствует изменение конфигурации, хотя с точки зрения 1С изменений нет.
4. Сергей Ожерельев (Поручик) 3558 29.04.16 10:31 Сейчас в теме
Лучше в виде внешней обработки, чем глючное расширение.
5. Михаил Зотов (ZOMI) 471 01.05.16 19:17 Сейчас в теме
При поиске по бескрайним просторам интернета я, к сожалению, не нашел подобную обработку


???
http://infostart.ru/public/166049/

Когда своих идей нет - остается только демпинговать.
6. Иван Пешков (JohnPawn) 10 01.05.16 23:53 Сейчас в теме
(5) ZOMI, разве ваша обработка вызывается из карточки контрагента? Судя по скринам она запускается отдельно и создает контрагента.
7. Михаил Зотов (ZOMI) 471 02.05.16 17:17 Сейчас в теме
(6) JohnPawn, и из карточки и из формы списка. если речь о БП 3. При обновлении пользователь также видит что обновляется/// также можно историю использования обработки посмотреть... Да, много еще всяких фишек.Вы кстати парсите тоже рdf выписку с ФНС, да?
8. Иван Пешков (JohnPawn) 10 02.05.16 23:55 Сейчас в теме
(7) ZOMI, в таком случае, ваша обработка, крута. Но о том, что она вызывается из карточки, я не заметил ни на видео, ни на скринах, ни в описании. Этот критерий для меня был важен. Поэтому, Contragent+ был мною отмечен, как не удовлетворяющий данному условию. Прошу прощения за невнимательность.
P.S. Pdf-обработка не парсит.
9. Михаил Зотов (ZOMI) 471 03.05.16 10:43 Сейчас в теме
(8) JohnPawn,

увидел что pdf не парсите - ФИО и должность руководителя не грузите.
10. Иван Петров (dgolovanov) 03.05.16 18:59 Сейчас в теме
(9) ZOMI, Вы запретили комменты в своей публикации, видимо от переизбытка положительных отзывов, приходится расхваливать в чужой ветке?
11. Михаил Зотов (ZOMI) 471 03.05.16 20:49 Сейчас в теме
(10) dgolovanov, нет, в комментах много обсуждений старых релизов и многие высказывания вводят в заблуждение. Например, когда-то в первых редакциях у меня были ресурсы, кроме, ФНС - Коммерсант-Картотека и Контур-Фокус - и несколько десятков постов обсуждается эта тема. Или еще бесконечные высказывания троллей - что все уже есть в БП 3. Хотя это "всё" я сделал за несколько лет до авторов типовых.Также так как у продукта давно уже несколько сотен активных пользователей - отвечать на разных ресурсах на вопросы крайне утомительно.
12. Виталий Иммель (Atletnah) 3 01.03.17 13:40 Сейчас в теме
Выдает ошибку "Индекс находится за границами массива"
БП 3.0.46.20
13. Иван Пешков (JohnPawn) 10 02.03.17 23:07 Сейчас в теме
14. Екатерина Кашапова (Evangelina) 29.03.17 08:16 Сейчас в теме
А будет работать, если релиз базы старый и нетиповой? Релиз Управление торговлей 11.1.10.138.
15. Иван Пешков (JohnPawn) 10 29.03.17 13:11 Сейчас в теме
(14) Работать не будет, если есть желание, могу добавить изменения в обработку для работы в типовом релизе 11.1.10.138.
16. Alex Mordvinov (MrTwisterKRR) 11.04.17 20:44 Сейчас в теме
В БП 3.0 складно работает. Добавил в УТ, куда только перешли, а так кнопки печать в карточке контрагента нет... :-(
17. Иван Пешков (JohnPawn) 10 11.04.17 21:26 Сейчас в теме
(16) В Торговле это производится через кнопку "Заполнение"->"Заполнить по ИНН или наименованию" или через кнопку "Еще"->"Заполнение"->"Заполнить по ИНН или наименованию"
18. Мордвинов Александр (NewTechCompany) 12.04.17 14:01 Сейчас в теме
(17) Дело в том, что и Заполнение и Еще кнопок нет!
19. Иван Пешков (JohnPawn) 10 12.04.17 14:50 Сейчас в теме
(18) Скачайте обработку заново, ссылка по которой вы скачивали ранее действует 1 год. Затем подключите обработку. Параметры подключения в УТ11.3 выглядят так.
Прикрепленные файлы:
20. Alex Mordvinov (MrTwisterKRR) 13.04.17 08:34 Сейчас в теме
(19) Файл не найден.
Прикрепленные файлы:
21. Иван Пешков (JohnPawn) 10 13.04.17 08:52 Сейчас в теме
(20) Лучше, на будущее, с этим моментом разобраться в техподдержке сайта. А пока отправил вам обработку по эл.почте.
22. Данила Мастеров (user734109) 14.04.17 12:53 Сейчас в теме
Подскажите, будет ли работать с 1С:ERP Управление предприятием 2.0 (2.0.10.172). Конфигурация старая и доработанная, обновляться до новых релизов не планируем.
23. Иван Пешков (JohnPawn) 10 15.04.17 19:33 Сейчас в теме
(22) Развернул типовую 1С:ERP Управление предприятием 2.0 (2.0.10.172). Подключил обработку. Лезут ошибки. После доработок будет работать. Можете приобрести текущую обработку, а исправленную вышлю вам на эл.почту.
24. Иван Пешков (JohnPawn) 10 16.04.17 12:28 Сейчас в теме
(22) Добавил в обработку возможность работы с 1С:ERP Управление предприятием 2.0 (2.0.10.172).
25. Владислав Матвеев (Amur_MVS) 11 12.05.17 16:35 Сейчас в теме
26. Василий Марлин (KotyaVasya) 24.05.17 15:24 Сейчас в теме
Купил, прикрепил в БП 3.0. Пытаюсь заполнить. Ошибка
В чем может быть дело?
Прикрепленные файлы:
28. Иван Пешков (JohnPawn) 10 24.05.17 21:19 Сейчас в теме
29. Василий Марлин (KotyaVasya) 25.05.17 06:52 Сейчас в теме
(28) Нет, дело не в Windows, а в данной конкретной базе 1С. На всех (3-х) остальных базах обработка работает совершенно штатно. Все базы запускались под одной платформой и на одном и том же компьютере, который даже не перезагружался для чистоты эксперимента.
Найти, какая конкретно настройка базы виновата, пока к сожалению не удается.
Так что в конечном итоге спасибо.
30. Василий Марлин (KotyaVasya) 25.05.17 08:56 Сейчас в теме
(29)
Странно, но сегодня с утра загрузил снова глючную базу из dt-ки и глюк пропал, обработка сработала штатно и на этой базе.
В общем как всегда, если 1С глючит, то способы борьбы с глюками одни и те же: кэш почистить, выгрузить базу в dt-ку и загрузить снова и т.д.

Прошу прощения за беспокойство.
31. Иван Пешков (JohnPawn) 10 25.05.17 22:37 Сейчас в теме
(30) Рад, что все удачно разрешилось)
Оставьте свое сообщение