FireDAC Merkwürdigkeiten

[haentschman]

Zitat:

Datenbankverbindung ist ReadOnly, FDQuery ist ReadOnly oder enthält eine nicht editierbare Datenmenge (z. B: eine Select über mehrere Tabellen), ...?

PS: das funktioniert 100x am Tag

ReadOnly: False
QueryReadOnly: False
Join: no

Wir haben teilweise richtige Netzwerkprobleme...kann das damit zusammenhängen?

[Delphi.Narium]

Ja!

Verbindung geht zwischendurch flöten, der Server merkt es und die Datenbank macht ein Rollback.

Beim Post gibt es dann eine neue Datenbankverbindung, eine neu Transaktion und das Zusammenspiel passt nicht mehr.

Strubbel in beliebiger Kombination ist in so 'nem Fall möglich.

[TurboMagic]

Und wie geht man mit sowas um?

[Delphi.Narium]

Für eine stabile Netzwerkverbindung sorgen.

Ggfls. TimeOut-Einstellungen auf beiden Seiten anpassen.

Ursachenforschung betreiben:

Z. B. per Ping prüfen, wie die Antwortzeiten zwischen Client und Server sind.
"Unnormal hoch"? Ursache suchen und beseitigen.

Per Traceroute prüfen, ob eventuell ein Problem "irgendwo auf der Strecke zwischen Client und Server" vorliegt. Router und oder Switch zicken rum, sind (halbwegs) defekt, Kabelstecker locker, Wackelkontakt durch Kabelbruch, ...

Prüfen, ob es ausschließlich Probleme bei der Kommunikation zwischen Datenbankserver und Datenbankclient sind, oder eher grundsätzliche Probleme vorliegen.

Eigentlich gibt es da auf technischer Ebene eine Unmenge an Problemen, die man als Entwickler eher nicht beeinflussen kann. Da müssen dann die entsprechenden Admins und / oder Techniker ran.

Im Programm dafür sorgen, dass auch bei solchen Problemen ein konsistenter Datenbestand sichergestellt ist.

Reparaturroutinen à la: Klapptnicht, dann einfach nochmal probieren, nur dann, wenn es wirklich keine andere Lösungsmöglichkeit gibt. Aber das ist eher nicht empfehlenswert, insbesondere nicht bei Datenbanken, bei HTTP- oder FTP-Abfragen, lesen von Dateien "irgendwo auf 'nem Netzlaufwerk", ... kann man sowas eventuell machen.

[jobo]

Soll es so sein, dass nur auf DSBrowse (und kein anderer State) geprüft wird?
Und wenn schon kein anderer State in Frage kommt, dann keine Fehlerbehandlung wenn die erwarteten nicht vorliegen? (Dann wird die Speicherroutine einfach so beendet, ohne das getan zu haben, was sie soll?)
Das Locate ist eine Funktion, ob es geklappt hat oder gerade die Connection flöten geht oder was anderes, interessiert die nachfolgende Operation auch nicht. Es wird also vielleicht woanders eingetragen, was zu der nicht gefundenen ID gehört.
Wenn man tatsächlich instabile DB Connection hat, könnte das zu unerwarteten Ergebnissen führen. Vielleicht sogar mit stabiler Connection.

[Delphi.Narium]

Sagen wir mal so: Die Routine ist verbesserungswürdig:

Delphi-Quellcode:

procedure TDM.FillLastEmployee(ID: Integer; Employee, TerminDate: string);
begin
  // Suche den Satz mit der ID
  FDQuery.Locate('idBelKopf', ID, []); // Gefunden = true, nicht gefunden = false.
  // Aber das interessiert uns nicht.
  // Sind wir im Browsemodus, dann
  if FDQuery.State = dsBrowse then
  begin
    // wird der Satz geändert, auf dem wir gerade mit dem Datensatzzeiger stehen.
    // Es kann der Satz mit idBelKopf = ID sein, muss es aber nicht.
    FDQuery.Edit;
    FDQuery.FieldByName('Monteur').AsString := Employee;
    FDQuery.FieldByName('MonPlan').AsString := TerminDate;
    try
      FDQuery.Post; // <- Zeile 4034
    on e : exception do begin
      FDQuery.Cancel;
      // Und hier dann eine anwenderfreundliche Fehlerbehandlung oder Fehlermeldung ausgeben.
    end;
  end;
end;

[Uwe Raabe]

Das Locate erzwingt immer den Browse-Mode (zumindest bei FireDAC). Wenn das Locate keinen anderen Zweck erfüllt, kannst du auch gleich CheckBrowseMode aufrufen und die Prüfung auf Browse-Mode weglassen.

Welcher Datensatz dann geändert wird (und es wird immer einer geändert, wenn keine Exception oder ähnliches auftritt) hängt vom Rückgabewert von Locate ab. Entweder ist es der Datensatz, der gesucht wurde oder der Datensatz der vor dem Locate aktiv war.

Man sollte noch erwähnen, dass bei einem leeren DataSet das Edit intern ein Insert ausführt.