From 7f93de8697b4cdc43ff2ddf4192bad8bd9117ccd Mon Sep 17 00:00:00 2001 From: reiniero Date: Fri, 7 Mar 2014 09:30:54 +0000 Subject: [PATCH] fcl-db: dbtestframework * refine r26950: only use SET ANSI_NULL_DFLT_ON ON for MS SQL Server; Sybase ASE does not support it. git-svn-id: trunk@27019 - --- packages/fcl-db/tests/sqldbtoolsunit.pas | 11 +++++++---- 1 file changed, 7 insertions(+), 4 deletions(-) diff --git a/packages/fcl-db/tests/sqldbtoolsunit.pas b/packages/fcl-db/tests/sqldbtoolsunit.pas index 329c730184..73c3e71396 100644 --- a/packages/fcl-db/tests/sqldbtoolsunit.pas +++ b/packages/fcl-db/tests/sqldbtoolsunit.pas @@ -235,10 +235,13 @@ begin TempTrans.StartTransaction; // Proper blob support: FConnection.ExecuteDirect('SET TEXTSIZE 2147483647'); - // When running CREATE TABLE statements, allow NULLs by default - without - // having to specify NULL all the time: - // http://msdn.microsoft.com/en-us/library/ms174979.aspx - FConnection.ExecuteDirect('SET ANSI_NULL_DFLT_ON ON'); + if SQLServerType=ssMSSQL then + begin + // When running CREATE TABLE statements, allow NULLs by default - without + // having to specify NULL all the time: + // http://msdn.microsoft.com/en-us/library/ms174979.aspx + FConnection.ExecuteDirect('SET ANSI_NULL_DFLT_ON ON'); + end; TempTrans.Commit; TempTrans.Free; FConnection.Transaction:=nil;