Загрузка кадастровой стоимости земельных участков с сайта Росреестра в 1С:УПП (ред. 1.3)

Опубликовал Илья (husky) в раздел Обмен - Загрузка и выгрузка в Excel

Обработка для автоматической загрузки значений кадастровой стоимости земельных участков с сайта Росреестра для УПП 1.3

Взята за основу обработка автора http://infostart.ru/public/292078/ Загрузка кадастровой стоимости земельных участков с сайта Росреестра в 1С:Бухгалтерия 8 (ред. 3.0).

Почему была переботана данная обработка? Обработка автора  dvigor ищет через API сайта rosreestr.ru земельные участки по кадастровым номерам. В процессе ее использования обнаружилось, что она находит около 2% всех земельных участков из моего списка, что грустно, но к сожалению эта проблема данного API и ничего с этим не поделаешь(что на нем информация не полная), но что было сделано:

Изменения и дополнения:

Переведен интерфейс с управляемых форм на обычные;

Строки подсвечиваются (разница в кадастровой стоимости -красная строка, разница в дате - зеленая)

В интерфейс добавлены закладки:

-Загрузка с API сайта (собственно этот функционал сохранен из полностью заимствован с обработки автора 
dvigor;

-Загрузка из Excel (можно загрузить информацию об измененной стоимости земельных участков из файла Excel);

-Загрузка с сайта (эта пожалуй самая главная закладка, так как здесь используется алгоритм поиска не через API сайта, а напрямую через его сервис по поиску земельных участков https://rosreestr.ru/wps/portal/cc_information_online?KN, таймаут на каждый земельный участок 4 секунды, чтобы не забанил сайт. При реализации данного функционала огромную помощь оказала публикация http://infostart.ru/public/255881/ Пример работы с заголовками HTTP-запросов: загрузка версий программ с users.v8.1c.ru, за что огромное спасибо ее автору.

Строго не судите, эта моя первая обработка, принимаются критика и замечания.

Update 24/12/2016 Версия 1.1 Изменились алгоритмы работы поисковой системы сайта, в обработку внесены изменения.

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

Наименование Файл Версия Размер
Загрузка кадастровой стоимости земельных участков с сайта Росреестра версия 1.0
.epf 56,90Kb
24.12.16
23
.epf 56,90Kb 23 Скачать
Загрузка кадастровой стоимости земельных участков с сайта Росреестра версия 1.1
.epf 60,88Kb
24.12.16
7
.epf 60,88Kb 7 Скачать

См. также

Добавить вознаграждение
Комментарии
1. Роман Узьмов (RomanUzmov) 42 16.12.16 14:29 Сейчас в теме
Обработка работала прекрасно, но почему-то с недавних пор выдаёт ошибку "Ошибка 301", похоже сервис перестал работать.
2. Илья (husky) 4 26.12.16 08:50 Сейчас в теме
(1) Сервис работать не перестал, просто алгоритмы сайта переделали. Эти изменения учтены в версии 1.1
warliker; RomanUzmov; +2 Ответить 3
3. Роман Узьмов (RomanUzmov) 42 05.01.17 12:42 Сейчас в теме
4. Александр Усов (warliker) 17.02.17 15:50 Сейчас в теме
(2)Спасибо за исправление.
5. Александр Усов (warliker) 17.02.17 16:33 Сейчас в теме
(2) Единственная проблема - во втором запросе HTTP при обходе элементов "td" элемента "ГКН" больше нет, смог зацепиться по идентификатору таблицы:
        ЭлементыDOM = ДокументHTML.ПолучитьЭлементыПоИмени("tr");
	Для Каждого ЭлДок Из ЭлементыDOM Цикл
		Если СокрЛП(ЭлДок.Идентификатор)="js_oTr0" Тогда
			АдресЗапроса = АдресЗапроса+ЭлДок.ДочерниеУзлы[0].ДочерниеУзлы[1].Гиперссылка;
		КонецЕсли;
	КонецЦикла;
...Показать Скрыть