7.7 Почему не работает ВыбратьЭлемнты()?

Здравствуйте, ну подскажите, что не так делаю.. Надо вывести в Дбфку все основные средства с длинной ВЛ больше нуля. В таком виде ДБФка пустая..

Код:

Процедура Выполнить()
ДБФ=СоздатьОбъект("XBase");
ДБФ.ДобавитьПоле("Inv",2,10,0);
ДБФ.ДобавитьПоле("DlinaVL",1,5,);
ДБФ.СоздатьФайл("E:\db1.dbf");

Карточка=СоздатьОбъект("Справочник.ОсновныеСредства");  // присвоение объектов     
//Карточка.порядокКодов();
Карточка.ВыбратьЭлементы();
Карточка.ИспользоватьДату('01.01.2008');
//Карточка.НайтиПоКоду(12100);
Пока Карточка.ПолучитьЭлемент()>0 Цикл 
Код=Карточка.код;
ДлиннаВЛ=Карточка.ДлинаВЛ;
Если ДлиннаВЛ>0 Тогда 
ДБФ.Добавить();
ДБФ.Inv=Код;
ДБФ.DlinaVL=ДлиннаВЛ;
ДБФ.Записать();		
КонецЕсли;
КонецЦикла;
КонецПроцедуры

А в таком, как и ожидалась одна запись с инвентарником и длинной вл..

Код:

Процедура Выполнить()
ДБФ=СоздатьОбъект("XBase");
ДБФ.ДобавитьПоле("Inv",2,10,0);
ДБФ.ДобавитьПоле("DlinaVL",1,5,);
ДБФ.СоздатьФайл("E:\db1.dbf");

Карточка=СоздатьОбъект("Справочник.ОсновныеСредства");  // присвоение объектов     
//Карточка.порядокКодов();
//Карточка.ВыбратьЭлементы();
Карточка.ИспользоватьДату('01.01.2008');
Карточка.НайтиПоКоду(12100);
//Пока Карточка.ПолучитьЭлемент()>0 Цикл 
Код=Карточка.код;
ДлиннаВЛ=Карточка.ДлинаВЛ;
Если ДлиннаВЛ>0 Тогда 
ДБФ.Добавить();
ДБФ.Inv=Код;
ДБФ.DlinaVL=ДлиннаВЛ;
ДБФ.Записать();		
КонецЕсли;
//КонецЦикла;
КонецПроцедуры

Почему не работает ВыбратьЭлемнты()???

Офигеть.. а я два дня с бубном пропрыгал вокруг.. Спасибо заработало..