Создать Файл dbf на платформе 8.3.18.1483

&НаСервере
Функция СформироватьDBF(КолЭксп)
	
	Путь1="\\192.168.1.7\all\Спецобмен\DO_Crystal\";
	Файл1="spisokKa.dbf";
	 
	 Попытка
		 
		 БД1=Новый XBase;
		 
		 //Чтобы правильно читались наименования
		 БД1.Кодировка=КодировкаXBase.OEM;
		 
		 БД1.Поля.Добавить("NREE",  "S", 10);
		 БД1.Поля.Добавить("DREE",  "S", 25);
		 БД1.Поля.Добавить("NPP",  "N", 6);
		 БД1.Поля.Добавить("NDOK", "S", 12);
		 БД1.Поля.Добавить("KOMU",  "S", 160);
		 БД1.Поля.Добавить("KUDA",  "S", 160);
		 БД1.Поля.Добавить("VID",  "S", 50);
		 БД1.Поля.Добавить("MESTO", "S", 1);
		 БД1.Поля.Добавить("DOLG_I",  "S", 30);
		 БД1.Поля.Добавить("FAM_I", "S", 30);
		 БД1.Поля.Добавить("SUMSB", "N", 7,2);
		 БД1.Поля.Добавить("VES",  "N", 7,2);
		 БД1.Поля.Добавить("SUMPROP",  "S", 160);
		 БД1.Поля.Добавить("KOLREE",  "N", 2);
		 БД1.Поля.Добавить("KOLPROP",  "S", 100);
		 БД1.Поля.Добавить("NOMREE",  "N", 2);
		 БД1.Поля.Добавить("KOLVSEGO",  "N", 3);
		 БД1.Поля.Добавить("DO", "S", 160);
		 БД1.СоздатьФайл(Путь1+Файл1);