Одна запись хорошо, но в файле можем быть много записей. Получается нам нужно двигаться по записям. Вот и будем двигаться. Для передвижения вперед есть специальная функция.
Следующая Синтаксис:
Англоязычный синоним:
Возвращаемое значение: Описание: Попробуем:
Ничего не произойдет.
И правильно. Нам нужен цикл. Типа следующая пока не конец файла. Значит конец файла нужно определить.
Перейти на следующую запись.
Следующая()
Next
Число: 1 — получена следующая запись; 0 — следующая запись не найдена.
Метод Следующая предназначен для позиционирования объекта на следующую запись. В зависимости от того, установлен ли текущий индекс, позиционирование происходит либо в порядке возрастания физического номера записи, либо в порядке возрастания значения выражения текущего индекса (если индекс создавался с установленным флагом "Убывание", то в порядке убывания).
Процедура Сформировать()
Т = СоздатьОбъект("Таблица");
ДБФ = СоздатьОбъект("XBase");
ДБФ.ОткрытьФайл("c:\Test.dbf");
ДБФ.Первая();
Т.ВывестиСекцию("Секция_1");
ДБФ.Следующая();
ДБФ.ЗакрытьФайл();
Т.ТолькоПросмотр(1);
Т.Показать();
КонецПроцедуры