Frage zu DbDelete() [Erledigt]

[Jan]

Schon wieder etwas, was ich nicht wirklich verstehe. Ich möchte einen Datensatz löschen.

Code: Alles auswählen

orte->(DbSeek(nOrt2, , "ortnum"))
IF orte->(DbRLock())
   orte->(DbDelete())
ENDIF

Der richtige Datensatz wird gefunden. Der wird auch gelockt. Der führt auch die Löschzeile aus im Debugger. Aber es wird nichts gelöscht. Wieso nicht?

Jan

[Tom]

Diese Code funktioniert bei mir. Er löscht auch den Datensatz. Gegenfrage: Wie ermittelst Du, ob gelöscht wurde? Prüfst Du einfach nur, ob der Datensatz vorhanden ist? Dann ist möglicherweise SET DELETED OFF. Oder fragst Du mit db->(Deleted()) ab?

[Jan]

Hallo Tom,

ja, eigentlich sollte das löschen. Tut der aber nicht. Ich schau da mit VDBU rein. Aber auch ein anschließendes PACK schmeißt den Datensatz nicht raus. Deswegen bin ich ja so irritiert.

Und jetzt bin ich so richtig perplex: orte->(Deleted()) gibt mir ein .T. zurück! Wer spinnt jetzt? Der Debugger oder VDBU und PACK? Da stimmt doch irgendwas nicht.

Jan

[brandelh]

hast du eventuell mit readonly geöffnet ?

[Tom]

@Hubert: Dann würde DbDelete() einen Laufzeitfehler erzeugen. Pack sowieso. Und Deleted() würde auch nicht .T. zurückliefern. Interessanterweise aber liefert DbRlock() ein .T. zurück.

[Rolf Ramacher]

was passiert, wenn nicht geblockt werden kann. ??

ich mache dies so

Code: Alles auswählen

do while 123->(!rlock())
enddo
123->(Dbdelete())
123->(Dbunlock())

[Jan]

Rolf,

sowas werde ich niemals machen. Wenn nicht gelockt werden kann, dann geht der in eine Endlosschleife rein, und kommt da nie wieder raus. Ich empfinde das als extrem unsaubere Programmierung.

Ich locke ja. Und das klappt auch. Sonst würde der niemals in die If-Schleife zum löschen reingehen.

Jan

[AUGE_OHR]

Schon wieder etwas, was ich nicht wirklich verstehe. Ich möchte einen Datensatz löschen.

Code: Alles auswählen

orte->(DbSeek(nOrt2, , "ortnum"))
IF orte->(DbRLock())
   orte->(DbDelete())
ENDIF

Der richtige Datensatz wird gefunden. Der wird auch gelockt. Der führt auch die Löschzeile aus im Debugger. Aber es wird nichts gelöscht. Wieso nicht?

schon mal ein orte->(DbCommit()) oder orte->(DbSkip(0)) nach orte->(DbDelete()) versucht ?

kannst du das auch in einem Demo reproduzieren ?

[Jan]

Ein Hinweis von Tom hat mich auf die richtige Spur gebracht. Ich habe jetzt ein Set Deleted On eingebaut, danach läuft es. Mir war schlichtweg nicht bewußt, das diese Einstellung offenbar Thread-Local ist. Und da der ganze Vorgang in einem eigenen Thread abläuft, wurde das vom Mainthread offensichtlich nicht durchgereicht.

Warum der gelöschte Datensatz in VDBU nicht als gelöscht angezeigt wurde, ist dann nur ärgerlich, ich hätte mir einige Verwirrung sparen können.

Jan

[Tom]

Hallo, Jan.

sowas werde ich niemals machen.

Ich mache so etwas durchaus, und ich habe noch keine Deadlocks an solchen Stellen erlebt. Meine Applikation hat die Hoheit über die Daten, und gelockt wird nur, wenn auch umgehend geschrieben - und gleich wieder entsperrt - wird. Ich sorge dafür, dass a) Daten überhaupt nicht bearbeitet werden können, wenn das parallel bereits geschieht und b) Datensätze niemals länger als für den unmittelbaren Schreibvorgang gesperrt sind. Der Benutzer bearbeitet i.d.R. Memvars, keine Datenbankfelder. Und wenn man so arbeitet, kann man auch die Sperrungen wie von Rolf gezeigt auslösen, vielleicht noch mit einem Sleep(0) innerhalb der Schleife. Ich habe das mal eine Weile loggen lassen - es gab trotz intensiver Arbeit an zig Arbeitsplätzen niemals die Situation, dass die Schleife mehr als einmal passiert werden musste. Gleichzeitig hat man den Vorteil, dass man beim Schreiben in mehrere Tabellen nicht plötzlich auf ein scheiterndes Lock reagieren muss, indem man irgendeinen Warte- oder Auswahldialog anzeigt. Lock, schreiben und entsperren stellen immer eine zwingend aufeinanderfolgende Einheit dar.

BTW, schön, dass der Fehler gefunden ist. Allerdings: SET DELETED hat keinen Einfluss auf das PACK. Ein gelöschter Datensatz sollte nach einem Pack-Vorgang verschwunden sein, ganz unabhängig davon, wie SET DELETED steht.