Selaa lähdekoodia

* Autocommit OFF by default, bug ID #23429

git-svn-id: trunk@23113 -
michael 12 vuotta sitten
vanhempi
commit
b63bd2c749
1 muutettua tiedostoa jossa 1 lisäystä ja 1 poistoa
  1. 1 1
      packages/fcl-db/src/sqldb/odbc/odbcconn.pas

+ 1 - 1
packages/fcl-db/src/sqldb/odbc/odbcconn.pas

@@ -695,7 +695,7 @@ function TODBCConnection.StartDBTransaction(trans: TSQLHandle; AParams:string):
 var AutoCommit: SQLINTEGER;
 begin
   // set some connection attributes
-  if StrToBoolDef(Params.Values['AUTOCOMMIT'], True) then
+  if StrToBoolDef(Params.Values['AUTOCOMMIT'], False) then
     AutoCommit := SQL_AUTOCOMMIT_ON
   else
     AutoCommit := SQL_AUTOCOMMIT_OFF;