Автоматизация обновления адресного классификатора

Доброго времени суток, уважаемые коллеги. 

Начну с небольшого предисловия. Недавно обновил базу бухгалтерии до последнего релиза и встала задача об обновлении классификатора, но делать данную работу монотонно для 3-х баз руками хотелось не очень. Тем более давно хотел попробовать для себя на практике oScript и его библиотеки.

Вот и родилась идея помочь не только себе, но и другим людям.

Идея скрипта очень проста: скачиваем с сайта https://its.1c.ru БД ФИАС с поддержкой адресов по муниципальному делению, распаковываем и запускаем 1С с обработкой, которая уже определяет, что нам нужно обновлять.

В обработке добавлен код для определения, какие регионы загружать в классификатор:

&НаКлиенте
Процедура _ПриОткрытии(Отказ)

ПриОткрытии(Отказ);

Попытка
КодИсточникаЗагрузки = "КАТАЛОГ";

Для Каждого стр ИЗ СубъектыРФ Цикл
Если  стр.КодСубъектаРФ = 45 //Курганская обл
ИЛИ стр.КодСубъектаРФ = 47 //Ленинградская обл
ИЛИ стр.КодСубъектаРФ = 50  //Московская область
ИЛИ стр.КодСубъектаРФ = 59 //Пермский край
ИЛИ стр.КодСубъектаРФ = 66 //Свердловская обл
ИЛИ стр.КодСубъектаРФ = 72 //Тюменкская обл
ИЛИ стр.КодСубъектаРФ = 74  //Челябинская обл
ИЛИ стр.КодСубъектаРФ = 77  //Город Москва
ИЛИ стр.КодСубъектаРФ = 78  //Город СанктПетербург

Тогда

стр.Загружать = Истина;
Иначе
стр.Загружать = Ложь;
КонецЕсли;
КонецЦикла;

АдресЗагрузки = "D:Scriptdownload";

ОбновитьИнтерфейсПоКоличествуЗагружаемых();

Загрузить(Неопределено);
Исключение
ЗаписатьОшибкуВЖурнал(ОписаниеОшибки());
ЗавершитьРаботуСистемы(Ложь);
КонецПопытки;

КонецПроцедуры //_ПриОткрытии

Также обращу внимание на то, что в коде также жестко прописано, куда будут распакованы, скачанные скриптом файлы.

Тестирование проводилось на библиотеке стандартных подсистем версии 3.0.1.349, а именно на конфигурации 1С: Бухгалтерия 3.0 (3.0.67.54)