paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-23 19:49:46 +02:00
Code Issues Packages Projects Releases Wiki Activity

fcl-db: sqldb: Upgrade TDS protocol version from 7.0 (MS SQL Server 2000) to newer 7.3 (MS SQL Server 2008) to support new data types DATE, TIME, DATETIME2 introduced in MS SQL Server 2008.

Browse Source 
git-svn-id: trunk@42737 -
This commit is contained in:
lacak 2019-08-19 11:52:28 +00:00
parent 722e33ce65
commit 1da7ba5d70
1 changed files with 1 additions and 1 deletions

2
packages/fcl-db/src/sqldb/mssql/mssqlconn.pp
View File

@ -410,7 +410,7 @@ end;
procedure TMSSQLConnection.DoInternalConnect;
const
DBVERSION: array[boolean] of BYTE = (DBVER60, DBVERSION_100);
DBVERSION: array[boolean] of BYTE = (DBVERSION_73, DBVERSION_100);
IMPLICIT_TRANSACTIONS_OFF: array[boolean] of shortstring = ('SET IMPLICIT_TRANSACTIONS OFF', 'SET CHAINED OFF');
ANSI_DEFAULTS_ON: array[boolean] of shortstring = ('SET ANSI_DEFAULTS ON', 'SET QUOTED_IDENTIFIER ON');
CURSOR_CLOSE_ON_COMMIT_OFF: array[boolean] of shortstring = ('SET CURSOR_CLOSE_ON_COMMIT OFF', 'SET CLOSE ON ENDTRAN OFF');