From ae6f141df39a2f5fef2e17102bfbd3d5a02801aa Mon Sep 17 00:00:00 2001
From: cxl <cxl@f0d560ea-af0d-0410-9eb7-867de7ffcac7>
Date: Mon, 3 Nov 2014 13:33:55 +0000
Subject: [PATCH] .autotest

git-svn-id: svn://ultimatepp.org/upp/trunk@7857 f0d560ea-af0d-0410-9eb7-867de7ffcac7
---
 autotest/SplitSqlSet/SplitSqlSet.cpp | 48 ++++++++++++++++++++++++++++
 autotest/SplitSqlSet/SplitSqlSet.upp | 10 ++++++
 autotest/SplitSqlSet/init            |  5 +++
 3 files changed, 63 insertions(+)
 create mode 100644 autotest/SplitSqlSet/SplitSqlSet.cpp
 create mode 100644 autotest/SplitSqlSet/SplitSqlSet.upp
 create mode 100644 autotest/SplitSqlSet/init

diff --git a/autotest/SplitSqlSet/SplitSqlSet.cpp b/autotest/SplitSqlSet/SplitSqlSet.cpp
new file mode 100644
index 000000000..31031608d
--- /dev/null
+++ b/autotest/SplitSqlSet/SplitSqlSet.cpp
@@ -0,0 +1,48 @@
+#include <Sql/Sql.h>
+
+using namespace Upp;
+
+CONSOLE_APP_MAIN
+{
+	StdLogSetup(LOG_COUT|LOG_FILE);
+	
+	SqlSet set1;
+	SQLID(TEST)
+	set1 << TEST.As("TEST")
+	    << GetSysTime()
+	    << GetSysDate()
+	    << Time(1970, 1, 1, 0, 0, 0)
+	    << "'Hello', \"friend\"!"
+	    << 123
+	    << 123.23
+	    << (TEST|TEST)
+	    << NextVal(TEST)
+	    << ConvertAscii(TEST|"test")
+	    << TEST * 4
+	    << Select(Greatest(TEST, TEST + 1)).From(TEST).AsValue()
+	    << SqlBinary(String(0, 4))
+	    << TEST * 4
+	    << NextVal(TEST)
+	;
+//	DUMPHEX(~set);
+	Vector<SqlVal> v = SplitSqlSet(set1);
+	SqlSet set2;
+	for(int i = 0; i < v.GetCount(); i++) {
+		LOG(i << " oracle " << SqlCompile(ORACLE, ~v[i]));
+		LOG(i << " MSSQL " << SqlCompile(MSSQL, ~v[i]));
+		DUMPHEX(~v[i]);
+		LOG("----------------------------");
+		set2 << v[i];
+	}
+//	DUMPHEX(~set2);
+	DDUMP(SqlCompile(ORACLE, ~set1));
+	DDUMP(SqlCompile(ORACLE, ~set2));
+
+	DDUMP(SqlCompile(MSSQL, ~set1));
+	DDUMP(SqlCompile(MSSQL, ~set2));
+	
+	ASSERT(SqlCompile(ORACLE, ~set1) == SqlCompile(ORACLE, ~set2));
+	ASSERT(SqlCompile(MSSQL, ~set1) == SqlCompile(MSSQL, ~set2));
+	
+	LOG("=================== OK");
+}
diff --git a/autotest/SplitSqlSet/SplitSqlSet.upp b/autotest/SplitSqlSet/SplitSqlSet.upp
new file mode 100644
index 000000000..e9dee9d28
--- /dev/null
+++ b/autotest/SplitSqlSet/SplitSqlSet.upp
@@ -0,0 +1,10 @@
+uses
+	Core,
+	Sql;
+
+file
+	SplitSqlSet.cpp;
+
+mainconfig
+	"" = "SSE2";
+
diff --git a/autotest/SplitSqlSet/init b/autotest/SplitSqlSet/init
new file mode 100644
index 000000000..f47d352a2
--- /dev/null
+++ b/autotest/SplitSqlSet/init
@@ -0,0 +1,5 @@
+#ifndef _SplitSqlSet_icpp_init_stub
+#define _SplitSqlSet_icpp_init_stub
+#include "Core/init"
+#include "Sql/init"
+#endif