Entwickler-Ecke
Datenbanken - Querys filtern die 2.
sims1122 - Mi 01.09.10 10:31
Titel: Querys filtern die 2.
Moin,
leider habe ich mein anderes Thema frühzeitig geschlossen. Es geht wieder darum, eine Ausgabe zu filtern:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
| PROCEDURE TVNForm.FormShow(Sender: TObject);
BEGIN
WITH QueryMaterialstamm DO
BEGIN
Close();
PARAMbyname('IdentNr').AsInteger := iIdentNummer;
Open();
END;
IF bIssues THEN
DataSourceVerwendung.DataSet := QueryVerwendungIssue
ELSE
DataSourceVerwendung.DataSet := QueryVerwendungVariante;
WITH (DataSourceVerwendung.DataSet AS TQuery) DO
BEGIN
Close();
PARAMbyname('IdentNr').AsString := IntToStr(iIdentNummer);
Open();
END;
END; |
Dabei ist die Variable iIdentnummer übergeben worden, die Variable bIssue belegt mit "Alle Issues anzeigen" = True oder "nur Varianten anzeigen" = False.
Ich möchte aber, dass nachher nur diejenigen datensätze ausgegeben werden, deren Eigenschaft "GUELTIG" = 1 ist.
Reicht der Input hier, um die Fragen zu beantworten?
Schönen Grüß und Danke
Max
Nersgatt - Mi 01.09.10 11:11
Du sollstest das GUELTIG vermutlich am besten direkt im zugrundeliegenden SQL-Statement abfragen, damit der Server Dir nur die Datensätze liefert, die Du auch brauchst. Dann brauchst Du auf der Clientseite nicht mehr zu filtern.
sims1122 - Mi 01.09.10 11:32
Hm, gibt es keine Möglichkeit, das noch anderweitig zu lösen? Wie gesagt, das Programm ist riesig, nicht kommentiert und über Jahre gewachsen, ich will vermeiden so tief einzudringen, da du nie richtig weißt, ob dieses Statement nicht vielleicht noch anderswo gebraucht wird.
Nersgatt - Mi 01.09.10 11:51
Das ist aber die einzige Möglichkeit, eine saubere Lösung zu bekommen. Manchmal muss man alte Bauten einreißen, um sie neu zu bauen. Das ist besser, als auf ein wackeligs Haus noch ein Stockwerk draufzusetzen.
Wenn Du jetzt weiter an dem Programm rumfummelst, ohne die eigentlichen Probleme zu lösen, immer in der Angst etwas kaputt zu machen, wirst Du kurzfristig Erfolg haben. Aber langfristig werden Deine Probleme immer größer. Und dann macht es irgendwann keinen Spaß mehr.
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!