gifts2017

Ввод номеров домов по адресному классификатору

Опубликовал Евгений П. (jack19) в раздел Обработки - Обработка справочников

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

Это особенно актуально, когда в номерах домов присутствуют корпус, строение и буквы. Кадровик уже при приеме на работу может увидеть несоответствие дома в паспорте с классификатором и уточнить его у работника. При нажатии педальки поля "Дом" обработки "Ввод адреса" открывается таблица домов, отсортированная по номеру и соответствующая выбранной улице. В каждой строке таблицы все разновидности одного номера дома, т.е. корпуса, строения, номера с буквами. Двойным щелчком выбранный дом вводится в поля диалога "Дом" и "Корпус", обновляется почтовый индекс и активируется поле "Квартира". Теперь для выбора домов задание улицы не обязательно, если дом привязан к населенному пункту.

Установка:

Можно в конфигурации обработку "ВводАдреса" заменить одноименной обработкой из архива Doma.zip, а можно отредактировать её следующим образом: добавить в диалоге реквизиту дом кнопку выбора и вставить в начало процедуры ПриНачалеВыбораЗначения() следующие строки:

Если Элемент = "Дом" Тогда
      Параметры = СоздатьОбъект("СписокЗначений");
      Параметры.Установить("Имя объекта", СписокОбъектов.Получить("Улица").Получить("Наименование"));
      Параметры.Установить("Список владельцев", СформироватьСписокВладельцев("Улица"));
      Параметры.Установить("Дом", СокрЛП(Дом));
      Параметры.Установить("Корпус", СокрЛП(Корпус));
      ОткрытьФормуМодально("Отчет",Параметры,КаталогИБ()+"ExtForms\Doma.ert");
      Если ТипЗначенияСтр(Параметры) = "СписокЗначений" Тогда
          Дом = Параметры.Получить("Дом");
          Корпус = Параметры.Получить("Корпус");
          СписокОбъектов.Получить("Улица").Установить("Код",Параметры.Получить("Код"));
          ПриРедактированииРеквизита(Дом);
          Активизировать("Квартира");
      КонецЕсли;
      Возврат;
КонецЕсли;

Обработку Doma.ert из архива следует поместить в каталог ExtForms базы данных.

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

Наименование Файл Версия Размер
Архив с обработками "Ввод адреса" и "Дома" 24
.zip 35,95Kb
17.02.13
24
.zip 35,95Kb Скачать

См. также

Подписаться Добавить вознаграждение
Комментарии
1. Vladimir (Boroda) 25.10.11 20:43
Задумка, конечно, интересная. Её давно бы 1С могла реализовать, но почему-то не сделала. Только вот немного сомнения берут - зависит ли индекс от номера корпуса? От дома - да, но от корпуса..? В жизни вряд ли один дом с корпусами будут обслуживать разные почтовые отделения. Во всяком случае, можно посмотреть, как это сработает на тех домах, где индексы вводятся неправильно (но скорее всего это зависит от нестыковки полей КЛАДРА).
2. Евгений П. (jack19) 25.10.11 20:52
Вопрос с зависимостью индекса от корпуса у меня стоял. Я пытался сначала передавать в процедуру ПриРедактированииРеквизита() содержимое поля "Корпус" а не "Дом", для чего перед этим активизировать поле "Корпус". Но почему-то в выше названной процедуре активным всё-равно определялся элемент диалога "Дом". Поэтому я пока не стал с этим заморачиваться. Возможно в дальнейшем внесу соответствующие правки.
3. Сергей (Seregalink) 26.10.11 00:17
Да реализация данной задумки, конечно интересна, но на практике пока проблем таких не возникало, с корпусами домов, или просто в нашем городе их очень мало ))
4. vkr (vkr) 26.10.11 09:14
Мысль интересная, но, скорее всего, уже чуть-чуть запоздалая :
"C 15 ноября по Распоряжению Правительства РФ от 10.06.11 №1011-р
в полную силу заработает новая Федеральная информационная адресная
система (ФИАС), содержащая точную адресную информацию."
5. Евгений П. (jack19) 26.10.11 09:31
Сомневаюсь, что с 15 ноября заработает новая система. У нас такие вещи так быстро не делаются.
6. Александр Лыткин (TrinitronOTV) 26.10.11 09:48
jack19 пишет:

Сомневаюсь, что с 15 ноября заработает новая система. У нас такие вещи так быстро не делаются.

тоже сомнения берут
7. rimma_n (rimma_n) 26.10.11 10:08
(1) Boroda, вы не поверите! если вводить адрес в Москве, то при вводе некоторых улиц (не помню уже точно каких), индекс появляется, только когда корпус введешь. Я думаю, это не потому, что разные корпуса обслуживают разные отделения связи. Видимо, в классификаторе дыры какие-то
8. Евгений П. (jack19) 26.10.11 10:46
rimma_n пишет:

(1) Boroda, вы не поверите! если вводить адрес в Москве, то при вводе некоторых улиц (не помню уже точно каких), индекс появляется, только когда корпус введешь. Я думаю, это не потому, что разные корпуса обслуживают разные отделения связи. Видимо, в классификаторе дыры какие-то


Чего далеко ходить. Улица Народного Ополчения. дома 37 нет, а дом 37к1 есть. Индекс выскакивает только при вводе корпуса. Но при выборе из классификатора 37к1 индекс выскакивает сразу.
9. Евгений П. (jack19) 26.10.11 10:55
Boroda пишет:
Только вот немного сомнения берут - зависит ли индекс от номера корпуса? От дома - да, но от корпуса..?


На самом деле в классификаторе корпуса от домов не отделяются. Например одна строчка 37,37к1,37к2 может иметь один индекс, а 37к3,37стр1 - другой. В данном примере дом 37 есть, поэтому индекс выскакивает при вводе номера дома. Но если далее Вы введете корпус 3, то индекс поменяется.
10. Dmitry Bas (b-dm) 26.10.11 13:57
Автору: сейчас сдаем данные по ПФР.

В проверочной программе Check XML выдается очень много предупреждений по несоответствию индекса и номера дома.
Не могу понять - обработка решает эту проблему, народ кто пользовался, не ответите ?))
11. Евгений П. (jack19) 26.10.11 16:57
b-dm пишет:
Не могу понять - обработка решает эту проблему, народ кто пользовался, не ответите ?


Решает в той же степени, что и типовая обработка "ВводАдреса", т.е. надо в ручную каждому сотруднику в адресе прописки подтвердить улицу выбором её из классификатора, дом и корпус, тогда индекс изменится. Для автоматического исправления могу предложить собственную обработку "Проверка адресов". Она проверяет и исправляет индексы и частично другие ошибки, которые понимает, как исправить.
Прикрепленные файлы:
Проверка адресов.ert
12. and balu (baluba) 28.10.11 10:59
Скажите данная обработка предназначена только для Москвы и Питера?
13. Евгений П. (jack19) 28.10.11 11:28
baluba пишет:

Скажите данная обработка предназначена только для Москвы и Питера?


Почему? Для всех городов, дома которых присутствуют в классификаторе. Ясно, что в основном это крупные города. Вряд ли разработчики классификатора когда-нибудь охватят (в плане домов) всю Россию.
14. Vladimir (Boroda) 28.10.11 21:51
(7,8) Спасибо, узнал новое, ибо у нас город не настолько большой, чтобы без "головного" дома быть, или номера домов раздают по иному принципу. Но в любом случае хорошо, если она индексы выводит правильные, т.к. при стандартном определении индекса бывают сбои, и он выводится не тот, что в ПФР, которая и возвращает отчёт назад.
15. Евгений П. (jack19) 18.02.13 07:35
Теперь программа проверки CheckXml+2NDFL дает ошибки если нет номера дома в непустом списке домов классификатора домов. Кроме того обнаружил, что в классификаторе есть дома, привязанные к населенному пункту, т.е. без улицы. В обработку внесены необходимые изменения.