Unterschiedliche Datensätze selektieren

[HPB]

Zitat von himitsu:

WHERE Key IN (1, 3, 4, 6, 7, 118) oder denke ich da jetzt zu falsch?

Wie entscheidest du eigentlich was gedruckt werden soll, also wo kommen die Keys her?

Danke an Euch beiden.
Den Vorschlag von Sir Rufo werde ich noch testen.

Zu himutsu:
Ich stelle die Daten in einem VirtualStringTree mit einer CheckBox dar.
Nun kann ich jeden zu druckenden DS aktivieren (CheckBox = Checked)
Im Node des VirtualStringTree ist der PrimaryKey der Tabelle mit hinterlegt.
Dein Vorschlag mit WHERE Key IN (1, 3, 4, 6, 7, 118) sieht doch sehr viel versprechend aus. Muss ich aber noch prüfen.
Vielen Dank nochmals
HPB

[himitsu]

Selektierte Items durchgehen und die IDs mit Komma in einem String zusammenhängen.
Alternativ die IDs in eine Liste/Array und dann eine Funktions, welche die Einträge (Integer/String) mit Kommas zu einem Strig verbindet.
z.B. eine TStringList -> Add(IntToStr(Key)) > CommaText

Query.SQL := '... WHERE Key IN (' + KommaListe + ')'
oder

Delphi-Quellcode:

Query.SQL := '... WHERE Key IN (&KommaListe)';
Query.MacroByName('KommaListe').Value := KommaListe;

[HPB]

Zitat von himitsu:

Selektierte Items durchgehen und die IDs mit Komma in einem String zusammenhängen.
Alternativ die IDs in eine Liste/Array und dann eine Funktions, welche die Einträge (Integer/String) mit Kommas zu einem Strig verbindet.
z.B. eine TStringList -> Add(IntToStr(Key)) > CommaText

Query.SQL := '... WHERE Key IN (' + KommaListe + ')'
oder

Delphi-Quellcode:

Query.SQL := '... WHERE Key IN (&KommaListe)';
Query.MacroByName('KommaListe').Value := KommaListe;

Danke himitsu,
ich habe es gerade mal ausprobiert.
Mit dem SQL-Befehl:

Delphi-Quellcode:

select * from ksopreise
where ksoid IN (323933, 94970, 504926)

bekomme ich das korrekte Ergebnis.
Es ist gelöst!

Gruß
HPB

[Sir Rufo]

Diese Lösung hat natürlich so sein Geschmäcke, da man hier ein Statement zusammenbaut. Änderungen an der Datenbank ziehen plötzlich an zig verschiedenen Stellen (einmal eingeführt wird das an zig Stellen so benutzt) Änderungen mit sich.

Man tut sich keinen Gefallen damit, auch wenn es jetzt so schön schnell und einfach aussieht.

Gerade beim FastReport kann man mit dem UserDataset doch so schöne Dinge bauen:

• Eine Liste mit den ID-Werten erstellen
• Eine statische Abfrage nach den Werten SELECT f1, f2, f3 FROM foo WHERE id=:id
• Das UserDataset benötigt die Anzahl (von der Liste der IDs) und die Feldnamen (von der Abfrage) und ein paar Events (First, Prior, Next) für das Iterieren sowie das Abfragen der Werte (GetValue).

[himitsu]

Zitat:

Diese Lösung hat natürlich so sein Geschmäcke, da man hier ein Statement zusammenbaut.

Als Lösung würde ich mir auch wünschen, wenn die Zugriffskomponenten/Parameter auch mit Arrays umgehen könnten,
denn Variablen/Parameter innerhalb der DB bekommen sowas ja auch hin.

Delphi-Quellcode:

var meineIDs: TArray<Integer>;  // TIntegerDynArray / array of Integer

Query.SQL := '... WHERE Key IN :meineIDs';
Query.ParamByName('meineIDs').Value := meineIDs;  // eventuell über DynArrayToVariant

[Sir Rufo]

Auch Datenbanken mögen es da gerne typsicher. Da wäre eben der Weg über eine temporäre Tabelle möglich.

Auch wenn ich mich wiederhole, gerade für Reports bietet es sich an, das Beschaffen und Ausgeben der Datensätze zu trennen.

Selektierte Datensätze in ein ClientDataset, die Daten (XML oder Binär) mit der Information was das denn bitteschön ist an den Reporter mit dem/den gewünschten Report/s.

[HPB]

Zitat von Sir Rufo:

Auch Datenbanken mögen es da gerne typsicher. Da wäre eben der Weg über eine temporäre Tabelle möglich.

Auch wenn ich mich wiederhole, gerade für Reports bietet es sich an, ....

Selbstverständlich ist Deine Argumentation nachvollziebar und auch sinnvoll Sir Rufo!
Ich trenne prinzipiell auch die Beschaffung und die Bereitstellung der Daten zur Änderung.
Die Daten für den Report hole ich über eine IBQuery und sie ist auch nur
zur Anzeige der selben gültig. Daten werden damit nicht geändert.
Ich habe einfach nicht gewusst, dass und wie ich den IN-Operator
auch in einer SQL-Anweisung anwenden kann.

Vielen Dank für Deine Ausführungen
HPB

[Dejan Vu]

Zitat von Sir Rufo:

Diese Lösung hat natürlich so sein Geschmäcke, da man hier ein Statement zusammenbaut. Änderungen an der Datenbank ziehen plötzlich an zig verschiedenen Stellen (einmal eingeführt wird das an zig Stellen so benutzt) Änderungen mit sich.

Also Records anhand der ID zu lesen ist so mit das unveränderlichste, was ich kenne. "Geschmäckle" hat es imho nur, wenn man den Automatismus ansetzt:"Huch, eine Query wird gebaut! Gefahr! SQL-Injection! Iiiehh!". Dagegen ist zunächst nichts einzuwenden. Zunächst, denn...
... nun ist das aber mindestens in ORM gang und gäbe, und eine IN-Selektion über Integer-Werte über eine selbstgebaute Funktion zu erstellen ist doch gefahrlos möglich. Das geht in jedem Fall schneller, als sich von hinten durch die Brust ins Auge eine extrem unperformante Lösung auszudenken.

Leider wurde beim 'IN' Operator die Parametrierungsmöglichkeit vergessen. Also macht man da eine Ausnahme: Man wird weder geteert noch gefedert und ausgelacht aus nicht.

Zitat:

Eine statische Abfrage nach den Werten SELECT f1, f2, f3 FROM foo WHERE id=:id

Wo ist bei dieser Abfrage der konzeptionelle Unterschied zu einer IN-Abfrage? Ach, der Datentype? Und wenn der Name 'id' verändert wird?

Zitat von Sir Rufo:

Selektierte Datensätze in ein ClientDataset, die Daten (XML oder Binär) mit der Information was das denn bitteschön ist an den Reporter mit dem/den gewünschten Report/s.

Wieso kein TDataset? Verstehe ich nicht. Da mach ich doch wieder Klimmzüge.

Dataset mit Parametrierung des Reports (und dieses eine Mal ein SELECT mit IN zusammengebaut). Fertig. Das ganze an den Report geflanscht und schon kann es losgehen. Das mit dem "XML oder Binär" habe ich nicht verstanden.

@mjustin: Das stimmt, da kommt es auf das RDBMS an. ich glaube, beim SQL-Server gibt es kein Limit. Aber wenn der Benutzer 100000 IDs ausgewählt hat, hat er selbst Schuld... Ich weiß, ein kleiner Button 'SELECT ALL' und -wupps- hat man den Salat.