Probleme beim Speichern in eine Tabelle

[Uwe Raabe]

Bist du sicher, daß das hier richtig ist?

Zitat:

'select * FROM PLANUNG where ID_AUFTRAG = ' + IntToStr(id_Planung)

[Delphi.Narium]

Gibt es eine Fehlermeldung?

Wenn ja, welche?

Wenn es keine Fehlermeldung gibt und der gezeigte Quelltext in keiner Fehlerbehandlung gekapselt ist, dann wird eventuell ein anderer Datensatz geändert, als erwartet (siehe Uwe Raabes Hinweis).

[Luckner]

Select-Anweisung ist korrekt. Habe die überprüft. Es gibt auch keinen Datensatz in der Tabelle "Planung", der diesen Eintrag trägt. Es gibt auch keine Fehlermeldung.

[Uwe Raabe]

Zitat von Luckner:

Es gibt auch keinen Datensatz in der Tabelle "Planung", der diesen Eintrag trägt.

Sollte es in dem Fall dann nicht DatamodulePlanung.IBDataSetPlanung.Append; anstatt DatamodulePlanung.IBDataSetPlanung.Edit; heißen?

[himitsu]

Zitat von Uwe Raabe:

Zitat von Luckner:

Es gibt auch keinen Datensatz in der Tabelle "Planung", der diesen Eintrag trägt.

Sollte es in dem Fall dann nicht DatamodulePlanung.IBDataSetPlanung.Append; anstatt DatamodulePlanung.IBDataSetPlanung.Edit; heißen?

Edit macht ein Insert (oder Append, aber egal, da hier das Gleiche) wenn noch "garkein" Datensatz vorhanden ist,

aber ja ...

[Luckner]

Danke erstmal für die Hilfe. Mache jetzt Feierabend und werde mich morgen wieder damit befassen. Muss unbedingt duschen.

Gruß, Luckner

[Frickler]

Zitat von himitsu:

Edit macht ein Insert (oder Append, aber egal, da hier das Gleiche) wenn noch "garkein" Datensatz vorhanden ist,

Andererseits schrieb der TE, dass nach dem Select "RecordCount" 1 ergibt. Wobei ich nicht weiß, ob das auch 1 ergibt, wenn die Selektion nichts ergibt und Edit einen Datensatz anhängt.

Die ganze Geschichte ist eh total fehlerträchtig. Warum nicht direkt (für Dialect 1) ein

Code:

UPDATE AUFTRAG
SET STATUS = :ST, STATUSDATUM = CURRENT_TIMESTAMP, STATUS_ANWENDER = :ANW
WHERE ID = :ID

und

Code:

UPDATE PLANNUNG
SET STATUS = :ST, STATUSDATUM = CURRENT_TIMESTAMP, STATUS_ANWENDER = :ANW
WHERE ID_AUFTRAG = :IA

Das ganze in eine Procedure wrappen mit den zu updatenden Werten als Parameter und gut ist. Wenn beide Wertänderungen zusammengehören kann man die gleich in einer gemeinsamen Transaktion abfrühstücken.

Oder geht das nicht mit den verwendeten Komponenten?

[p80286]

Du bist doch nicht mehr...........
Über eine Query zwei Statements absetzen und wissen was passiert(ren sollte) und sich damit 63 Threadeinträge sparen. Unverantwortlich!


Gruß
K-H

[juergen]

Hallo,

ich würde weiterhin empfehlen mit SQL-Parametern zu arbeiten.
In etwas so:

Delphi-Quellcode:

with DatamodulePlanung.IBDataSetPlanung.Params do begin
  Clear;
   with Add do begin
    Name := 'id_Planung';
    DataType := ftInteger;
    Size := 0;
    ParamType := ptInput;
  end;
end;

DatamodulePlanung.IBDataSetPlanung.SelectSQL.Add('select * FROM PLANUNG where ID_AUFTRAG = :id_Planung');

Als ich noch keine Parameter verwendet hatte, gab es in meinem Fall auch falsche Werte eines zusammengebastelten SQL-Statement in einer Schleife.

[Delphi.Narium]

Wenn es in beiden Fällen keine Fehlermeldung gibt, dann muss es auch in beiden Fällen einen entsprechenden Datensatz geben. Für gewöhnlich scheitert ein Edit auf eine leere Datenmenge und ein Post darauf erst recht.

Lass Dir bitte in beiden Fällen mal nach dem .Open, aber noch vor dem .Edit .RecNo und .RecordCount ausgeben.

Sollte in beiden Fällen jeweils 1 sein, ansonsten bekommst Du bei den Abfragen andere Ergebnisse, als Du erwartest und änderst in den Ergebnismengen jeweils den zufällig ersten Datensatz.