Имя: Пароль:
1C
1С v8
Вывод данных из DBF в ТЗ
0 Samir
 
03.06.14
12:47
Заранее прошу прощения за глупый вопрос, только начинаю постигать 8-ку. Сегодня явно не мой день. Имею простейший код:
тзДанные = Новый ТаблицаЗначений;
    тзДанные.Колонки.Добавить("Номенклатура");
    тзДанные.Колонки.Добавить("Цена");
    тзДанные.Колонки.Добавить("Количество");
    тзДанные.Колонки.Добавить("Сумма");
    тзДанные.Колонки.Добавить("ПоказательНДС");
    тзДанные.Колонки.Добавить("НДС");

    БД = Новый xBase(ИмяФайла);
    Для сч=1 По БД.КоличествоЗаписей() Цикл
        Контрагент = БД.KONTRAGENT;
        Договор = БД.DOGOVOR;
        ОМС = БД.OMS;
        Если ОМС=1 Тогда
            Склад = Справочники.Склады.НайтиПоКоду("АН0000074");
        Иначе
            Склад = Справочники.Склады.НайтиПоКоду("АН0000075");
        КонецЕсли;
        НоваяСтрока = тзДанные.Добавить();
        НоваяСтрока.Номенклатура = БД.NOMENK;
        НоваяСтрока.Цена = БД.CENA;
        НоваяСтрока.Количество = БД.KOL;
        НоваяСтрока.Сумма = БД.SUMMA;
        НоваяСтрока.ПоказательНДС = БД.NDS;
        НоваяСтрока.НДС = БД.SUMMANDS;
       КонецЦикла;    
    БД.ЗакрытьФайл();

Вопрос: Почему он мне выводит в Табличную часть две одинаковых первых строки?
1 ДенисЧ
 
03.06.14
12:51
А где позиционирование на очередной записи БД?
2 Samir
 
03.06.14
12:55
(1) Туплю сегодня. Пропустил
БД.Следующая();
3 Survivor
 
03.06.14
12:56
Пока БД.Следующая() Цикл
...
КонецЦикла;