Browse Source

* fixed minor issue with r18991.

git-svn-id: trunk@18994 -
marco 14 years ago
parent
commit
ab40391806
1 changed files with 1 additions and 0 deletions
  1. 1 0
      packages/fcl-db/src/sqldb/mysql/mysqlconn.inc

+ 1 - 0
packages/fcl-db/src/sqldb/mysql/mysqlconn.inc

@@ -566,6 +566,7 @@ begin
 {$endif}
     FIELD_TYPE_DECIMAL: 
       begin
+        ADecimals:=AField^.decimals;
         if (ADecimals < 5) and (ASize-2-ADecimals < 15) then //ASize is display size i.e. with sign and decimal point
           NewType := ftBCD
         else