From: Jess Robinson <castaway@desert-island.me.uk>
Date: Wed, 24 May 2006 22:01:21 +0000 (+0000)
Subject: DB2 producer tests
X-Git-Tag: v0.11008~435
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0209d0a0416c974eb1f49679daab0e8884f86b99;p=dbsrgits%2FSQL-Translator.git

DB2 producer tests
---

diff --git a/t/43xml-to-db2.t b/t/43xml-to-db2.t
new file mode 100644
index 0000000..c4bff92
--- /dev/null
+++ b/t/43xml-to-db2.t
@@ -0,0 +1,57 @@
+#!/usr/bin/perl
+use strict;
+
+use FindBin qw/$Bin/;
+use Test::More;
+use Test::SQL::Translator;
+use Test::Exception;
+use Data::Dumper;
+use SQL::Translator;
+use SQL::Translator::Schema::Constants;
+
+
+BEGIN {
+    maybe_plan(1, 'SQL::Translator::Parser::XML::SQLFairy',
+              'SQL::Translator::Producer::DB2');
+}
+
+my $xmlfile = "$Bin/data/xml/schema.xml";
+
+my $sqlt;
+$sqlt = SQL::Translator->new(
+    no_comments => 1,
+    show_warnings  => 1,
+    add_drop_table => 1,
+);
+
+die "Can't find test schema $xmlfile" unless -e $xmlfile;
+
+my $sql = $sqlt->translate(
+    from     => 'XML-SQLFairy',
+    to       => 'DB2',
+    filename => $xmlfile,
+) or die $sqlt->error;
+
+is($sql, << "SQL");
+DROP TABLE Basic;
+
+
+CREATE TABLE Basic                                                                                                                       (
+id                        INTEGER GENERATED BY DEFAULT AS IDENTITY NOT NULL,
+title                     VARCHAR(100) NOT NULL DEFAULT 'hello',
+description               VARCHAR(0) DEFAULT '',
+email                     VARCHAR(255),
+explicitnulldef           VARCHAR(0),
+explicitemptystring       VARCHAR(0) DEFAULT '',
+emptytagdef               VARCHAR(0) DEFAULT '',
+CONSTRAINT emailuniqueindex UNIQUE (email)   ,
+ PRIMARY KEY(id)
+);
+
+CREATE INDEX titleindex ON Basic ( title );
+
+CREATE VIEW email_list AS
+SELECT email FROM Basic WHERE email IS NOT NULL;
+
+CREATE TRIGGER foo_trigger after insert ON Basic REFERENCING OLD AS oldrow NEW AS newrow FOR EACH ROW MODE DB2SQL update modified=timestamp();
+SQL