Tabellen schließen

Ich bin auf der Suche nach einem Tool/Skript, das alle Tabellen im View/Projekt schließt und speichert.

Habe ein Projekt mit sehr vielen Ereignisthemen und die zugehörigen Tabellen sind dummerweise immer alle im Bearbeitungsmodus.
Versuch's mal damit. Denk dran, dass Bearbeitungen von Tabellen aus Textdateien nicht gespeichert werden können.

' Closes Tables and saves edits
' Reports Errors

theProject = av.GetProject
theDocs = theProject.GetDocs

theRep = nl+"Unable to Save Edits to Table(s):"+nl
for each aDoc in theDocs
if (aDoc.is(Table)) then
aDoc.GetWin.Close
if (aDoc.GetVTab.IsBeingEditedWithrecovery) then
doSave = TRUE
if (aDoc.GetVtab.StopEditingWithRecovery(doSave).Not) then
theRep = theRep+nl+" "+aDoc.GetName
end
end
end
end

if (theRep <> (nl+"Unable to Save Edits to Table(s):"+nl)) then
MsgBox.Report(theRep,"Error")
end
Also bei Tabellen, die zu einem Shape gehören funktioniert es einwandfrei. Allerdings hab ich einige Ereignisthemen aus DBF-Dateien in dem View und da funktioniert es nur eingeschränkt. D.h. wenn die Tabellen geöffnet sind, dann werden sie mit dem Skript zwar geschlossen, so dass sie weg sind. Allerdings wird nicht Tabelle "Bearbeitung beenden" durchgeführt, so dass die Tabellen bei einem erneuten Aufruf immer noch im Bearbeitungsmodus sind.

An der Textdatei-Einschränkung kann es doch nicht liegen. Sind doch alles DBF-Dateien.
Poppt nach Ausführung des Skriptes der Report auf ("Unable to save blabla..."?
Nein, es verschwindet einfach die Tabelle. Eine Meldung erscheint nicht.
Seltsam. Warum sind die Tabellen überhaupt im Bearbeitungsmodus? Wie lädst du die Ereignisthemen? Was passiert wenn du bei einer der entsprechenden Tabellen die Bearbeitung "normal" beendest, sie schließt und dann wieder aufrufst?
Ich finds auch seltsam. Die ganzen Ereignisthemen werden von einem Tool geladen und das lässt sie alle im Bearbeitungsmodus laden.
Von Hand schließen über Bearbeitung beenden geht ganz normal. Ist allerdings mehr als lästig immer ein Dutzend Tabellen von Hand zu schließen.
Kannst du das Script hinter dem "Tool" über 'Systemscript laden' ... äh ... laden? Dann könnte man das ein bisschen anpassen...