fix/ORA-00907: adding simple testcase

opendba · opendba · commit 5ab8cb9ecf01 · 2019-04-06T18:33:28.000+03:00
diff --git a/test/ut3_user/expectations/test_expectations_cursor.pkb b/test/ut3_user/expectations/test_expectations_cursor.pkb
@@ -82,6 +82,28 @@ create or replace package body test_expectations_cursor is
     ut3.ut.reset_nls;
   end;
 
+  procedure success_on_same_data_with_float
+  as
+    l_expected sys_refcursor;
+    l_actual   sys_refcursor;
+  begin
+    -- Arrange
+    ut3.ut.set_nls;
+    open l_expected for
+      select cast(3.14 as binary_double) as pi_double,
+             cast(3.14 as binary_float) as pi_float
+      from dual;
+    open l_actual for
+      select cast(3.14 as binary_double) as pi_double,
+             cast(3.14 as binary_float) as pi_float
+      from dual;
+    --Act
+    ut3.ut.expect( l_actual ).to_equal( l_expected );
+    --Assert
+    ut.expect(expectations.failed_expectations_data()).to_be_empty();
+    ut3.ut.reset_nls;
+  end;
+
   procedure success_on_empty
   as
     l_expected sys_refcursor;
diff --git a/test/ut3_user/expectations/test_expectations_cursor.pks b/test/ut3_user/expectations/test_expectations_cursor.pks
@@ -17,6 +17,9 @@ create or replace package test_expectations_cursor is
   --%test(Gives success for identical data)
   procedure success_on_same_data;
 
+  --%test(Gives success for identical data with floats)
+  procedure success_on_same_data_with_float;
+
   --%test(Gives success when both cursors are empty)
   procedure success_on_empty;
 
