Test case for DB2/400 over ODBC.

diff --git a/t/basicrels/146db2_400.t b/t/basicrels/146db2_400.t
new file mode 100644 (file)
index 0000000..2ac494c
--- /dev/null
+++ b/t/basicrels/146db2_400.t
@@ -0,0 +1,7 @@
+use Test::More;
+use lib qw(t/lib);
+use DBICTest;
+use DBICTest::BasicRels;
+
+require "t/run/146db2_400.tl";
+run_tests(DBICTest->schema);