DBF.Codepage

From SunFlurry wiki
Jump to: navigation, search
  Codepage (Кодовая страница DBF)
Объект:DBF
Статус разработки: Реализована
Тип:Атрибут
Обращение к БД:Нет
Доступность:Чтение и запись
Визуальность:Нет

Получить кодовую страницу файла, либо установить ее в заголовок файла (при этом сами данные в файле не будут перекодированы -- используется для открытия неверно созданных файлов, для перекодировки данных используйте TranslateTo). На данный момент принимаются следующие кодовые страницы (совпадающие с номерами кодовых страниц Windows): 437, 737, 850, 852, 857, 860, 861, 863, 865, 866, 874, 895, 932, 936, 949, 950, 1250, 1251, 1252, 1253, 1254, 1257.

Синтаксис

DBF.Codepage:<Кодовая страница данных файла (INT)>

Возвращаемое значение

Возвращает строку -- имя текущего файла объекта.

Примеры

ПостИмяОст:="Остатки на "+FormatDate(КонДата,"YYYY-mm-dd")+".dbf";
бРезОст:=dbf.Create();
бРезОст.FileName:=Каталог+ПостИмяОст;
бРезОст.Codepage:=1251;
  
бРезОст.AddField(,"dDate","DATE");
бРезОст.AddField(,"cItemName","STRING.250");
бРезОст.AddField(,"nQty","NUMBER.15.0");

...

З:=Query.Create();
З.Execute(ТЗ);
 
While З.Next(1) Do
  While З.Next(2) Do
    зКл:=З.зКлКО;
    If зКл<=0 Then
      Continue;
    EndIf;
    зН:=З.зН;
    бРезОст.AddRecord(,"dDate,cItemName,nQty",З.День,зН.ПолнНаименование,зКл);
  EndDo;
EndDo;
бРезОст.Save();
бРезОст.Close();