DBF.Save
Save (Сохранить изменения) | |||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|
|
Функция сохраняет все изменения, произведенные в открытом файле (т.е., сохраняет на диск все данные файла и, если необходимо, его заголовок).
Синтаксис
DBF.Save()
Примеры
ПостИмяОст:="Остатки на "+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();