Thanks to visit codestin.com
Credit goes to github.com

Skip to content

Commit d6b699b

Browse files
jgebaljgebal
committed
Added tests for new data-types.
Refactored and cleaned up the code. Added unit tests for new code.
1 parent 64868b1 commit d6b699b

87 files changed

Lines changed: 462 additions & 160 deletions

File tree

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

‎source/assertions/ut.pkb‎

Lines changed: 17 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -2,37 +2,47 @@ create or replace package body ut is
22

33
-- function expect(a_actual in boolean) return ut_assertion_bolean is
44
-- begin
5-
-- return ut_assertion_boolean(a_actual);
5+
-- return ut_assertion_boolean(ut_data_value_boolean(a_actual), a_message);
66
-- end;
77

88
function expect(a_actual in number, a_message varchar2 := null) return ut_assertion_number is
99
begin
10-
return ut_assertion_number(a_actual);
10+
return ut_assertion_number(ut_data_value_number(a_actual), a_message);
1111
end;
1212

1313
function expect(a_actual in varchar2, a_message varchar2 := null) return ut_assertion_varchar2 is
1414
begin
15-
return ut_assertion_varchar2(a_actual);
15+
return ut_assertion_varchar2(ut_data_value_varchar2(a_actual), a_message);
1616
end;
1717

1818
function expect(a_actual in clob, a_message varchar2 := null) return ut_assertion_clob is
1919
begin
20-
return ut_assertion_clob(a_actual);
20+
return ut_assertion_clob(ut_data_value_clob(a_actual), a_message);
2121
end;
2222

2323
function expect(a_actual in blob, a_message varchar2 := null) return ut_assertion_blob is
2424
begin
25-
return ut_assertion_blob(a_actual);
25+
return ut_assertion_blob(ut_data_value_blob(a_actual), a_message);
2626
end;
2727

2828
function expect(a_actual in date, a_message varchar2 := null) return ut_assertion_date is
2929
begin
30-
return ut_assertion_date(a_actual);
30+
return ut_assertion_date(ut_data_value_date(a_actual), a_message);
3131
end;
3232

3333
function expect(a_actual in timestamp_unconstrained, a_message varchar2 := null) return ut_assertion_timestamp is
3434
begin
35-
return ut_assertion_timestamp(a_actual);
35+
return ut_assertion_timestamp(ut_data_value_timestamp(a_actual), a_message);
36+
end;
37+
38+
function expect(a_actual in timestamp_ltz_unconstrained, a_message varchar2 := null) return ut_assertion_timestamp_ltz is
39+
begin
40+
return ut_assertion_timestamp_ltz(ut_data_value_timestamp_ltz(a_actual), a_message);
41+
end;
42+
43+
function expect(a_actual in timestamp_tz_unconstrained, a_message varchar2 := null) return ut_assertion_timestamp_tz is
44+
begin
45+
return ut_assertion_timestamp_tz(ut_data_value_timestamp_tz(a_actual), a_message);
3646
end;
3747

3848
-- function expect(a_actual in anydata, a_message varchar2 := null) return ut_assertion_anydata;

‎source/assertions/ut.pks‎

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -16,6 +16,10 @@ create or replace package ut authid current_user as
1616

1717
function expect(a_actual in timestamp_unconstrained, a_message varchar2 := null) return ut_assertion_timestamp;
1818

19+
function expect(a_actual in timestamp_ltz_unconstrained, a_message varchar2 := null) return ut_assertion_timestamp_ltz;
20+
21+
function expect(a_actual in timestamp_tz_unconstrained, a_message varchar2 := null) return ut_assertion_timestamp_tz;
22+
1923
-- function expect(a_message varchar2 := null, a_actual in anydata) return ut_assertion_anydata;
2024
--
2125
-- function expect(a_message varchar2 := null, a_actual in sys_refcursor) return ut_assertion_cursor;

‎source/assertions/ut_assertion.tpb‎

Lines changed: 15 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -43,10 +43,22 @@ create or replace type body ut_assertion as
4343

4444
member procedure to_equal(self in ut_assertion, a_expected timestamp_unconstrained, a_nulls_are_equal boolean := null) is
4545
begin
46-
ut_utils.debug_log('ut_assertion.to_equal(self in ut_assertion, a_expected timestamp_tz_unconstrained, a_nulls_are_equal boolean := null)');
46+
ut_utils.debug_log('ut_assertion.to_equal(self in ut_assertion, a_expected timestamp_unconstrained, a_nulls_are_equal boolean := null)');
4747
self.build_assert_result( false, 'to equal', ut_utils.to_string(a_expected), 'timestamp');
4848
end;
4949

50+
member procedure to_equal(self in ut_assertion, a_expected timestamp_ltz_unconstrained, a_nulls_are_equal boolean := null) is
51+
begin
52+
ut_utils.debug_log('ut_assertion.to_equal(self in ut_assertion, a_expected timestamp_ltz_unconstrained, a_nulls_are_equal boolean := null)');
53+
self.build_assert_result( false, 'to equal', ut_utils.to_string(a_expected), 'timestamp with local time zone');
54+
end;
55+
56+
member procedure to_equal(self in ut_assertion, a_expected timestamp_tz_unconstrained, a_nulls_are_equal boolean := null) is
57+
begin
58+
ut_utils.debug_log('ut_assertion.to_equal(self in ut_assertion, a_expected timestamp_tz_unconstrained, a_nulls_are_equal boolean := null)');
59+
self.build_assert_result( false, 'to equal', ut_utils.to_string(a_expected), 'timestamp with time zone');
60+
end;
61+
5062
member procedure to_(self in ut_assertion, a_expectation ut_expectation) is
5163
l_assert_result ut_assert_result;
5264
begin
@@ -59,6 +71,8 @@ create or replace type body ut_assertion as
5971
when self.actual_data is of (ut_data_value_clob) then a_expectation.run_expectation( treat(self.actual_data as ut_data_value_clob) )
6072
when self.actual_data is of (ut_data_value_date) then a_expectation.run_expectation( treat(self.actual_data as ut_data_value_date) )
6173
when self.actual_data is of (ut_data_value_timestamp) then a_expectation.run_expectation( treat(self.actual_data as ut_data_value_timestamp) )
74+
when self.actual_data is of (ut_data_value_timestamp_tz) then a_expectation.run_expectation( treat(self.actual_data as ut_data_value_timestamp_tz) )
75+
when self.actual_data is of (ut_data_value_timestamp_ltz) then a_expectation.run_expectation( treat(self.actual_data as ut_data_value_timestamp_ltz) )
6276
end;
6377
l_assert_result.message := self.message;
6478
l_assert_result.name := 'to '||l_assert_result.name;

‎source/assertions/ut_assertion.tps‎

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -10,6 +10,8 @@ create or replace type ut_assertion as object
1010
member procedure to_equal(self in ut_assertion, a_expected blob, a_nulls_are_equal boolean := null),
1111
member procedure to_equal(self in ut_assertion, a_expected date, a_nulls_are_equal boolean := null),
1212
member procedure to_equal(self in ut_assertion, a_expected timestamp_unconstrained, a_nulls_are_equal boolean := null),
13+
member procedure to_equal(self in ut_assertion, a_expected timestamp_ltz_unconstrained, a_nulls_are_equal boolean := null),
14+
member procedure to_equal(self in ut_assertion, a_expected timestamp_tz_unconstrained, a_nulls_are_equal boolean := null),
1315
member procedure to_(self in ut_assertion, a_expectation ut_expectation),
1416
final member procedure to_be_null,
1517
final member procedure to_be_not_null

‎source/assertions/ut_assertion_blob.tpb‎

Lines changed: 0 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -1,12 +1,5 @@
11
create or replace type body ut_assertion_blob as
22

3-
constructor function ut_assertion_blob(self in out nocopy ut_assertion_blob, a_actual blob, a_message varchar2 default null) return self as result is
4-
begin
5-
self.message := a_message;
6-
self.actual_data := ut_data_value_blob('blob', ut_utils.boolean_to_int( (a_actual is null) ), ut_utils.to_string(a_actual), a_actual);
7-
return;
8-
end;
9-
103
overriding member procedure to_equal(self in ut_assertion_blob, a_expected blob, a_nulls_are_equal boolean := null) is
114
begin
125
ut_utils.debug_log('ut_assertion_blob.to_equal(self in ut_assertion, a_expected blob)');

‎source/assertions/ut_assertion_blob.tps‎

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,5 @@
11
create or replace type ut_assertion_blob under ut_assertion
22
(
3-
constructor function ut_assertion_blob(self in out nocopy ut_assertion_blob, a_actual blob, a_message varchar2 default null) return self as result,
43
overriding member procedure to_equal(self in ut_assertion_blob, a_expected blob, a_nulls_are_equal boolean := null)
54
)
65
/

‎source/assertions/ut_assertion_clob.tpb‎

Lines changed: 1 addition & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -1,12 +1,5 @@
11
create or replace type body ut_assertion_clob as
22

3-
constructor function ut_assertion_clob(self in out nocopy ut_assertion_clob, a_actual clob, a_message varchar2 default null) return self as result is
4-
begin
5-
self.message := a_message;
6-
self.actual_data := ut_data_value_clob('clob', ut_utils.boolean_to_int( (a_actual is null) ), ut_utils.to_string(a_actual), a_actual);
7-
return;
8-
end;
9-
103
overriding member procedure to_equal(self in ut_assertion_clob, a_expected clob, a_nulls_are_equal boolean := null) is
114
begin
125
ut_utils.debug_log('ut_assertion_clob.to_equal(self in ut_assertion, a_expected clob)');
@@ -28,7 +21,7 @@ create or replace type body ut_assertion_clob as
2821
member procedure to_match(self in ut_assertion_clob, a_pattern in varchar2, a_modifier in varchar2 default null) is
2922
l_modifiers_msg varchar2(100) := case when a_modifier is not null then ' using modifiers '''||a_modifier||'''' end;
3023
begin
31-
self.build_assert_result((regexp_like(treat(self.actual_data as ut_data_value_clob).value, a_pattern, a_modifier)), 'to be matching', ut_utils.to_string(a_pattern)||l_modifiers_msg);
24+
self.build_assert_result((regexp_like(treat(self.actual_data as ut_data_value_clob).value, a_pattern, a_modifier)), 'to match', ut_utils.to_string(a_pattern)||l_modifiers_msg);
3225
end;
3326

3427
end;

‎source/assertions/ut_assertion_clob.tps‎

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,5 @@
11
create or replace type ut_assertion_clob under ut_assertion
22
(
3-
constructor function ut_assertion_clob(self in out nocopy ut_assertion_clob, a_actual clob, a_message varchar2 default null) return self as result,
43
overriding member procedure to_equal(self in ut_assertion_clob, a_expected clob, a_nulls_are_equal boolean := null),
54
member procedure to_be_like(self in ut_assertion_clob, a_mask in varchar2, a_escape_char in varchar2 := null),
65
member procedure to_match(self in ut_assertion_clob, a_pattern in varchar2, a_modifier in varchar2 := null)

‎source/assertions/ut_assertion_date.tpb‎

Lines changed: 0 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -1,12 +1,5 @@
11
create or replace type body ut_assertion_date as
22

3-
constructor function ut_assertion_date(self in out nocopy ut_assertion_date, a_actual date, a_message varchar2 default null) return self as result is
4-
begin
5-
self.message := a_message;
6-
self.actual_data := ut_data_value_date('date', ut_utils.boolean_to_int( (a_actual is null) ), ut_utils.to_string(a_actual), a_actual);
7-
return;
8-
end;
9-
103
overriding member procedure to_equal(self in ut_assertion_date, a_expected date, a_nulls_are_equal boolean := null) is
114
begin
125
ut_utils.debug_log('ut_assertion_date.to_equal(self in ut_assertion, a_expected date, a_nulls_are_equal boolean := null)');

‎source/assertions/ut_assertion_date.tps‎

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,5 @@
11
create or replace type ut_assertion_date under ut_assertion
22
(
3-
constructor function ut_assertion_date(self in out nocopy ut_assertion_date, a_actual date, a_message varchar2 default null) return self as result,
43
overriding member procedure to_equal(self in ut_assertion_date, a_expected date, a_nulls_are_equal boolean := null)
54
)
65
/

0 commit comments

Comments
 (0)