XE5 liest Oracle-Floats falsch aus

[Sherlock]

Ich habe ein klitzigkleines Problem beim Auslesen von Gleitkommawerten aus der DB mit eine TSQLQuery. Konkret habe ich einen Wert 8,5 in der DB, erhalte aber 85 beim auslesen. Die Query liefert mit das Feld als TFmtBcdField http://docwiki.embarcadero.com/Libra...B.TFMTBCDField, was angeblich eine bessere Genauigkeit hat und für Währungen verwendet wird. Ich will aber lediglich eine z. B. 8,5 im Programm als 8,5, meinetwegen auch als 8.5 bekommen….und nicht als 85!!

:wall:

Sherlock

[sx2008]

Tja, Dezimalfelder sind ein echter Schwachpunkt von Delphi.
Gerade bei Oracle hatte ich damit auch schon öfters Probleme.
Delphi kennt ja den Datentyp Currency; ein Festkommaformat mit dezimalen 4 Nachkommastellen (64 Bit).
Leider gibt es in Delphi keinen Festkommadatentyp mit 128Bit wie z.B. Decimal in C#.

Wenn du auf ein BCD-Feld zugreifst dann solltest du es mit

Delphi-Quellcode:

.AsCurrency

und nicht als

Delphi-Quellcode:

.AsFloat

oder

Delphi-Quellcode:

.Value

auslesen.
Achte auch darauf ob in der Felddefinition in Oracle mehr als 4 Nachkommastellen hinterlegt sind; notfalls auf max 4 Stellen verringern.

[Sherlock]

1. Ich verwende eigentlich die DOA von AllroundAutomations und habe seit über 10 Jahren keine Probleme mit Oracle gehabt. Die hab ich mir halt für XE5 noch nicht gleistet, weil ich noch am evaluieren bin.
2. Diese Grundtypen korrekt auszulesen ist eine Minimalanforderung an DB-Komponenten.
3. Es klappt auch mit .asCurrency nicht...bleibt bei 85
4. Ich bin sowas von verärgert... Aber Hauptsache man kann jetzt in seinen "Business-Apps" Animationen wiedergeben :kotz:

Sherlock

[arnof]

Die haben ein Update vom 3.10 für XE5.

Wenn deren Schnittstelle nicht geht, dann ist das doch das Problem von denen oder sehe ich das Falsch :?:

[baumina]

Ist zwar schon etwas alt, aber vielleicht hilft es dir ja doch weiter. Meine Google-Suche hat folgenden Hinweis aufgetrieben:
http://de.comp.lang.delphi.datenbank...ber-bcd-felder

[Sherlock]

arnof: Ich habe mich wohl missverständlich ausgedrückt. Ich verwende derzeit für XE5 (notgedrungen) dbExpress und nicht AllroundAutomations. Mir ist klar das die eine passende Version haben, von der ich ausgehe, daß sie funktioniert.

baumina: Das hatte ich nicht gefunden, es ist genau mein Problem. Ich behelfe mich aber mittlerweile indem ich die SQL-Abfrage so formuliere, daß die Ergebnisse als wohlformatierte Strings zurückkommen. Sind ja nur drei solche Felder in meinem Demoprojekt.

Wie baumina zeigte ist dieses Problem mindestens 10 Jahre alt. Und nicht gefixt. Noch etwas für MEissing ;)

Sherlock

[MEissing]

Zitat:

Zitat von Sherlock (Beitrag 1234663)

Noch etwas für MEissing ;)

QC Eintrag?

[Union]

Es gibt ca. 60 QC Einträge zum Thema BCD ...

[Sherlock]

Zitat:

Zitat von MEissing (Beitrag 1234668)

Zitat:

Zitat von Sherlock (Beitrag 1234663)

Noch etwas für MEissing ;)

QC Eintrag?

http://qc.embarcadero.com/wc/qcmain.aspx?d=2742
Jetzt sachste eventuell: "Das ist ja geschlossen" Da sag ich: "Jo, aber nicht gefixt, sondern nur geworkaroundet". :D
Und den Workaround muss man auch erstmal suchen. Das ist halt die Sache. Wenn man keine Zeit/Resourcen hat ein Problem zeitnah zu fixen, gibts ein Workaround, bis der Bug behoben ist. Hier hat man aber nach dem Workaround abgebrochen...und 11 Jahre sind IMHO genug Zeit um das zu fixen.

Noch ein kleines Quote aus der QC von John Herbster:

Zitat:

Here is a list of QC reports of FMTBCD problems:
1236 -- Complaint about lack of real decimal fraction numbers.
1389 -- Bug in the RoundAt function. (Closed, fixed)
2721 -- BCD fields retrieved with error (missing decimal point)
2732 -- Formatting problem
2741 -- Am guessing this is problem using TBCD with floating point DB field.
4281 -- Feature request to # fields bind to FmtBCD
6013 -- Divide error (this report)
8251 -- Fields defined like NUBERIC(15,5) are not fetched correctly
9967 -- Error when comparing an FMTBCD variant value with constant value
10275 -- FormatBCD and division operation of TBCD failed in FMTBcd unit.
10582 -- Found an uninitialized variable of method TFMTBcdData.DoDivide in unit FMTBcd.pas

Sherlock

[Sherlock]

Eine Antwort hätte sein können: "OK, schau ich mir demnächst mal an."
Ich hätte auch mit "Muss die Roadshow vorbereiten, melde mich im Dezember wieder" leben können.

Eisiges Schweigen habe ich jedoch auf keinen Fall erwartet. Ich hab ja wirklich nichts garstiges geschrieben. Da war ein Smiley drin, verdammichnocheins...

Da sag noch einer, an der schlechten Kommunikation sind allein die Käufer (bitte dieses Wort im Hinterkopf behalten) Schuld ;)

Sherlock

[Lemmy]

@Sherlock: Nur zur Info: Matthias hat/ist gerade im Urlaub...

Grüße

[Sherlock]

Dann nehme ich alles zurück und freue mich für ihn! Hätte auch gerne Urlaub *seufz*

Sherlock

[MEissing]

Ich nehm's mal unverbindlich mit.....

[arnof]

Hi, da ich mich auch gerade mal wieder mit dem mangelhaften SQLite Treiber auseinandersetze (ist in XE5 noch genauso unbrauchbar, wie in XE3), gebe ich mal folgenden Tipp:

schaut mal, ob die nicht das passende für euch haben:

www.devart.com

Wenn nichts kosten soll und Ihr nur eine falsche Typenzuweisung habt, so mache ich dies an folgender Stelle in Delphi:

ich gehe in die Delphi units db und bei meinem Projekt adodb und ändere knall hart die Typezuweisung. Wenn Ihr ein Beispiele haben wollt, wie das genau geht, so muss auch auf Montag vertrösten, da ich das nur im Büro habe!

[himitsu]

Den Typ SQL-seitig in einen funktionierenden Typ zu casten wäre keine Lösung?

Zitat:

Zitat von arnof (Beitrag 1237146)

ich gehe in die Delphi units db und bei meinem Projekt adodb und ändere knall hart die Typezuweisung.

Ob Andy dafür nicht schon eine Lösung ala VCL-Fix-Pack parat hat?

[Bernhard Geyer]

Zitat:

Zitat von himitsu (Beitrag 1237147)

Ob Andy dafür nicht schon eine Lösung ala VCL-Fix-Pack parat hat?

Solange man keine Runtime-Packages verwendet ist die arnof-Lösung die beste. Hiermit habe ich schon fixes von D200x nach D6 gebracht. Und mit den Hooking der TNTWare-Kompos auch schon XEx-Lösungen ohne Anpassung der RTL in D6 integriert. Ich denke Andys Lösung funktioniert ähnlich so das man das selbst machen könnte.

[Sherlock]

Klar hatte ich kurzfristig per SQL getypegecasted... aber das ist ja auch nur wieder fehleranfälliges non-KISS rumgeeiere. Ich bin schließlich bei FireDAC gelandet. In Enterprise ists ja bei und funktioniert.

Sherlock