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

Skip to content

Commit 68e0f2e

Browse files
jgebaljgebal
committed
Added boolean assertion for equality.
1 parent d6b699b commit 68e0f2e

33 files changed

Lines changed: 323 additions & 136 deletions

File tree

‎source/assertions/ut.pkb‎

Lines changed: 13 additions & 13 deletions
Original file line numberDiff line numberDiff line change
@@ -1,33 +1,28 @@
11
create or replace package body ut is
22

3-
-- function expect(a_actual in boolean) return ut_assertion_bolean is
4-
-- begin
5-
-- return ut_assertion_boolean(ut_data_value_boolean(a_actual), a_message);
6-
-- end;
7-
8-
function expect(a_actual in number, a_message varchar2 := null) return ut_assertion_number is
3+
function expect(a_actual in blob, a_message varchar2 := null) return ut_assertion_blob is
94
begin
10-
return ut_assertion_number(ut_data_value_number(a_actual), a_message);
5+
return ut_assertion_blob(ut_data_value_blob(a_actual), a_message);
116
end;
127

13-
function expect(a_actual in varchar2, a_message varchar2 := null) return ut_assertion_varchar2 is
8+
function expect(a_actual in boolean, a_message varchar2 := null) return ut_assertion_boolean is
149
begin
15-
return ut_assertion_varchar2(ut_data_value_varchar2(a_actual), a_message);
10+
return ut_assertion_boolean(ut_data_value_boolean(a_actual), a_message);
1611
end;
1712

1813
function expect(a_actual in clob, a_message varchar2 := null) return ut_assertion_clob is
1914
begin
2015
return ut_assertion_clob(ut_data_value_clob(a_actual), a_message);
2116
end;
2217

23-
function expect(a_actual in blob, a_message varchar2 := null) return ut_assertion_blob is
18+
function expect(a_actual in date, a_message varchar2 := null) return ut_assertion_date is
2419
begin
25-
return ut_assertion_blob(ut_data_value_blob(a_actual), a_message);
20+
return ut_assertion_date(ut_data_value_date(a_actual), a_message);
2621
end;
2722

28-
function expect(a_actual in date, a_message varchar2 := null) return ut_assertion_date is
23+
function expect(a_actual in number, a_message varchar2 := null) return ut_assertion_number is
2924
begin
30-
return ut_assertion_date(ut_data_value_date(a_actual), a_message);
25+
return ut_assertion_number(ut_data_value_number(a_actual), a_message);
3126
end;
3227

3328
function expect(a_actual in timestamp_unconstrained, a_message varchar2 := null) return ut_assertion_timestamp is
@@ -45,6 +40,11 @@ create or replace package body ut is
4540
return ut_assertion_timestamp_tz(ut_data_value_timestamp_tz(a_actual), a_message);
4641
end;
4742

43+
function expect(a_actual in varchar2, a_message varchar2 := null) return ut_assertion_varchar2 is
44+
begin
45+
return ut_assertion_varchar2(ut_data_value_varchar2(a_actual), a_message);
46+
end;
47+
4848
-- function expect(a_actual in anydata, a_message varchar2 := null) return ut_assertion_anydata;
4949
--
5050
-- function expect(a_actual in sys_refcursor, a_message varchar2 := null) return ut_assertion_cursor;

‎source/assertions/ut.pks‎

Lines changed: 6 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -1,25 +1,23 @@
11
create or replace package ut authid current_user as
22

3-
-- function expect(a_message varchar2 := null, a_actual in boolean) return ut_assertion_bolean;
4-
5-
6-
function expect(a_actual in number, a_message varchar2 := null) return ut_assertion_number;
3+
function expect(a_actual in blob, a_message varchar2 := null) return ut_assertion_blob;
74

8-
function expect(a_actual in varchar2, a_message varchar2 := null) return ut_assertion_varchar2;
5+
function expect(a_actual in boolean, a_message varchar2 := null) return ut_assertion_boolean;
96

107
function expect(a_actual in clob, a_message varchar2 := null) return ut_assertion_clob;
118

12-
function expect(a_actual in blob, a_message varchar2 := null) return ut_assertion_blob;
13-
14-
159
function expect(a_actual in date, a_message varchar2 := null) return ut_assertion_date;
1610

11+
function expect(a_actual in number, a_message varchar2 := null) return ut_assertion_number;
12+
1713
function expect(a_actual in timestamp_unconstrained, a_message varchar2 := null) return ut_assertion_timestamp;
1814

1915
function expect(a_actual in timestamp_ltz_unconstrained, a_message varchar2 := null) return ut_assertion_timestamp_ltz;
2016

2117
function expect(a_actual in timestamp_tz_unconstrained, a_message varchar2 := null) return ut_assertion_timestamp_tz;
2218

19+
function expect(a_actual in varchar2, a_message varchar2 := null) return ut_assertion_varchar2;
20+
2321
-- function expect(a_message varchar2 := null, a_actual in anydata) return ut_assertion_anydata;
2422
--
2523
-- function expect(a_message varchar2 := null, a_actual in sys_refcursor) return ut_assertion_cursor;

‎source/assertions/ut_assertion.tpb‎

Lines changed: 21 additions & 14 deletions
Original file line numberDiff line numberDiff line change
@@ -11,16 +11,16 @@ create or replace type body ut_assertion as
1111
);
1212
end;
1313

14-
member procedure to_equal(self in ut_assertion, a_expected varchar2, a_nulls_are_equal boolean := null) is
14+
member procedure to_equal(self in ut_assertion, a_expected blob, a_nulls_are_equal boolean := null) is
1515
begin
16-
ut_utils.debug_log('ut_assertion.to_equal(self in ut_assertion, a_expected varchar2, a_nulls_are_equal boolean := null)');
17-
self.build_assert_result( false, 'to equal', ut_utils.to_string(a_expected), 'varchar2');
16+
ut_utils.debug_log('ut_assertion.to_equal(self in ut_assertion, a_expected blob, a_nulls_are_equal boolean := null)');
17+
self.build_assert_result( false, 'to equal', ut_utils.to_string(a_expected), 'blob');
1818
end;
1919

20-
member procedure to_equal(self in ut_assertion, a_expected number, a_nulls_are_equal boolean := null) is
20+
member procedure to_equal(self in ut_assertion, a_expected boolean, a_nulls_are_equal boolean := null) is
2121
begin
22-
ut_utils.debug_log('ut_assertion.to_equal(self in ut_assertion, a_expected number, a_nulls_are_equal boolean := null)');
23-
self.build_assert_result( false, 'to equal', ut_utils.to_string(a_expected), 'number');
22+
ut_utils.debug_log('ut_assertion.to_equal(self in ut_assertion, a_expected boolean, a_nulls_are_equal boolean := null)');
23+
self.build_assert_result( false, 'to equal', ut_utils.to_string(a_expected), 'boolean');
2424
end;
2525

2626
member procedure to_equal(self in ut_assertion, a_expected clob, a_nulls_are_equal boolean := null) is
@@ -29,18 +29,18 @@ create or replace type body ut_assertion as
2929
self.build_assert_result( false, 'to equal', ut_utils.to_string(a_expected), 'clob');
3030
end;
3131

32-
member procedure to_equal(self in ut_assertion, a_expected blob, a_nulls_are_equal boolean := null) is
33-
begin
34-
ut_utils.debug_log('ut_assertion.to_equal(self in ut_assertion, a_expected blob, a_nulls_are_equal boolean := null)');
35-
self.build_assert_result( false, 'to equal', ut_utils.to_string(a_expected), 'blob');
36-
end;
37-
3832
member procedure to_equal(self in ut_assertion, a_expected date, a_nulls_are_equal boolean := null) is
3933
begin
4034
ut_utils.debug_log('ut_assertion.to_equal(self in ut_assertion, a_expected date, a_nulls_are_equal boolean := null)');
4135
self.build_assert_result( false, 'to equal', ut_utils.to_string(a_expected), 'date');
4236
end;
4337

38+
member procedure to_equal(self in ut_assertion, a_expected number, a_nulls_are_equal boolean := null) is
39+
begin
40+
ut_utils.debug_log('ut_assertion.to_equal(self in ut_assertion, a_expected number, a_nulls_are_equal boolean := null)');
41+
self.build_assert_result( false, 'to equal', ut_utils.to_string(a_expected), 'number');
42+
end;
43+
4444
member procedure to_equal(self in ut_assertion, a_expected timestamp_unconstrained, a_nulls_are_equal boolean := null) is
4545
begin
4646
ut_utils.debug_log('ut_assertion.to_equal(self in ut_assertion, a_expected timestamp_unconstrained, a_nulls_are_equal boolean := null)');
@@ -59,20 +59,27 @@ create or replace type body ut_assertion as
5959
self.build_assert_result( false, 'to equal', ut_utils.to_string(a_expected), 'timestamp with time zone');
6060
end;
6161

62+
member procedure to_equal(self in ut_assertion, a_expected varchar2, a_nulls_are_equal boolean := null) is
63+
begin
64+
ut_utils.debug_log('ut_assertion.to_equal(self in ut_assertion, a_expected varchar2, a_nulls_are_equal boolean := null)');
65+
self.build_assert_result( false, 'to equal', ut_utils.to_string(a_expected), 'varchar2');
66+
end;
67+
6268
member procedure to_(self in ut_assertion, a_expectation ut_expectation) is
6369
l_assert_result ut_assert_result;
6470
begin
6571
ut_utils.debug_log('ut_assertion.to_(self in ut_assertion, a_expectation ut_expectation)');
6672
l_assert_result :=
6773
case
68-
when self.actual_data is of (ut_data_value_varchar2) then a_expectation.run_expectation( treat(self.actual_data as ut_data_value_varchar2) )
69-
when self.actual_data is of (ut_data_value_number) then a_expectation.run_expectation( treat(self.actual_data as ut_data_value_number) )
7074
when self.actual_data is of (ut_data_value_blob) then a_expectation.run_expectation( treat(self.actual_data as ut_data_value_blob) )
75+
when self.actual_data is of (ut_data_value_boolean) then a_expectation.run_expectation( treat(self.actual_data as ut_data_value_boolean) )
7176
when self.actual_data is of (ut_data_value_clob) then a_expectation.run_expectation( treat(self.actual_data as ut_data_value_clob) )
7277
when self.actual_data is of (ut_data_value_date) then a_expectation.run_expectation( treat(self.actual_data as ut_data_value_date) )
78+
when self.actual_data is of (ut_data_value_number) then a_expectation.run_expectation( treat(self.actual_data as ut_data_value_number) )
7379
when self.actual_data is of (ut_data_value_timestamp) then a_expectation.run_expectation( treat(self.actual_data as ut_data_value_timestamp) )
7480
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) )
7581
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) )
82+
when self.actual_data is of (ut_data_value_varchar2) then a_expectation.run_expectation( treat(self.actual_data as ut_data_value_varchar2) )
7683
end;
7784
l_assert_result.message := self.message;
7885
l_assert_result.name := 'to '||l_assert_result.name;

‎source/assertions/ut_assertion.tps‎

Lines changed: 4 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -4,14 +4,15 @@ create or replace type ut_assertion as object
44
message varchar2(4000 char),
55
final member procedure build_assert_result( self in ut_assertion, a_assert_result boolean, a_assert_name varchar2,
66
a_expected_value_string in varchar2, a_expected_data_type varchar2 := null),
7-
member procedure to_equal(self in ut_assertion, a_expected varchar2, a_nulls_are_equal boolean := null),
8-
member procedure to_equal(self in ut_assertion, a_expected number, a_nulls_are_equal boolean := null),
9-
member procedure to_equal(self in ut_assertion, a_expected clob, a_nulls_are_equal boolean := null),
107
member procedure to_equal(self in ut_assertion, a_expected blob, a_nulls_are_equal boolean := null),
8+
member procedure to_equal(self in ut_assertion, a_expected boolean, a_nulls_are_equal boolean := null),
9+
member procedure to_equal(self in ut_assertion, a_expected clob, a_nulls_are_equal boolean := null),
1110
member procedure to_equal(self in ut_assertion, a_expected date, a_nulls_are_equal boolean := null),
11+
member procedure to_equal(self in ut_assertion, a_expected number, 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),
1313
member procedure to_equal(self in ut_assertion, a_expected timestamp_ltz_unconstrained, a_nulls_are_equal boolean := null),
1414
member procedure to_equal(self in ut_assertion, a_expected timestamp_tz_unconstrained, a_nulls_are_equal boolean := null),
15+
member procedure to_equal(self in ut_assertion, a_expected varchar2, a_nulls_are_equal boolean := null),
1516
member procedure to_(self in ut_assertion, a_expectation ut_expectation),
1617
final member procedure to_be_null,
1718
final member procedure to_be_not_null

‎source/assertions/ut_assertion_boolean.tpb‎

Lines changed: 10 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,10 @@
1+
create or replace type body ut_assertion_boolean as
2+
3+
overriding member procedure to_equal(self in ut_assertion_boolean, a_expected boolean, a_nulls_are_equal boolean := null) is
4+
begin
5+
ut_utils.debug_log('ut_assertion_boolean.to_equal(self in ut_assertion, a_expected boolean)');
6+
self.to_( equal(a_expected, a_nulls_are_equal) );
7+
end;
8+
9+
end;
10+
/

‎source/assertions/ut_assertion_boolean.tps‎

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,5 @@
1+
create or replace type ut_assertion_boolean under ut_assertion
2+
(
3+
overriding member procedure to_equal(self in ut_assertion_boolean, a_expected boolean, a_nulls_are_equal boolean := null)
4+
)
5+
/

‎source/expectation_data_values/ut_data_value_boolean.tpb‎

Lines changed: 9 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,9 @@
1+
create or replace type body ut_data_value_boolean as
2+
constructor function ut_data_value_boolean(self in out nocopy ut_data_value_boolean, a_value boolean) return self as result is
3+
begin
4+
self.value := ut_utils.boolean_to_int(a_value);
5+
self.init('boolean', ut_utils.boolean_to_int(a_value is null), ut_utils.to_string(a_value));
6+
return;
7+
end;
8+
end;
9+
/

‎source/expectation_data_values/ut_data_value_boolean.tps‎

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,5 @@
1+
create or replace type ut_data_value_boolean under ut_data_value(
2+
value number(1,0),
3+
constructor function ut_data_value_boolean(self in out nocopy ut_data_value_boolean, a_value boolean) return self as result
4+
)
5+
/

0 commit comments

Comments
 (0)