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