AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken Query wird nicht vom Programm ausgeführt
Thema durchsuchen
Ansicht
Themen-Optionen

Query wird nicht vom Programm ausgeführt

Ein Thema von Ykcim · begonnen am 12. Mär 2013 · letzter Beitrag vom 13. Mär 2013
Antwort Antwort
Seite 1 von 2  1 2      
Ykcim

Registriert seit: 29. Dez 2006
Ort: NRW
831 Beiträge
 
Delphi 10.4 Sydney
 
#1

Query wird nicht vom Programm ausgeführt

  Alt 12. Mär 2013, 15:40
Datenbank: MySQL • Version: 5 • Zugriff über: UniDac
Hallo Zusammen,

ich bin gerade etwas verwirrt, weil ich das Verhalten meines Programms nicht nachvollziehen kann. Ich hoffe, dass Ihr mir sagen könnt, was da schief geht.

Ich baue in einer Procedure eine Query zusammen, die ich dann ausführe.
Delphi-Quellcode:
Query.SQL.Clear;
            Query.SQL.Add('select * from prozess_position '+
                          ' where status<>100 and (Eckpunkt_ID='+Link[0]); //Link ist ein Array
            for J:=1 to Length(Link) -1 do begin //Für jede Abhängigkeit die Where Bedingung
               WhereQuery:=WhereQuery+' or Eckpunkt_ID='+Link[J] ;
            end;
            WhereQuery:=WhereQuery+')';
            Query.SQL.Add(WhereQuery);
            Query.Open;
Das hat auch wunderbar geklappt, bis ich drei Bedingungen hinzugefügt habe.

and Positionen_ID='+Rows1[1,I] and rueckm=1 and relevant=1

Das Ganze sieht dann so aus:
Delphi-Quellcode:
Query.SQL.Clear;
            Query.SQL.Add('select * from prozess_position '+
                          ' where status<>100 and (Eckpunkt_ID='+Link[0]);
            for J:=1 to Length(Link) -1 do begin //Für jede Abhängigkeit die Where Bedingung
               WhereQuery:=WhereQuery+' or Eckpunkt_ID='+Link[J] ;
            end;
            WhereQuery:=WhereQuery+') and Positionen_ID='+Rows1[1,I]+
                                   ' and rueckm=1 and relevant=1';
            Query.SQL.Add(WhereQuery);
            Query.Open;
Das Problem ist, dass mein Programm einfach garnichts mehr macht - keine Fehlermeldung, keine Reaktion und die Uhr bleibt stehen.
Wenn ich dann den SQL-Text bei Query.open; abfange und die Anweisung auf dem MySQL-Server direkt ausführe, bekomme ich das Ergebnis in 0,001 Sek.

Delphi-Quellcode:
select * from prozess_position where status<>100
and Positionen_ID=313
and rueckm=1
and relevant=1
and (Eckpunkt_ID=8 or Eckpunkt_ID=9 or Eckpunkt_ID=12)
Hat irgendjemand eine Idee, warum mein Programm mit dem SQL-Statement nicht klarkommt, obwohl der MySQL-Server so gar keine Probleme damit hat?

Viele Dank
Patrick
Patrick

Geändert von Ykcim (12. Mär 2013 um 16:36 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.625 Beiträge
 
Delphi 12 Athens
 
#2

AW: Query wird nicht vom Programm ausgeführt

  Alt 12. Mär 2013, 15:55
Hast Du Dir das SQL einmal ausgeben lassen? Vielleicht steht da ja etwas anderes drin, als Du erwartest.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Jumpy

Registriert seit: 9. Dez 2010
Ort: Mönchengladbach
1.737 Beiträge
 
Delphi 6 Enterprise
 
#3

AW: Query wird nicht vom Programm ausgeführt

  Alt 12. Mär 2013, 16:30
Du hast in deinem Code auch <>100 und in dem direkten Beispiel =100. Liegt es vllt. daran.

Du könntest auch diese Geschichte mit der WhereQuery-Variablen weglassen und einfach auch in der Schleife nur Query.SQL.Add benutzen...
Ralph
  Mit Zitat antworten Zitat
Ykcim

Registriert seit: 29. Dez 2006
Ort: NRW
831 Beiträge
 
Delphi 10.4 Sydney
 
#4

AW: Query wird nicht vom Programm ausgeführt

  Alt 12. Mär 2013, 16:36
Hallo Zusammen,

@DeddyH
Ja, ich habe mir das SQL-Statement ausgeben lassen, indem ich einen Haltepunkt bei "Query.Open;" gesetzt habe und das SQL-Statement abgefragt habe. Wenn ich dieses kopiere und auf dem MySQL-Server ausführe, dann bekomme ich das Ergebnis in 0,001sek.

@Jumpy
Ich arbeite gerade mit zwei Rechnern - der, auf dem ich programmiere hat kein Internet. Ich habe nur einen Schreibfehler beim erstellen des Themas gamacht, denn es muss <>100 heißen. Da ich das Statement aus der Query kopiert habe, ist dieser Fehler nicht vorhanden und somit auch leider nicht die Ursache...

Komisch ist, dass er sich nur verschluckt, wenn ich diese 3 Bedingungen hinzufüge. Wenn ich sie wieder entferne, dann läuft es blitzschnell. An unterschiedliche Positionen im String zu setzen hat auch keinen Erfolg gebracht...

Ich weiß gerade nicht so richtig weiter, weil ich dasnicht nachvollziehen kann...

Gruß
Patrick
Patrick
  Mit Zitat antworten Zitat
Furtbichler
(Gast)

n/a Beiträge
 
#5

AW: Query wird nicht vom Programm ausgeführt

  Alt 12. Mär 2013, 18:01
Was passiert denn, wenn Du einen Breakpoint auf das '.open' setzt und dann beim Debuggen diese eine Zeile ausführst?
  Mit Zitat antworten Zitat
Ykcim

Registriert seit: 29. Dez 2006
Ort: NRW
831 Beiträge
 
Delphi 10.4 Sydney
 
#6

AW: Query wird nicht vom Programm ausgeführt

  Alt 12. Mär 2013, 18:59
Genau das habe ich ja gemacht, um das Query-Statement auszulesen. Mein Programm hängt sich auf. Ich habe keine Ahnung warum. Ich werde nachher mal gucken, ob es an allen 3 Bedingungen liegt, oder ob ich vielleicht die eine Bedingung herausfinde an der es liegt.

Komisch ist nur, dass der MySQL Server mit der Anweisung kein Problem hat, wenn ich einen Breakpoint auf open lege, das Statement herauskopiere und auf dem MySQL-Server direkt ausführe.

Kann das an den Komponenten liegen? Ich dachte nur, das die UniDac gut sind... Und bis jetzt hatte ich auch noch keine Probleme mit Ihnen...

Danke für die Unterstützung
Patrick

Ich habe es mal eben geprüft:

Das Problem passiert durch die Bedingung " and Rueckm=1". Aber wie gesagt, direkt auf dem Server habe ich keine Probleme...
Patrick

Geändert von Ykcim (12. Mär 2013 um 19:07 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von p80286
p80286

Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
 
FreePascal / Lazarus
 
#7

AW: Query wird nicht vom Programm ausgeführt

  Alt 12. Mär 2013, 19:54
Wieviele Datensätze kommen denn zurück 5,50,500 oder ???

Gruß
K-H
Programme gehorchen nicht Deinen Absichten sondern Deinen Anweisungen
R.E.D retired error detector
  Mit Zitat antworten Zitat
Ykcim

Registriert seit: 29. Dez 2006
Ort: NRW
831 Beiträge
 
Delphi 10.4 Sydney
 
#8

AW: Query wird nicht vom Programm ausgeführt

  Alt 12. Mär 2013, 21:34
In dieser Abfrage geht es darum, dass wenn ein Datensatz zurückkommt, dass dann die nachfolgende Procedure übersprungen wird. Große Datenmengen sind also nicht das Problem. In dem aktuellen Beispiel wird auch kein Datensatz zurückgeliefert, so wie es auch sein muss...
Patrick
  Mit Zitat antworten Zitat
Benutzerbild von Memo
Memo

Registriert seit: 19. Aug 2003
509 Beiträge
 
Delphi 7 Enterprise
 
#9

AW: Query wird nicht vom Programm ausgeführt

  Alt 13. Mär 2013, 08:33
Bei den UniDAC sollte es einen DBMonitor geben. Damit kann man sehen welchen Befehl der SQL-Server wirklich empfangen hat, also nach dem die Anfrage durch die Komponenten bearbeitet wurde.

Die Query die Du da eingestellt hast, passt an einigen Stellen nicht zu Deinem Quellcode.
  Mit Zitat antworten Zitat
handson

Registriert seit: 18. Jan 2007
Ort: Delmenhorst
113 Beiträge
 
Delphi 2007 Professional
 
#10

AW: Query wird nicht vom Programm ausgeführt

  Alt 13. Mär 2013, 11:51
Vielleicht liegt das auch den ganzen ORs, die du benutzt. Zumindest bremst man damit die Abfrage auf dem Server aus. Versuch doch mal UNION:

Code:
(select * from prozess_position where status<>100
and Positionen_ID=313
and rueckm=1
and relevant=1
and Eckpunkt_ID=8)
union
(select * from prozess_position where status<>100
and Positionen_ID=313
and rueckm=1
and relevant=1
and Eckpunkt_ID=9)
union
(select * from prozess_position where status<>100
and Positionen_ID=313
and rueckm=1
and relevant=1
and Eckpunkt_ID=12)
probier es doch damit mal aus, vielleicht klappt das ja besser...

Stephan
Stephan Faust
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2      


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 03:46 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz