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

Skip to content

Commit 28dbd1e

Browse files
lwasylowlwasylow
committed
Added set of tests:
expectations/binary/test_be_greater_or_equal expectations/binary/test_be_greater_than expectations/unary/test_expect_not_to_be_null Passing username implicit into ut_test_runner.
1 parent 887e46a commit 28dbd1e

8 files changed

Lines changed: 1089 additions & 1 deletion

‎test/install_ut3_user_tests.sql‎

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -5,17 +5,23 @@ whenever oserror exit failure rollback
55
alter session set plsql_optimize_level=0;
66

77
prompt Install user tests
8+
@@ut3_user/expectations/unary/test_expect_not_to_be_null.pks
89
@@ut3_user/expectations/binary/test_equal.pks
910
@@ut3_user/expectations/binary/test_expect_to_be_less_than.pks
1011
@@ut3_user/expectations/binary/test_be_less_or_equal.pks
12+
@@ut3_user/expectations/binary/test_be_greater_or_equal.pks
13+
@@ut3_user/expectations/binary/test_be_greater_than.pks
1114
@@ut3_user/expectations/test_matchers.pks
1215
@@ut3_user/expectations/test_expectation_anydata.pks
1316
@@ut3_user/expectations/test_expectations_cursor.pks
1417
@@ut3_user/api/test_ut_runner.pks
1518

19+
@@ut3_user/expectations/unary/test_expect_not_to_be_null.pkb
1620
@@ut3_user/expectations/binary/test_equal.pkb
1721
@@ut3_user/expectations/binary/test_expect_to_be_less_than.pkb
1822
@@ut3_user/expectations/binary/test_be_less_or_equal.pkb
23+
@@ut3_user/expectations/binary/test_be_greater_or_equal.pkb
24+
@@ut3_user/expectations/binary/test_be_greater_than.pkb
1925
@@ut3_user/expectations/test_matchers.pkb
2026
@@ut3_user/expectations/test_expectation_anydata.pkb
2127
@@ut3_user/expectations/test_expectations_cursor.pkb

‎test/ut3_user/api/test_ut_runner.pkb‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -254,7 +254,7 @@ end;';
254254
'dummy_test_package.some_dummy_test_procedure' path, 0 disabled_flag
255255
from dual;
256256
--Act
257-
open l_actual for select * from table(ut3.ut_runner.get_suites_info(NULL,'DUMMY_TEST_PACKAGE'));
257+
open l_actual for select * from table(ut3.ut_runner.get_suites_info('UT3$USER#','DUMMY_TEST_PACKAGE'));
258258
--Assert
259259
ut.expect(l_actual).to_equal(l_expected);
260260
end;

‎test/ut3_user/expectations/binary/test_be_greater_or_equal.pkb‎

Lines changed: 263 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,263 @@
1+
create or replace package body test_be_greater_or_equal is
2+
3+
procedure cleanup_expectations is
4+
begin
5+
ut3_tester_helper.main_helper.clear_expectations( );
6+
end;
7+
8+
function to_greater_equal_block(
9+
a_data_type varchar2,
10+
a_actual varchar2,
11+
a_expected varchar2
12+
) return varchar2 is
13+
begin
14+
return ut3_tester_helper.expectations_helper.binary_expectation_block(
15+
'to_be_greater_or_equal', a_data_type, a_actual, a_data_type, a_expected
16+
);
17+
end;
18+
19+
function not_to_greater_equal_block(
20+
a_data_type varchar2,
21+
a_actual varchar2,
22+
a_expected varchar2
23+
) return varchar2 is
24+
begin
25+
return ut3_tester_helper.expectations_helper.binary_expectation_block(
26+
'not_to_be_greater_or_equal', a_data_type, a_actual, a_data_type, a_expected
27+
);
28+
end;
29+
30+
procedure actual_date_greater is
31+
begin
32+
--Act
33+
execute immediate to_greater_equal_block('date', 'sysdate', 'sysdate-1');
34+
--Assert
35+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_equal(0);
36+
end;
37+
38+
procedure actual_number_greater is
39+
begin
40+
--Act
41+
execute immediate to_greater_equal_block('number', '2.0', '1.99');
42+
--Assert
43+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_equal(0);
44+
end;
45+
46+
procedure actual_interval_ym_greater is
47+
begin
48+
--Act
49+
execute immediate to_greater_equal_block('interval year to month', '''2-1''', '''2-0''');
50+
--Assert
51+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_equal(0);
52+
end;
53+
54+
procedure actual_interval_ds_greater is
55+
begin
56+
--Act
57+
execute immediate to_greater_equal_block('interval day to second', '''2 01:00:00''', '''2 00:59:59''');
58+
--Assert
59+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_equal(0);
60+
end;
61+
62+
procedure actual_timestamp_greater is
63+
begin
64+
--Act
65+
execute immediate to_greater_equal_block('timestamp', 'to_timestamp(''1997 13'',''YYYY FF'')', 'to_timestamp(''1997 12'',''YYYY FF'')');
66+
--Assert
67+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_equal(0);
68+
end;
69+
70+
procedure actual_timestamp_tz_greater is
71+
begin
72+
--Act
73+
execute immediate to_greater_equal_block('timestamp with time zone', 'to_timestamp_tz(''1997 12 +01:00'',''YYYY FF TZR'')', 'to_timestamp_tz(''1997 12 +02:00'',''YYYY FF TZR'')');
74+
--Assert
75+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_equal(0);
76+
end;
77+
78+
procedure actual_timestamp_ltz_greater is
79+
begin
80+
--Act
81+
execute immediate to_greater_equal_block('timestamp with local time zone', 'to_timestamp_tz(''1997 12 +01:00'',''YYYY FF TZR'')', 'to_timestamp_tz(''1997 12 +02:00'',''YYYY FF TZR'')');
82+
--Assert
83+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_equal(0);
84+
end;
85+
86+
procedure actual_date_equal is
87+
begin
88+
--Act
89+
execute immediate to_greater_equal_block('date', 'sysdate', 'sysdate');
90+
--Assert
91+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_equal(0);
92+
end;
93+
94+
procedure actual_number_equal is
95+
begin
96+
--Act
97+
execute immediate to_greater_equal_block('number', '2.0', '2.00');
98+
--Assert
99+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_equal(0);
100+
end;
101+
102+
procedure actual_interval_ym_equal is
103+
begin
104+
--Act
105+
execute immediate to_greater_equal_block('interval year to month', '''2-1''', '''2-1''');
106+
--Assert
107+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_equal(0);
108+
end;
109+
110+
procedure actual_interval_ds_equal is
111+
begin
112+
--Act
113+
execute immediate to_greater_equal_block('interval day to second', '''2 01:00:00''', '''2 01:00:00''');
114+
--Assert
115+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_equal(0);
116+
end;
117+
118+
procedure actual_timestamp_equal is
119+
begin
120+
--Act
121+
execute immediate to_greater_equal_block('timestamp', 'to_timestamp(''1997 13'',''YYYY FF'')', 'to_timestamp(''1997 13'',''YYYY FF'')');
122+
--Assert
123+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_equal(0);
124+
end;
125+
126+
procedure actual_timestamp_tz_equal is
127+
begin
128+
--Act
129+
execute immediate to_greater_equal_block('timestamp with time zone', 'to_timestamp_tz(''1997 12 +01:00'',''YYYY FF TZR'')', 'to_timestamp_tz(''1997 12 +01:00'',''YYYY FF TZR'')');
130+
--Assert
131+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_equal(0);
132+
end;
133+
134+
procedure actual_timestamp_ltz_equal is
135+
begin
136+
--Act
137+
execute immediate to_greater_equal_block('timestamp with local time zone', 'to_timestamp_tz(''1997 12 +01:00'',''YYYY FF TZR'')', 'to_timestamp_tz(''1997 12 +01:00'',''YYYY FF TZR'')');
138+
--Assert
139+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_equal(0);
140+
end;
141+
142+
procedure actual_date_less is
143+
begin
144+
--Act
145+
execute immediate to_greater_equal_block('date', 'sysdate-1', 'sysdate');
146+
--Assert
147+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_be_greater_than(0);
148+
end;
149+
150+
procedure actual_number_less is
151+
begin
152+
--Act
153+
execute immediate to_greater_equal_block('number', '1.0', '1.01');
154+
--Assert
155+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_be_greater_than(0);
156+
end;
157+
158+
procedure actual_interval_ym_less is
159+
begin
160+
--Act
161+
execute immediate to_greater_equal_block('interval year to month', '''2-1''', '''2-2''');
162+
--Assert
163+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_be_greater_than(0);
164+
end;
165+
166+
procedure actual_interval_ds_less is
167+
begin
168+
--Act
169+
execute immediate to_greater_equal_block('interval day to second', '''2 00:59:58''', '''2 00:59:59''');
170+
--Assert
171+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_be_greater_than(0);
172+
end;
173+
174+
procedure actual_timestamp_less is
175+
begin
176+
--Act
177+
execute immediate to_greater_equal_block('timestamp', 'to_timestamp(''1997 12'',''YYYY FF'')', 'to_timestamp(''1997 13'',''YYYY FF'')');
178+
--Assert
179+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_be_greater_than(0);
180+
end;
181+
182+
procedure actual_timestamp_tz_less is
183+
begin
184+
--Act
185+
execute immediate to_greater_equal_block('timestamp with time zone', 'to_timestamp_tz(''1997 12 +03:00'',''YYYY FF TZR'')', 'to_timestamp_tz(''1997 12 +02:00'',''YYYY FF TZR'')');
186+
--Assert
187+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_be_greater_than(0);
188+
end;
189+
190+
procedure actual_timestamp_ltz_less is
191+
begin
192+
--Act
193+
execute immediate to_greater_equal_block('timestamp with local time zone', 'to_timestamp_tz(''1997 12 +03:00'',''YYYY FF TZR'')', 'to_timestamp_tz(''1997 12 +02:00'',''YYYY FF TZR'')');
194+
--Assert
195+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_be_greater_than(0);
196+
end;
197+
198+
procedure not_actual_date_greater is
199+
begin
200+
--Act
201+
execute immediate not_to_greater_equal_block('date', 'sysdate', 'sysdate-1');
202+
--Assert
203+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_be_greater_than(0);
204+
end;
205+
206+
procedure not_actual_number_greater is
207+
begin
208+
--Act
209+
execute immediate not_to_greater_equal_block('number', '2.0', '1.99');
210+
--Assert
211+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_be_greater_than(0);
212+
end;
213+
214+
procedure not_actual_interval_ym_greater is
215+
begin
216+
--Act
217+
execute immediate not_to_greater_equal_block('interval year to month', '''2-1''', '''2-0''');
218+
--Assert
219+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_be_greater_than(0);
220+
end;
221+
222+
procedure not_actual_interval_ds_greater is
223+
begin
224+
--Act
225+
execute immediate not_to_greater_equal_block('interval day to second', '''2 01:00:00''', '''2 00:59:59''');
226+
--Assert
227+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_be_greater_than(0);
228+
end;
229+
230+
procedure not_actual_timestamp_greater is
231+
begin
232+
--Act
233+
execute immediate not_to_greater_equal_block('timestamp', 'to_timestamp(''1997 13'',''YYYY FF'')', 'to_timestamp(''1997 12'',''YYYY FF'')');
234+
--Assert
235+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_be_greater_than(0);
236+
end;
237+
238+
procedure not_actual_timestamp_tz_gretr is
239+
begin
240+
--Act
241+
execute immediate not_to_greater_equal_block('timestamp with time zone', 'to_timestamp_tz(''1997 12 +01:00'',''YYYY FF TZR'')', 'to_timestamp_tz(''1997 12 +02:00'',''YYYY FF TZR'')');
242+
--Assert
243+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_be_greater_than(0);
244+
end;
245+
246+
procedure not_actual_timestamp_ltz_gretr is
247+
begin
248+
--Act
249+
execute immediate not_to_greater_equal_block('timestamp with local time zone', 'to_timestamp_tz(''1997 12 +01:00'',''YYYY FF TZR'')', 'to_timestamp_tz(''1997 12 +02:00'',''YYYY FF TZR'')');
250+
--Assert
251+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_be_greater_than(0);
252+
end;
253+
254+
procedure actual_clob is
255+
begin
256+
--Act
257+
ut3.ut.expect(to_clob('3')).to_( ut3.be_greater_or_equal(3) );
258+
--Assert
259+
ut.expect(ut3_tester_helper.main_helper.get_failed_expectations_num).to_be_greater_than(0);
260+
end;
261+
262+
end;
263+
/

‎test/ut3_user/expectations/binary/test_be_greater_or_equal.pks‎

Lines changed: 97 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,97 @@
1+
create or replace package test_be_greater_or_equal is
2+
3+
--%suite((not)to_be_greater_or_equal)
4+
--%suitepath(utplsql.test_user.expectations.binary)
5+
6+
--%aftereach
7+
procedure cleanup_expectations;
8+
9+
--%test(Gives success when actual date is greater than expected)
10+
procedure actual_date_greater;
11+
12+
--%test(Gives success when actual number is greater than expected)
13+
procedure actual_number_greater;
14+
15+
--%test(Gives success when actual interval year to month is greater than expected)
16+
procedure actual_interval_ym_greater;
17+
18+
--%test(Gives success when actual interval day to second is greater than expected)
19+
procedure actual_interval_ds_greater;
20+
21+
--%test(Gives success when actual timestamp is greater than expected)
22+
procedure actual_timestamp_greater;
23+
24+
--%test(Gives success when actual timestamp with time zone is greater than expected)
25+
procedure actual_timestamp_tz_greater;
26+
27+
--%test(Gives success when actual timestamp with local time zone is greater than expected)
28+
procedure actual_timestamp_ltz_greater;
29+
30+
--%test(Gives success when actual date is equal expected)
31+
procedure actual_date_equal;
32+
33+
--%test(Gives success when actual number is equal expected)
34+
procedure actual_number_equal;
35+
36+
--%test(Gives success when actual interval year to month is equal expected)
37+
procedure actual_interval_ym_equal;
38+
39+
--%test(Gives success when actual interval day to second is equal expected)
40+
procedure actual_interval_ds_equal;
41+
42+
--%test(Gives success when actual timestamp is equal expected)
43+
procedure actual_timestamp_equal;
44+
45+
--%test(Gives success when actual timestamp with time zone is equal expected)
46+
procedure actual_timestamp_tz_equal;
47+
48+
--%test(Gives success when actual timestamp with local time zone is equal expected)
49+
procedure actual_timestamp_ltz_equal;
50+
51+
--%test(Gives failure when actual date is less than expected)
52+
procedure actual_date_less;
53+
54+
--%test(Gives failure when actual number is less than expected)
55+
procedure actual_number_less;
56+
57+
--%test(Gives failure when actual interval year to month is less than expected)
58+
procedure actual_interval_ym_less;
59+
60+
--%test(Gives failure when actual interval day to second is less than expected)
61+
procedure actual_interval_ds_less;
62+
63+
--%test(Gives failure when actual timestamp is less than expected)
64+
procedure actual_timestamp_less;
65+
66+
--%test(Gives failure when actual timestamp with time zone is less than expected)
67+
procedure actual_timestamp_tz_less;
68+
69+
--%test(Gives failure when actual timestamp with local time zone is less than expected)
70+
procedure actual_timestamp_ltz_less;
71+
72+
--%test(Negated - Gives failure when actual date is greater than expected)
73+
procedure not_actual_date_greater;
74+
75+
--%test(Negated - Gives failure when actual number is greater than expected)
76+
procedure not_actual_number_greater;
77+
78+
--%test(Negated - Gives failure when actual interval year to month is greater than expected)
79+
procedure not_actual_interval_ym_greater;
80+
81+
--%test(Negated - Gives failure when actual interval day to second is greater than expected)
82+
procedure not_actual_interval_ds_greater;
83+
84+
--%test(Negated - Gives failure when actual timestamp is greater than expected)
85+
procedure not_actual_timestamp_greater;
86+
87+
--%test(Negated - Gives failure when actual timestamp with time zone is greater than expected)
88+
procedure not_actual_timestamp_tz_gretr;
89+
90+
--%test(Negated - Gives failure when actual timestamp with local time zone is greater than expected)
91+
procedure not_actual_timestamp_ltz_gretr;
92+
93+
--%test(Gives failure when running against CLOB)
94+
procedure actual_clob;
95+
96+
end;
97+
/

0 commit comments

Comments
 (0)