Prüfe vor Post, ob der Datensatz gesperrt ist

[Ackerjan]

Hallo,

ich habe das folgende Problem:

Ein Teil der Anwendungsumgebung in der ich programmiere nutzt eine nicht sehr verbreitete 4GL-sprache. Will man in dieser Sprache einen Datensatz bearbeiten nutzt man einen Update-Cursor. Dieser sorgt dafür, dass ein Datensatz auf der Informixdatenbank explizit gesperrt wird, während man damit arbeitet.

Nun will ich auf der Tabelle über ein TTable-Objekt mehrere Datensätze mit meinem Delphiprogramm ändern. Das klappt solange, bis ich ein Post auf den gesperrten Satz mache.(logisch).

Nun meine Fragen.

Gibt es eine "einfache" Möglichkeit vorher zu erfragen, ob der Datensatz gesperrt ist?
Kann ich den exclusiven Zugriff auf einen bestimmten Datensatz erzwingen (Nicht die ganze Tabelle sperren!)?
Oder kann ich zumindest gezielt in einem try except -Block den Informix-Fehler abfangen?
Oder könnt Ihr mir irgendwie anders weiterhelfen?


Der folgende Versuch lieferte leider nicht den richtigen Fehler!
-107 = [ISAM error: record is locked.] Diese wurde zwar in der EDB.Message als unknown error message number '-107' angezeigt. Der NativeErrorCode war leider falsch (-243).

except
on EDB: EDBEngineError do
begin
for i := 0 to EDB.ErrorCount -1 do
begin
if EDB.Errors[i].NativeError = -107 then
probiere_es_nochmal;
end;
end;

Anmerkung: Ich arbeite mit der BDE und Informix.

[mkinzler]

Warum BDE?

[SubData]

Zitat:

Zitat von mkinzler

Warum BDE?

Sehr hilfreich...

Dieses BDE-Bashing nervt... :wall:

[mkinzler]

Gern geschehen.

[Bernhard Geyer]

Zitat:

Zitat von SubData

Zitat:

Zitat von mkinzler

Warum BDE?

Sehr hilfreich...

Dieses BDE-Bashing nervt... :wall:

Ein Teil seiner Probleme liegen höchstwahrscheinlich in der BDE begründet (Fehlerhaftes Fehlermapping). Und wenn es erste Gehversuche mit einem praktisch in der Entwicklung gestorbenen System handelt dann sollt man dieses Hinterfragen.

Ach ja. Wieso hilfst du nicht? Dieses BDE-Bashing-Bashing ohne selbst zu helfen nervt :wall: :wall:

[Ackerjan]

Warum BDE ist einfach beantwortet! Weil es hier seit sehr langer Zeit eingesetzt wird!
Der Umstieg auf ADO, das umprogrammieren der Komponenten usw. wird wohl ein neues Projekt :).

Frage bezeiht sich also auf die BDE!

[SubData]

Zitat:

Zitat von Bernhard Geyer

Ach ja. Wieso hilfst du nicht? Dieses BDE-Bashing-Bashing ohne selbst zu helfen nervt :wall: :wall:

Einfach zu beantworten: Weil ich es an dieser Stelle nicht kann.
Ich wollte ihn auch nicht persönlich angreifen, aber es ist nunmal sehr "anstrengend" in jedem Thread über/mit BDE zu lesen, dass die BDE tot ist und jeder 3. fragt erstmal nach, warum denn nicht DatenbankTreiberXYZ verwendet wird.

Natürlich ist die BDE tot. Das wissen auch eigentlich alle.
Aber die Leute, die damit noch arbeiten (müssen) werden schon ihre Gründe haben und ich finde es einfach nicht richtig jedem gleich an den Kopf zu werfen, dass er gefälligst die BDE weglassen soll (Was ggf. 1000e Stunden Arbeit bedeuten würde).

Tschuldigung fürs OT und tschuldigung, falls sich jemand angegriffen gefühlt hat!

[HeikoAdams]

Vielleicht hilft Dir die CanModify-Eigenschaft von TDataSet weiter:

Zitat:

Gibt an, ob die Datenmenge Schreibzugriffe auf Daten zulässt.

[SubData]

Zitat:

Zitat von HeikoAdams

Vielleicht hilft Dir die CanModify-Eigenschaft von TDataSet weiter:

Zitat:

Gibt an, ob die Datenmenge Schreibzugriffe auf Daten zulässt.

Die Daten sind doch aber änderbar, auch wenn der Datensatz gesperrt ist.
Sie können nur in dem Moment nicht zurück in die Datenbank geschrieben werden.

Oder sehe ich das falsch ?!

[DeddyH]

Was ich auf die Schnelle ergooglen konnte, war das Programm onstat. Aber evtl. hilft Dir auch diese Seite schon mal ein wenig weiter.