From bf8079082cb5a9bf306817c898bdcdbe3a20b69c Mon Sep 17 00:00:00 2001
From: Paul Reeves <preeves@ibphoenix.com>
Date: Thu, 26 Jan 2023 16:13:50 +0100
Subject: [PATCH] Add some test code

---
 test/testudrkit-testdata.dml | 11 +++++++++++
 test/testudrkit-tests.dml    | 14 ++++++++++++++
 2 files changed, 25 insertions(+)
 create mode 100644 test/testudrkit-testdata.dml
 create mode 100644 test/testudrkit-tests.dml

diff --git a/test/testudrkit-testdata.dml b/test/testudrkit-testdata.dml
new file mode 100644
index 0000000..b606c14
--- /dev/null
+++ b/test/testudrkit-testdata.dml
@@ -0,0 +1,11 @@
+
+insert into test_div(numerator, denominator) values (100, 5);
+insert into test_div(numerator, denominator) values (10000000, 3);
+insert into test_div(numerator, denominator) values (987654321000, 7);
+commit;
+
+set bail off;
+insert into test_div(numerator, denominator) values (9876543210000000000, 7);
+set bail on;
+
+commit;
diff --git a/test/testudrkit-tests.dml b/test/testudrkit-tests.dml
new file mode 100644
index 0000000..04b8f55
--- /dev/null
+++ b/test/testudrkit-tests.dml
@@ -0,0 +1,14 @@
+
+set stats on;
+set bail off;
+select * from test_div;
+
+
+set stats off;
+set bail on;
+
+select FLAGGED (190, 0) from rdb$database;
+
+select FLAGGED (191, 0) from rdb$database;
+
+commit;