Имя: Пароль:
1C
1C 7.7
v7: Посмотрите плиз, что не так с ДБФ файлом?
0 palpetrovich
 
14.11.14
14:37
http://rghost.ru/59058452
код
Процедура Кнопка()  
    фДБФ = СоздатьОбъект("XBASE");
    фДБФ.ОткрытьФайл("D:\Export.dbf", , 1);
    фДБФ.КодоваяСтраница(1);    
    КоличествоЗаписей = фДБФ.КоличествоЗаписей();
    фДБФ.Первая();  
    Пока фДБФ.ВКонце()=0 Цикл
        Сообщить("НомерЗаписи "+фДБФ.НомерЗаписи()+"        KL_NM_K= "+фДБФ.KL_NM_K);
        фДБФ.Следующая();
    КонецЦикла;  
    фДБФ.ЗакрытьФайл();  
    Сообщить("КоличествоЗаписей="+КоличествоЗаписей)
КонецПроцедуры  

в результате первое сообщение: "НомерЗаписи 2", т.е. "пропадает" первая запись
Если эту первую запись удалить из файла - все читается корректно
1 palpetrovich
 
14.11.14
14:45
+(0) вот такая картинка
НомерЗаписи 2        KL_NM_K= ТОВ "Д?ОТЕРМ?КС"                                  
НомерЗаписи 3        KL_NM_K= КД за проведення розрахунк?в Харк?в РУ            
НомерЗаписи 4        KL_NM_K= ПАТ "РЕЗОНАНС"                                    
НомерЗаписи 5        KL_NM_K= КД за проведення розрахунк?в Харк?в РУ            
НомерЗаписи 6        KL_NM_K= ТОВ "НОР?КА"                                      
НомерЗаписи 7        KL_NM_K= КД за проведення розрахунк?в Харк?в РУ            
НомерЗаписи 8        KL_NM_K= ТОВ "ГПК "ЛЕНД"                                  
НомерЗаписи 9        KL_NM_K= КД за проведення розрахунк?в Харк?в РУ            
НомерЗаписи 10        KL_NM_K= ТОВ "НВО "РИФ"                                    
НомерЗаписи 11        KL_NM_K= КД за проведення розрахунк?в Харк?в РУ            
НомерЗаписи 12        KL_NM_K= ТОВ "Д?ОТЕРМ?КС"                                  
НомерЗаписи 13        KL_NM_K= КД за проведення розрахунк?в Харк?в РУ            
НомерЗаписи 14        KL_NM_K= ТОВ "Д?ОТЕРМ?КС"                                  
НомерЗаписи 15        KL_NM_K= КД за проведення розрахунк?в Харк?в РУ            
НомерЗаписи 16        KL_NM_K= ТОВ "Д?ОТЕРМ?КС"                                  
НомерЗаписи 17        KL_NM_K= КД за проведення розрахунк?в Харк?в РУ            
НомерЗаписи 18        KL_NM_K= ТОВ "ЕКВ?"                                        
НомерЗаписи 19        KL_NM_K= КД за проведення розрахунк?в Харк?в РУ            
НомерЗаписи 20        KL_NM_K= ТОВ "НВО "РИФ"                                    
НомерЗаписи 21        KL_NM_K= КД за проведення розрахунк?в Харк?в РУ            
КоличествоЗаписей=21
2 КонецЦикла
 
14.11.14
14:46
Может быть она удалена?
А вообще погугли перебор записей, есть еще варианты...
3 КонецЦикла
 
14.11.14
14:46
Открой DBF-редактором
4 Looser-1c
 
14.11.14
14:47
TЕсть такая штука, как показыватьУдаленные()
5 КонецЦикла
 
14.11.14
14:47
Не, скачал, не удалена
6 Ёпрст
 
14.11.14
14:56
(0) очевидно же, не ?
//   фДБФ.Первая();
7 palpetrovich
 
14.11.14
15:00
DBF-редактором смотрел конечно, запись на удаление не помечена
(6) не очевидно, после удаления первой записи - все читается нормально
8 Ёпрст
 
14.11.14
15:01
(7) зачем её удалять ?
9 palpetrovich
 
14.11.14
15:01
+(7) вот результат после удаления "первой"

НомерЗаписи 1        KL_NM_K= ТОВ "Д?ОТЕРМ?КС"                                  
НомерЗаписи 2        KL_NM_K= КД за проведення розрахунк?в Харк?в РУ            
НомерЗаписи 3        KL_NM_K= ПАТ "РЕЗОНАНС"                                    
НомерЗаписи 4        KL_NM_K= КД за проведення розрахунк?в Харк?в РУ            
НомерЗаписи 5        KL_NM_K= ТОВ "НОР?КА"                                      
НомерЗаписи 6        KL_NM_K= КД за проведення розрахунк?в Харк?в РУ            
НомерЗаписи 7        KL_NM_K= ТОВ "ГПК "ЛЕНД"                                  
НомерЗаписи 8        KL_NM_K= КД за проведення розрахунк?в Харк?в РУ            
НомерЗаписи 9        KL_NM_K= ТОВ "НВО "РИФ"                                    
НомерЗаписи 10        KL_NM_K= КД за проведення розрахунк?в Харк?в РУ            
НомерЗаписи 11        KL_NM_K= ТОВ "Д?ОТЕРМ?КС"                                  
НомерЗаписи 12        KL_NM_K= КД за проведення розрахунк?в Харк?в РУ            
НомерЗаписи 13        KL_NM_K= ТОВ "Д?ОТЕРМ?КС"                                  
НомерЗаписи 14        KL_NM_K= КД за проведення розрахунк?в Харк?в РУ            
НомерЗаписи 15        KL_NM_K= ТОВ "Д?ОТЕРМ?КС"                                  
НомерЗаписи 16        KL_NM_K= КД за проведення розрахунк?в Харк?в РУ            
НомерЗаписи 17        KL_NM_K= ТОВ "ЕКВ?"                                        
НомерЗаписи 18        KL_NM_K= КД за проведення розрахунк?в Харк?в РУ            
НомерЗаписи 19        KL_NM_K= ТОВ "НВО "РИФ"                                    
НомерЗаписи 20        KL_NM_K= КД за проведення розрахунк?в Харк?в РУ            
КоличествоЗаписей=20
10 Ёпрст
 
14.11.14
15:02
и так всё работает
11 palpetrovich
 
14.11.14
15:02
(8) ну, эксперимент типа :)
12 palpetrovich
 
14.11.14
15:04
(10) да, без "фДБФ.Первая();" работает, но ПОЧЕМУ (9) работате?!
13 Ёпрст
 
14.11.14
15:05
(12) при смене кодовой страницы и с Первая работает.. смотреть надо, мне лень.
14 КонецЦикла
 
14.11.14
15:19
Я помню что перебирал как-то иначе и все работало
Вроде бы через Пока ... Следующая() = 1
Но вот заглянул в ТиС, там как у автора...
15 palpetrovich
 
14.11.14
15:23
(13) :)
(14) дык, работать должно и так и так! просто вводит в ступор результаты в (1) и (9)