Перевод кода с обычной на УФ | Немного о непонятном

Переношу обработку на управляемую форму. Это 1С ЖКХ ТСЖ ЖСК(БП) 2.0 на 3.0. Почему он определяет справочники и мн.другое как переменные? Их указать как перменныне в процедуре или форме? Думал объекты назначить, не то получается.

К примеру "Ошибка":
ВнешняяОбработка.КВП_ЗагрузкаДанныхПоЛС.Форма.Форма.Форма(246,12)}: Переменная не определена (Справочники)
        Здание = <<?>>Справочники.КВП_Здания.НайтиПоНаименованию(НаименованиеЗдания, Истина); (Проверка: Тонкий клиент)

[CODE]
&НаКлиенте
Процедура КнопкаВыполнитьНажатие(Кнопка)

    Если объект.Организация.Пустая() Тогда
        Сообщить("Не выбрана организация!");
        Возврат;
    КонецЕсли;

    Если НЕ ЗначениеЗаполнено(объект.Дата) Тогда
        Сообщить("Не выбрана дата, на которую будут записаны данные и открыты лицевые счета!");
        Возврат;
    КонецЕсли;

    Если ПустаяСтрока(объект.ФайлЗагрузки) Тогда
        Сообщить("Не выбран файл для загрузки!");
        Возврат;
    КонецЕсли;

    Сообщить("Загрузка начата " + ТекущаяДата());
    Сообщить("----------");

    ФайлДБФ = Новый XBase;
    ФайлДБФ.Кодировка = КодировкаТекста.UTF8;
    ФайлДБФ.ОткрытьФайл(объект.ФайлЗагрузки, , Истина); //только для чтения
    Если НЕ ФайлДБФ.Открыта() = Истина Тогда
        объект.ОбщегоНазначения.СообщитьОбОшибке("Файл не открыт!");
        Возврат;
    КонецЕсли;

    мНастройкиУчетнойПолитикиТСЖ = УПЖКХ_ОбщегоНазначенияСервер.ПолучитьПараметрыУчетнойПолитикиЖКХ(объект.Дата, объект.Организация);


    // Данные по площади
    //ТаблицаПлощадей = Новый ТаблицаЗначений;
    //ТаблицаПлощадей.Колонки.Добавить("Помещение");
    //ТаблицаПлощадей.Колонки.Добавить("ОбщаяПлощадь");
    ////
    //ТаблицаДолейЛС = Новый ТаблицаЗначений;
    //ТаблицаДолейЛС.Колонки.Добавить("ЛицевойСчет");
    //ТаблицаДолейЛС.Колонки.Добавить("Помещение");
    //ТаблицаДолейЛС.Колонки.Добавить("Доля");

    ТаблицаПлощадей = Новый Массив;
    Структура = Новый Структура;
    Структура.Вставить("Помещение") ;
    Структура.Вставить("ОбщаяПлощадь");
    ТаблицаПлощадей.Добавить(Структура);

    ТаблицаДолейЛС = Новый Массив;
    Структура = Новый Структура;
    Структура.Вставить("ЛицевойСчет");
    Структура.Вставить("Помещение");
    Структура.Вставить("Доля");
    ТаблицаДолейЛС.Добавить(Структура);

    //НомерСтроки = 0;
    Пока НЕ ФайлДБФ.ВКонце() Цикл

        //НомерСтроки = НомерСтроки + 1;
        //ФайлДБФ.Перейти(НомерСтроки);

        ЛицевойСчетСтрока = УстановкаНомераЛицевогоСчета();  // СокрЛП(ФайлДБФ.LS);
        ФИО = СокрЛП(ФайлДБФ.FIO);
        Корпус = СокрЛП(ФайлДБФ.KORP);
        Квартира = ФайлДБФ.KV;
        КолЗарегистрированных = ФайлДБФ.ZAREG;
        КолОтсутствующих = ФайлДБФ.OTSUTS;
        КолКомнат = ФайлДБФ.KOL_KOMN;
        ОбщаяПлощадь = ФайлДБФ.OB_PLOSH;
        НаселенныйПункт = СокрЛП(ФайлДБФ.NP);
        НаименованиеУлицы = СокрЛП(ФайлДБФ.NAME_UL);
        ТипУлицы = СокрЛП(ФайлДБФ.TIP_UL);
        НомерДома = ФайлДБФ.DOM;
        Улица = НаименованиеУлицы; // + " " + ТипУлицы;

        Состояние("" + ФайлДБФ.НомерЗаписи() + "/" + ФайлДБФ.КоличествоЗаписей() + ": " + ФИО);
        ОбработкаПрерыванияПользователя();

        ФайлДБФ.Следующая();

        Если ПустаяСтрока(ЛицевойСчетСтрока) ИЛИ ПустаяСтрока(ФИО) ИЛИ ПустаяСтрока(НаселенныйПункт + Улица) Тогда
            Продолжить;
        КонецЕсли;

        // Справочник "Здания"
        СтруктАдрес = Новый Структура;
        СтруктАдрес.Вставить("АдресРФ",                   Истина);
        СтруктАдрес.Вставить("КодСтраны",                 "");
        СтруктАдрес.Вставить("Страна",                    "");
        СтруктАдрес.Вставить("Индекс",                    "");
        СтруктАдрес.Вставить("Регион",                    "");
        СтруктАдрес.Вставить("РегионСокращение",          "");
        СтруктАдрес.Вставить("КодРегиона",                "");
        СтруктАдрес.Вставить("Район",                     "");
        СтруктАдрес.Вставить("РайонСокращение",           "");
        СтруктАдрес.Вставить("Город",                     НаселенныйПункт);
        СтруктАдрес.Вставить("ГородСокращение",           "");
        СтруктАдрес.Вставить("НаселенныйПункт",           "");
        СтруктАдрес.Вставить("НаселенныйПунктСокращение", "");
        СтруктАдрес.Вставить("Улица",                     Улица);
        СтруктАдрес.Вставить("УлицаСокращение",           "");
        СтруктАдрес.Вставить("Дом",                       "" + НомерДома);
        СтруктАдрес.Вставить("ТипДома",                   "");
        СтруктАдрес.Вставить("Корпус",                    Корпус);
        СтруктАдрес.Вставить("ТипКорпуса",                "");
        СтруктАдрес.Вставить("Квартира",                  "");
        СтруктАдрес.Вставить("ТипКвартиры",               "");
        СтруктАдрес.Вставить("Представление",             НаселенныйПункт + ", " + Улица + "., дом № " + НомерДома + ?(ПустаяСтрока(Корпус), "", ", корпус " + Корпус));
        СтруктАдрес.Вставить("ЗначенияПолей",             "");

        НаименованиеЗдания = Структура; //УправлениеКонтактнойИнформацией.СведенияОбАдресах(СтруктАдрес);
        Здание = Справочники.КВП_Здания.НайтиПоНаименованию(НаименованиеЗдания, Истина);
        Если Здание.Пустая() Тогда
            ЗданиеОбъект = объект.Справочники.КВП_Здания.СоздатьЭлемент();
            ЗданиеОбъект.Наименование = НаименованиеЗдания;
            ЗданиеОбъект.НомерДома = "" + НомерДома + ?(ПустаяСтрока(Корпус), "", "/" + Корпус);
            ЗданиеОбъект.Многоквартирное = Истина;
            ЗданиеОбъект.ТипСооружения = объект.Перечисления.УПЖКХ_ТипСооружения.Здание;
            Если НЕ объект.КВП_ЗаписатьОбъект(ЗданиеОбъект) Тогда
                Продолжить;
            КонецЕсли;
            Здание = ЗданиеОбъект.Ссылка;
            ЗаписатьАдресЗдания(Здание, СтруктАдрес);
        Иначе
            ДанныеАдреса = объект.РегистрыСведений.КВП_Адреса.СрезПоследних(КонецДня(объект.Дата),
                             Новый Структура("Объект, Вид", Здание, объект.Перечисления.КВП_ВидыАдресов.Здание));
            Если ДанныеАдреса.Количество() = 0 Тогда
                ЗаписатьАдресЗдания(Здание, СтруктАдрес);
            КонецЕсли;
        КонецЕсли;

        // Справочник "Квартиры".
        Помещение = объект.Справочники.УПЖКХ_Помещения.НайтиПоКоду(Квартира, , , Здание);
        Если Помещение.Пустая() Тогда
            ПомещениеОбъект = объект.Справочники.УПЖКХ_Помещения.СоздатьЭлемент();
            ПомещениеОбъект.Код = Квартира;
            ПомещениеОбъект.Владелец = Здание;
            ПомещениеОбъект.ВидПомещения = объект.Справочники.УПЖКХ_ВидыПомещений.НайтиПоКоду("000000001");
            ПомещениеОбъект.Наименование = "Кв. " + Квартира;
            ПомещениеОбъект.КоличествоКомнат = КолКомнат;
            Если НЕ объект.КВП_ЗаписатьОбъект(ПомещениеОбъект) Тогда
                Продолжить;
            КонецЕсли;
            Помещение = ПомещениеОбъект.Ссылка;
        КонецЕсли;

        // Общая площадь помещения.
        СтрокаПлощади = объект.ТаблицаПлощадей.Добавить();
        СтрокаПлощади.Помещение = Помещение;
        СтрокаПлощади.ОбщаяПлощадь = ОбщаяПлощадь;

        объект.ТаблицаПлощадей.Свернуть("Помещение", "ОбщаяПлощадь");
        СтрокаПомещения = объект.ТаблицаПлощадей.Найти(Помещение, "Помещение");
        Если НЕ СтрокаПомещения = Неопределено Тогда
            НаборЗаписей = объект.РегистрыСведений.КВП_ПлощадьПомещения.СоздатьНаборЗаписей();
            НаборЗаписей.Отбор.Объект.Установить(Помещение);
            НаборЗаписей.Отбор.ВидПлощади.Установить(объект.Справочники.УПЖКХ_ВидыПлощадей.НайтиПоКоду("000000001"));  // ОбщаяПлощадь
            НаборЗаписей.Отбор.Период.Установить(объект.Дата);
            НовЗапись = НаборЗаписей.Добавить();
            НовЗапись.Период = объект.Дата;
            НовЗапись.Объект = Помещение;
            НовЗапись.ВидПлощади = объект.Справочники.УПЖКХ_ВидыПлощадей.НайтиПоКоду("000000001");   // ОбщаяПлощадь
            НовЗапись.Площадь = СтрокаПомещения.ОбщаяПлощадь;
            объект.КВП_ЗаписатьОбъект(НаборЗаписей);
        КонецЕсли;

        // Лицевой счет.
        ЛицевойСчет = объект.Справочники.КВП_ЛицевыеСчета.НайтиПоНаименованию(ЛицевойСчетСтрока, Истина);
        Если ЛицевойСчет.Пустая() Тогда
            ТекРодитель = объект.ГруппаЛС;
            //Если ПустаяСтрока(Улица) Тогда
            //    ТекРодитель = Справочники.КВП_ЛицевыеСчета.ПустаяСсылка();
            //Иначе
            //    ТекРодитель = Справочники.КВП_ЛицевыеСчета.НайтиПоНаименованию(Улица, Истина);
            //    Если ТекРодитель.Пустая() ИЛИ НЕ ТекРодитель.ЭтоГруппа Тогда
            //        ЛСГруппа = Справочники.КВП_ЛицевыеСчета.СоздатьГруппу();
            //        ЛСГруппа.Наименование = Улица;
            //        Если КВП_ЗаписатьОбъект(ЛСГруппа) Тогда
            //            ТекРодитель = ЛСГруппа.Ссылка;
            //        КонецЕсли;
            //    КонецЕсли;
            //КонецЕсли;
            ЛицевойСчетОбъект = объект.Справочники.КВП_ЛицевыеСчета.СоздатьЭлемент();
            ЛицевойСчетОбъект.Наименование  = ЛицевойСчетСтрока;
            ЛицевойСчетОбъект.Родитель = ТекРодитель;
            ЛицевойСчетОбъект.Адрес = Помещение;
            //ЛицевойСчетОбъект.ТипВладельца  = ЛицевойСчетОбъект.Контрагент.ЮрФизЛицо;
            //ЛицевойСчетОбъект.ВидЧастнойСобственности = Перечисления.КВП_ВидыЧастнойСобственности.Совместная;
            //ЛицевойСчетОбъект.ДатаОткрытия  = Дата;
            Если НЕ объект.КВП_ЗаписатьОбъект(ЛицевойСчетОбъект) Тогда
                Продолжить;
            КонецЕсли;
            ЛицевойСчет = ЛицевойСчетОбъект.Ссылка;
        КонецЕсли;

        СтрокаЛС = ТаблицаДолейЛС.Добавить();
        СтрокаЛС.ЛицевойСчет = ЛицевойСчет;
        СтрокаЛС.Помещение = Помещение;
        СтрокаЛС.Доля = ОбщаяПлощадь;

        // Проживающий.
        Проживающий = СоздатьПроживающего(ЛицевойСчет, ФИО);
        Если Не ЗначениеЗаполнено(Проживающий) Тогда
            Продолжить;
        КонецЕсли;

        // Укажем проживающего, как владельца л/с.
        //ЛицевойСчетОбъект = ЛицевойСчет.ПолучитьОбъект();
        //ЛицевойСчетОбъект.ВладелецОбъекта = Проживающий;
        //КВП_ЗаписатьОбъект(ЛицевойСчетОбъект);
        //ЛицевойСчет = ЛицевойСчетОбъект.Ссылка;

        // Документ "Открытие лицевого счета".
        ДанныеЛС = объект.РегистрыСведений.КВП_ЛицевыеСчета.СрезПоследних(объект.Дата, Новый Структура("ЛицевойСчет", ЛицевойСчет));
        Если ДанныеЛС.Количество() > 0 Тогда
            Если ДанныеЛС[0].Действует Тогда
                Продолжить;
            КонецЕсли;
        КонецЕсли;

        ДокументОбъект = объект.Документы.КВП_ОткрытиеЛицевогоСчета.СоздатьДокумент();
        ДокументОбъект.Дата        = объект.Дата;
        ДокументОбъект.ЛицевойСчет = ЛицевойСчет;
        НовКонтрагент = СоздатьКонтрагента(ФИО);
        ДокументОбъект.Контрагент = НовКонтрагент;
        ДокументОбъект.ДоговорКонтрагента     = НовКонтрагент.ОсновнойДоговорКонтрагента;
        ДокументОбъект.Комментарий = "Открытие л/с; дом " + Здание.НомерДома + ", " + Помещение + "; " + ФИО;

/////////// Раскомментировать для ПроживающихГотовымиЧислами
        //ТЧДокОткрЛС = ДокументОбъект.Главная;
        //СтрокаТЧ = ТЧДокОткрЛС.Добавить();
        //СтрокаТЧ.Проживающий = Проживающий;
        //СтрокаТЧ.Собственник = ИСТИНА;
////////////////////////////////
        ДокументОбъект.ОтветственныйСобственник = Проживающий;
        // Проживающие готовыми числами
        КолПроживающих = КолЗарегистрированных - КолОтсутствующих;
        ДокументОбъект.КоличествоЗарегистрированных = КолЗарегистрированных;
        ДокументОбъект.КоличествоПроживающих = КолПроживающих;

        // Проживающие НЕ готовыми числами
        Если НЕ объект.Константы.УПЖКХ_УказыватьКоличествоПрожИЗарегЧислами.Получить() Тогда

            КолСтрокПроживающих = Макс(КолПроживающих, КолЗарегистрированных);
            тмКолПроживающих = КолПроживающих;
            тмКолЗарегистрированных = КолЗарегистрированных;

            ТабличнаяЧасть = ДокументОбъект.Главная;
            // Добавим проживающих в табличную часть документа.
            НоваяСтрока = ТабличнаяЧасть.Добавить();
            НоваяСтрока.Проживающий = Проживающий;
            НоваяСтрока.Собственник = ИСТИНА;
            НоваяСтрока.Проживает   = ?(тмКолПроживающих = 0, Ложь, Истина);
            НоваяСтрока.Прописан    = ?(тмКолЗарегистрированных = 0, Ложь, Истина);

            тмКолПроживающих = Макс(0, тмКолПроживающих - 1);
            тмКолЗарегистрированных = Макс(0, тмКолЗарегистрированных - 1);

            Для Индекс = 2 По КолСтрокПроживающих Цикл
                ТекПроживающий = СоздатьПроживающего(ЛицевойСчет, "Проживающий_" + ЛицевойСчет + "_" + Индекс);
                Если Не ЗначениеЗаполнено(ТекПроживающий) Тогда
                    Продолжить;
                КонецЕсли;
                НоваяСтрока = ТабличнаяЧасть.Добавить();
                НоваяСтрока.Проживающий = ТекПроживающий;
                НоваяСтрока.Проживает   = ?(тмКолПроживающих = 0, Ложь, Истина);
                НоваяСтрока.Прописан    = ?(тмКолЗарегистрированных = 0, Ложь, Истина);

                тмКолПроживающих = Макс(0, тмКолПроживающих - 1);
                тмКолЗарегистрированных = Макс(0, тмКолЗарегистрированных - 1);
            КонецЦикла;

        КонецЕсли;

        объект.КВП_ЗаписатьОбъект(ДокументОбъект, РежимЗаписиДокумента.Проведение);

    КонецЦикла;

    ФайлДБФ.ЗакрытьФайл();

    КоличествоЛС = ТаблицаДолейЛС.Количество();
    НомерСтроки = 1;
    Для Каждого СтрокаЛС ИЗ ТаблицаДолейЛС Цикл
        Состояние("" + НомерСтроки + "/" + КоличествоЛС + ": установка доли л/с " + СтрокаЛС.ЛицевойСчет);
        ОбработкаПрерыванияПользователя();
        СтрокаПомещения = объект.ТаблицаПлощадей.Найти(СтрокаЛС.Помещение, "Помещение");
        Если НЕ СтрокаПомещения = Неопределено Тогда
            // Запись долей собственности.
            РазмерСтавок = объект.РегистрыСведений.КВП_РазмерыДолейЛицевыхСчетов.СоздатьНаборЗаписей();
            РазмерСтавок.Отбор.Период.Установить(объект.Дата);
            РазмерСтавок.Отбор.Объект.Установить(СтрокаЛС.Помещение);
            РазмерСтавок.Отбор.ЛицевойСчет.Установить(СтрокаЛС.ЛицевойСчет);
            НовЗапись = РазмерСтавок.Добавить();
            НовЗапись.Период          = объект.Дата;
            НовЗапись.Объект          = СтрокаЛС.Помещение;
            НовЗапись.ЛицевойСчет     = СтрокаЛС.ЛицевойСчет;
            НовЗапись.ДоляЧислитель   = СтрокаЛС.Доля;
            НовЗапись.ДоляЗнаменатель = СтрокаПомещения.ОбщаяПлощадь;
            объект.КВП_ЗаписатьОбъект(РазмерСтавок);
        КонецЕсли;
        НомерСтроки = НомерСтроки + 1;
    КонецЦикла;

    Сообщить("----------");
    Сообщить("Загрузка завершена " + ТекущаяДата());

КонецПроцедуры
[/CODE]