Berechnetes Feld in TQuery

[HolgerCW]

Hallo zusammen,

wie kann ich z.B. sowas:

Delphi-Quellcode:

if Query['DRUCKGERAETVORHANDEN'] = 1 then
begin
 Query['KEIN_DB'] := 'P';
end
else
begin
 Query['KEIN_DB'] := '';
end;

in eine Select - Abfrage umbauen und in einer TQuery implementieren ?

Gruss

Holger

P.S.: KEIN_DB -> zur Zeit ein berechnetes Feld
DRUCKGERAETVORHANDEN -> Spalte in der Datenbank

[DeddyH]

Ungetestet:

SQL-Code:

SELECT Feld1,(CASE DRUCKGERATVORHANDEN WHEN 1 THEN 'P' ELSE '' END) AS KEIN_DB
FROM Tabelle
WHERE...

[HolgerCW]

Funktioniert,

super ...

Danke ...

Gruss

Holger

[HolgerCW]

Habe da jetzt mal was gebaut, das klappt aber nicht ganz. Er sagt mir fehlender Ausdruck:

Delphi-Quellcode:

(CASE SYSWVKISU.ZEITSCHEIBEN.LEIST WHEN > (SELECT SYSDBP.DBP_KATEGORIE.LEISTUNGSWERT FROM SYSDBP.DBP_KATEGORIE WHERE ID = 1) THEN 'P' ELSE '' END) AS LEI_PRUE

Gruss

Holger

[DeddyH]

Bei Oracle weiß ich es nicht genau, aber das SQL-Case arbeitet AFAIK ähnlich dem Delphi-Case, d.h. Du musst zum Vergleichen Konstanten verwenden. Deshalb geht das so nicht. Ich überlege aber gerade, wie man das umformulieren könnte, ist aber (zumindest für mich) nicht ganz einfach.

[DeddyH]

Versuch mal, ob das so geht:

SQL-Code:

(CASE SIGN(SYSWVKISU.ZEITSCHEIBEN.LEIST  - (SELECT SYSDBP.DBP_KATEGORIE.LEISTUNGSWERT 
FROM SYSDBP.DBP_KATEGORIE WHERE ID = 1)) WHEN 1 THEN 'P' ELSE '' END) AS LEI_PRUE

[HolgerCW]

Hi,

das klappt. Super danke. Aber wie berechneest Du da die 1. Du ziehst die eine Leitung von der anderen ab. Und was macht das SIGN ?

Gruss

Holger

[DeddyH]

SIGN ermittelt das Vorzeichen. Wenn das Ergebnis der Subtraktion positiv ist, kommt eben 1 heraus, d.h. erster Wert ist größer als 2 Wert. :zwinker:

[HolgerCW]

Clever,

kannst Du mir noch verraten, wie Du zwei Spalten multiplizieren würdest um dann das Ergebnis anzuzeigen ?

Gruss

Holger

[mkinzler]

Einfach

SQL-Code:

...<Spalte1> * <Spalte2> as Erg...