Запись DBF-файла

Следующий фрагмент программы создает DBF-файл с тремя полями и выгружает в него справочник Сотрудники:

ФайлDBF = Новый XBase;

ФайлDBF.Поля.Добавить("Name","S",100);

ФайлDBF.Поля.Добавить("Dep","S",50);

ФайлDBF.Поля.Добавить("Sum","N",10,2);

ФайлDBF.Кодировка = КодировкаХВаsе.ОЕМ; //кодировка DOS

ФайлDBF.СоздатьФайл("с:\staff.dbf");

Сотрудники = Справочники.Сотрудники.Выбрать();

Пока Сотрудники.Следующий() Цикл

ФайлDBF.Добавить();

ФайлDBF.Name = Сотрудники.Наименование;

ФайлDBF.Dер = Сотрудники.Подразделение;

ФайлDBF.Sum = Сотрудники.Оклад;

ФайлDBF.Записать();

КонецЦикла;

ФайлDBF.ЗакрытьФайл();