Applied patch sent in by Daniel Westermann-Clark on Oct 11 2006.

[dbsrgits/SQL-Translator.git] / t / 43xml-to-db2.t

diff --git a/t/43xml-to-db2.t b/t/43xml-to-db2.t
index c4bff92..a8afc2f 100644 (file)
--- a/t/43xml-to-db2.t
+++ b/t/43xml-to-db2.t
@@ -35,19 +35,29 @@ my $sql = $sqlt->translate(
 is($sql, << "SQL");
 DROP TABLE Basic;
 
+CREATE TABLE Basic (
+  id INTEGER GENERATED BY DEFAULT AS IDENTITY (START WITH 1, INCREMENT BY 1) 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 '',
+  another_id INTEGER DEFAULT 2,
+  timest TIMESTAMP,
+  PRIMARY KEY (id),
+  CONSTRAINT emailuniqueindex UNIQUE (email)
+);
+
+DROP TABLE Another;
 
-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 TABLE Another (
+  id INTEGER GENERATED BY DEFAULT AS IDENTITY (START WITH 1, INCREMENT BY 1) NOT NULL,
+  PRIMARY KEY (id)
 );
 
+ALTER TABLE Basic ADD FOREIGN KEY (another_id) REFERENCES Another(id);
+
 CREATE INDEX titleindex ON Basic ( title );
 
 CREATE VIEW email_list AS