Umgang mit Query's

[mikhal]

Dein Fehler ist bereits hier begründet:

Zitat:

procedure TForm1.UniQuery4BeforeInsert(DataSet: TDataSet);
begin
UniQuery4.ParamByName('ticket_id').AsInteger:=UniQ uery1.FieldByName('ticket_id').AsInteger;
UniQuery4.ParamByName('user').AsInteger:=2;
UniQuery4.ParamByName('datum').AsDateTime:=now;
UniQuery4.ParamByName('kommentar').AsString:=DBAdv Memo2.Lines.Text;
end;

Ich verwende normalerweise das Event OnNewRecord, aber es sollte auch in dem gewählten Event funktionieren.

Dann verwende ich den Variablennamen DataSet, weil es mir einfach zu lästig ist, über den Query-Namen nachzudenken...

Aber der Fehler ist dein Versuch, über die Parameterliste zu gehen. Gehe über die Feldnamen und weise diesen die Werte zu...

Code:

procedure TForm1.UniQuery4BeforeInsert(DataSet: TDataSet);
begin
    UniQuery4.FieldByName('ticket_id').AsInteger:=UniQuery1.FieldByName('ticket_id').AsInteger;
    UniQuery4.FieldByName('user').AsInteger:=2;
    UniQuery4.FieldByName('datum').AsDateTime:=now;
    UniQuery4.FieldByName('kommentar').AsString:=DBAdvMemo2.Lines.Text;

Grüße
Mikhal

[Ykcim]

Hervorragend! Damit funktioniert es. Ich bin nicht darauf gekommen, dass ich über die Felder gehen muss...

Aber bedeutet das, das wenn ich einen Parameter habe, der nicht mit Hilfe eines DBEdit-Feldes eingegeben wird, ich das Update-Statement für alle Felder manuell machen muss?

Vielen Dank
Patrick

[Ykcim]

@haentschman

Vielen Dank für Deine guten Tipps. Ich werde sie beherzigen. Ich denke an eine Kombination. Ich möchte schon eine klasse für alle Datenbank-Interaktionen haben. In dieser würde ich reinschreiben, was ich gerade zu Testzwecken zusammenklicke. Ich finde die Verwendung von DB-Komponenten bei Eingaben sehr charmant. Bei nur anzeigenden oder berechnenden Prozeduren würde ich es auch ohne DataSources und DB-Komponenten wieder von Hand machen.

Vielen Dank.
Patrick

[mikhal]

Nein, bei Änderungen übergibt UniQuery die Feldinhalte an die Parameter, du kümmerst dich nur um die zu ändernden Felder - entweder durch eine direkte Zuweisung (z.B. im Event BeforePost der UniQuery) oder ohne eigene Aktion, wenn du die verpönten datensensitiven Komponenten einsetzt (für irgendwas müssen die ja gut sein...).

Wenn du das in einer Klasse einsetzt, verwaltest du dort die Feldinhalte und schreibst letztlich wirklich alle Feldinhalte in die Parameter (weil der Verwaltungsaufwand, welches Feld geändert wurde, zu aufwändig ist).

Grüße
Mikhal

[p80286]

Noch eine Anmerkung zu "Datum":
Falls Du das aktuelle Datum und oder die aktuelle Zeit benötigst solltest du auf das SYSDATE() der DB zurück greifen. Bei Now bekommst Du das lokale Datum und Zeit zurück, und das könnte unterschiedlich sein zu dem der DB.
"Brauch ich nicht, ist alles lokal" haben schon viele gesagt, und aus lauter Gewohnheit im entscheidenden Moment Fehler in die DB hineingeschoben.

Gruß
K-H

[Bebe]

Hallo,

so funktioniert es nicht.

Bei den UniDac Komponenten führst du das Statement nur von UniQuery4.sql aus. Wenn du die anderen Statements ausführen willst, dann musst du sie über UniQuery4.sql.Text := UniQuery4.SQLInsert.Text zuweisen. Dann hast du auch die richtigen Parameter.

Deswegen auch...

Zitat von Ykcim:

Der Parameter Ticket_ID stammt aus dem Select Statement.

Die Statements InsertSQL, InsertUpdate usw. musst du alle übergeben, dann kannst du sie ausführen.

Ausserdem ist BeforeInsert nicht der richtige Ort die Parameter zu übergeben.
Einfach eine Prozedure schreiben, zuerst das Stement zuweisen und dann die Parameter übergeben. Je nach Statement Open, Execute oder ExecSQL ausführen.

Ich hoffe ich konnte ein wenig helfen.

Gruß
Matze