DBGrid zeigt 2 Datensätze nebeneinander - Ein Datensatz edit

[FrankBrin]

Hallo Leutle,
ich komm gerade nicht weiter. Aber von Anfang an.
Ein DBGrid (DataSource->AdoQuery) zeigt bei mir Verkaufsdaten eines Tages an. Damit Werte verglichen werden können, kann der Bediener einen einen anderen Tag auswählen. Diese Daten werden ebenfalls in dem DBGrid mit angezeigt und stammen aus der gleichen Tabelle. Die beiden Datensätze werden mit einer SELECT-Anweisung im Query gelesen. Diese sieht so in etwa aus (gekürzt):

'SELECT TblMain.PrdNo, TblMain.PrdName, TblMain.Verkauf, ' +
'TblComp.Verkauf AS VVerkauf' +
'FROM TblMain INNER JOIN TblMain AS TblComp ON TblMain.PrdNo = TblComp.PrdNo ' +
'WHERE (TblMain.Datum='+DBase.StrToSQL(MyDate)+') AND (TblComp.Datum='+DBase.StrToSQL(MyCompDate)+')';

Das funktioniert auch wunderbar.

Jetzt mein Problem:
Der Bediener soll nun eine der Spalten TblMain editieren dürfen. Befindet sich der Cursor in der entsprechenden Spalte schalte ich den DataSource auf Edit. Beim Verlassen mache ich Post. Doch dann kommt die Fehlermeldung
"Die zum Aktualisieren angegebene Zeile wurde nicht gefunden.Einige Werte wurden seit dem letzten Lesen ggf. geändert"

Also geändert wurde da mit Sicherheit nix, aber ich nehme an das die Query nicht mit dem INNER JOIN zurechtkommt.

Hat jemand eine Idee was ich falsch mache oder evtl. auch eine andere Lösung?

Gruß Frank

[mkinzler]

Verwende ein Updateobjekt (TUpdateSQL), in dem du das entsprechende Update-Statement setzt.

[FrankBrin]

Hallo mkinzler,
erstmal Danke für den Tip. Doch werd ich auch aus der Hilfe dazu nicht ganz schlau.
Könntest Du mir ein kleines Beispiel geben. Kenne TUpdateSQL bisher nicht.

Danke Frank

[mkinzler]

-TUpdateSQL auf Form legen.
-in Eigenschaft Query.UpdateObject auswählen
-UpdateSQL.ModifySQL ausfüllen bzw. durch Doppelklick auf Kompo Abfrageeditor starten.

[FrankBrin]

Das geht irgendwie gar nicht!
Ok Kompo platziert und versucht SQL-Anweisung Update aufzubauen. Das scheitert aber daran, dass ich nicht genau weiss, welcher datensatz das ist.
Andere Idee: Kann es evtl. daran liegen, dass ich in meiner SQL-Anweisung immer TBLMain.PrdNo geschrieben habe, aber in dem DBGrid nur den Spaltenname PrdNo verwende?

[mkinzler]

Welche der beiden "Instanzen" der Tabelle willst du updaten?

[FrankBrin]

TblMain

[mkinzler]

Verwende mal für beide Instanzen Aliase.

SQL-Code:

SELECT 
    T1.PrdNo, 
    T1.PrdName, 
    T1.Verkauf,
    T1.Verkauf AS VVerkauf
FROM 
    TblMain T1 
        JOIN TblMain T2 ON T2.PrdNo = T1.PrdNo 
WHERE 
    T1.Datum=:datum AND 
    T2.Datum=:datum2;

Update-Statement:

Delphi-Quellcode:

Update TbleMain set ... where PrdNo = :PrdNo and datum = :datum;

[FrankBrin]

Hallo mkinzler,
um das gestrige Problem heute wieder aufzunehmen, habe ich Deinen Ratschlag befolgt.
Habe die Tabellen und alle Spalten mit AS T1 und T2 versehen. Dies alleine hat keine Änderung zur Folge.

Und ich ringe immer noch um Verständnis mit dem TUpdateSQL. Zwei Verwirrungen:
1.) Was meinst Du mit Eigenschaft Query.UpdateObject auswählen. Das gibt es bei meinem TAdoQuery nicht.
2.) Update TblMain Set ... ->> Ja und da liegt genau das Problem Definition: Update Tabellenname Set Spalte=Wert ...
Woher soll ich den Wert bekommen, wenn mein DBGrid im EditMode ist?

Ich denke mal so kommen wir hier nicht weiter.

Andere Idee: Gibt es eine Möglichkeit zwei DBGrids zu "synchronisieren". Ich meine das man die Anzeige auftrennt und die angezeigten Datensätze nachführt.

Wäre schon wenn Du oder jemand anderes helfen könnte.

[FrankBrin]

Hallo nochmal,
Damit dieser Thread nicht ohne Lösung bleibt, hier meine Lösung:
Habe eine temporäre Tabelle angelegt. In diese Tabelle werden die gerade benötigten Datensätze des Tages hineinkopiert
('Insert * Into TblTmp Select * from TblMain). Danach führe ich den gleiche SELECT ... INNER JOIN aus, wie weiter oben bereits besprochen. Der Join geht halt auf die TblTmp. Und schon klappt es mit den Editieren.

Gruß
Frank

:-D