Выгрузить значения из dbf файл в таблицу значений

"Помогите найти ошибку! При нажатии кнопки на внешней обработки "Загрузить", она не заходит в цикл, Что не так?

/////

ДБФ = Новый XBase;

ТЗКонтр = Новый ТаблицаЗначений;
ТЗКонтр.Колонки.Добавить("НомерСтроки", Новый ОписаниеТипов("Число"));
ТЗКонтр.Колонки.Добавить("Наим", Новый ОписаниеТипов("Строка"));
ТЗКонтр.Колонки.Добавить("ПолНаим", Новый ОписаниеТипов("Строка"));
ТЗКонтр.Колонки.Добавить("Атрибуты", Новый ОписаниеТипов("Строка"));
ТЗКонтр.Колонки.Добавить("Инфо", Новый ОписаниеТипов("Строка"));
ТЗКонтр.Колонки.Добавить("ИНН", Новый ОписаниеТипов("Строка"));
ТЗКонтр.Колонки.Добавить("Адресс", Новый ОписаниеТипов("Строка"));

ДБФ.ОткрытьФайл("f:\Тамбов-Консалтинг\ВЕГА\вега\Clients.dbf", ,Истина);
Сообщить("Загружаем клиентов");
НК = ДБФ.КоличествоЗаписей()= 5;
Для Н=1 По НК Цикл

ДБФ.Перейти(Н);

ТЗКонтр.Добавить();
ТЗКонтр.НомерСтроки = Н;
ТЗКонтр.Наим = СокрЛП(ДБФ.NAME);
ТЗКонтр.ПолНаим = СокрЛП(ДБФ.FULL_NAME);
ТЗКонтр.Атрибуты = СокрЛП(ДБФ.ATTRIBUTES);
ТЗКонтр.Инфо = СокрЛП(ДБФ.PERINFO);
ТЗКонтр.ИНН = СокрЛП(ДБФ.INN);
ТЗКонтр.Адресс = СокрЛП(ДБФ.UR_ADDRESS);
Сообщить("привет");
Сообщить(ТЗКонтр.Наим);

КонецЦикла;
Сообщить("Загрузили клиентов");



/////"

"> НК = ДБФ.КоличествоЗаписей()= 5;

И какое значение в результате у НК ?"

"> НК = ДБФ.КоличествоЗаписей()= 5;
То же на СИ учились писать? Зачем 2 знака равно?"

Неужели уже с отпуска пришла?

Уже. Две недели как один день.

а ремонт? Кто кого победил?

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

"Переделала вот эту часть, но теперь он заходтит в цикл, но не перебирает все 5 значений, а только первое.

НК = ДБФ.КоличествоЗаписей()< 5;
Для НК = 1 По НК Цикл

ДБФ.Перейти(НК);

НС = ТЗКонтр.Добавить();
НС.НомерСтроки = НК;"

"> НК = ДБФ.КоличествоЗаписей()< 5;
Девушка, откройте наконец то книжку "Руководство по встроенному языку" и прочитайте ее!"

А воспользоваться отладчиком религия запрещает ?