Problem mit SQL.Add

[haentschman]

Hallöle...

...ich hatte mir geschworen, niemals mehr auf Beitrage die WITH enthalten zu antworten... Das WITH sagt...entweder Copy/Paste aus alten Beispielen oder "ich hab das immer so gemacht". Die Zeiten ändern sich...

Delphi-Quellcode:

...
SQL.Add('Where Rechnr = + QuotedStr(ed_rechngd_rechnr.Text)+');

...meinst du, daß das SQL(string) "QuotedStr" versteht?

besser für die Zeile:

Delphi-Quellcode:

...
SQL.Add('where Rechnr = ' + QuotedStr(ed_rechngd_rechnr.Text));

die richtige Zeile:

Delphi-Quellcode:

LiteQuery_rechng.SQL.Add('where Rechnr = :REN'); 
LiteQuery_rechng.SQL.ParamByName('REN').AsString  := ed_rechngd_rechnr.Text;

PS: gegen die ADD Origien gibt es was von "mir" https://www.delphipraxis.net/190316-...e-creator.html

[himitsu]

Was soll man da denn noch sagen?

Ohne den Schwachsinn mit Try-Except, würde er bestimmt eine richtige Fehlermeldung bekommen, die ihm alle Fehler zeigt.



Selbst wenn die DB das QuoteStr verstehen würde, dann spätestens das im QuoteStr nicht mehr, bzw. die + davor und dahinter auch nicht.

Aber vorher wäre erstmal beim zweiten = gemeckert wurden, wegen der fehlenden Komata.

[rokli]

Moin,

Du könntest das auch so schreiben:

Delphi-Quellcode:

   qry1.SQL.Text   :=   'UPDATE Rechnung SET ' +
               '   MWSteuer = :mw ' +
               '   ,Nachlassumme = :nasum ' +
               '   ,Sicherheitsumme = :ssum ' +
               '   ,Skontosumme = :sksum ' +
               '   ,Nettosumme = :nsum ' +
               '   ,Bruttogesamt = :bsum ' +
               'WHERE ' +
               '   Rechnr = :ed_rechngd_rechnr ';

und dann kommt das füllen der Parameter.

Das fehlende Komma ist natürlich das erste Problem, mehrere Felder mit SET ändern bedarf einem Komma vor jedem Feld bzw. nach jedem Inhalt.
Und dann kannst Du die Rechnr natürlich auch per Parameter übergeben.

[jmich]

Als erstes mal vielen Dank.

Die Lösung beim Betrag von Haentschman hatte ich schon auch
probiert, aber funhtionierte eben nicht.
Das mit den fehlenden Kommas hatte ich auch schon erkannt.
Das mit der Fehlerexcept wurde mir von einen im Forum als Lösung unterbreitet.

Die Lösung von rokli war für mich die beste und diese klappt auch super.
Sie ist sehr übersichtlich.
Nochmals vielen Dank besonders an rokli, der auch nett die Lösung rübergebtacht hat.

Jmich

[himitsu]

Try-Except macht nur Sinn, wenn man darin auch was Sinnvolles macht.

z.B. den originalen Fehler in ein Log schreiben,
oder ihn an die neue Fehlermeldung mit anzuhängen.

Oder eben, wenn man genau weiß welcher Fehler es ist und man ihn gezielt unterdrücken will, um es z.B. nochmal anders zu versuchen, oder Dergleichen.

[Sharky]

Zitat von himitsu:

Was soll man da denn noch sagen?

Ohne den Schwachsinn mit Try-Except,..

Schön zu sehen, dass sich Deine Arroganz auch nach mehreren Jahren nicht gelegt hat.
Persönliche Entwicklung im Fachgebiet -> Stetig steigend
Persönliche Entwicklung im Umgang mit Menschen -> Stetig fallend

[hoika]

Hallo,
sehe ich nicht so!

Es ist halt ein Problem, dass hier ankommen,
und die einfachsten Sachen ignorieren.

wenn ich try except benutzen, dann doch bitte richtig.

[Jasocul]

Fahrt mal ein bischen runter, Leute.

Als ich die Eingangsfrage gelesen hatte, dachte ich auch, dass da wesentliche Grundlagen nicht beachtet werden. OK, gedacht habe ich da was anderes, aber formulieren kann man es ja netter.
Dann habe ich genauer hingesehen:
- TE seit 2007 hier mit 15 Beiträgen
- D5
- Simple SQL-Fehler (und andere Grundlagenfehler)
Folglich wenig/keine Erfahrung, Gelegenheitsprogrammierer, o.ä.

Das kann man einfach mal berücksichtigen, wenn man antwortet und muss nicht mit dem Hammer drauf hauen. Auch wenn man diese Sachen ständig wiederholen muss. Der harte Kern der DP liest hier sicher täglich mit, aber die meisten kommen nur hierher, wenn sie ein Problem haben und wissen nicht, was man hier regelmäßig wiederholen muss.

Also nächstes mal einfach erstmal entspannt zurücklehnen und überlegen, was und wie man antwortet. Oder man hält einfach mal die Finger still. Auf die Grundlagen werden auch andere hinweisen.

[rokli]

Hi zusammen,

hat eigentlich jemand mal zum TRY - EXCEPT Block was inhaltlich gesagt?

Also ich mache das so

Delphi-Quellcode:

   try
      qry2.Open;
   except
      on E: Exception do begin
         ShowMessage(e.Message);
         ShowMessage(qry2.SQL.Text);
      end;
   end;

Das ist eine ganze einfach Variante, um überhaupt was zu sehen.

Wenn im SQL ein Fehler enthalten ist, wird durch den EXECPT das Programm in die Fehlerbehandlung geschickt. Durch den ersten SHOWMESSAGE die Fehlermeldung ansich gezeigt und der zweit SHOWMESSAGE zeigt mir den Inhalt der defekten SQL, damit ich mit der Fehleranalyse beginnen kann.

Und im wirklich Leben übergebe ich diese Daten an eine Prozedur, die mir diese Fehlermeldung (mit Programmnamen, Username, wann das gewesen ist, etc.) wiederum in eine DB schreibt. Da sollte dann natürlich kein Fehler drin passieren

Vielleich ist das ja noch eine kleine Anregung aus der geworfenen Fehlermeldung Nutzen zu ziehen ...

Beste Grüße

@Sinspin: Sorry - Du hattest das auch schon gezeigt! (Nachtrag)

[BerndS]

Da wurde schon drauf eingegangen.
Ich persönlich würde aber diese Variante bevorzugen und nur die Message ergänzen und die Anzeige der Exception der App überlassen oder zumindest nur einmal Showmessage aufrufen.

Delphi-Quellcode:

   try
     qry2.Open;
   except
      on E: Exception do 
      begin
        E.Message := E.Message + #13 + qry2.SQL.Text;
        raise;
      end;
   end;