not_to shortcut for greater/less expectations

Pazus · Pazus · commit 83f13b93edab · 2017-05-06T09:45:47.000+03:00
diff --git a/source/expectations/ut_expectation_date.tpb b/source/expectations/ut_expectation_date.tpb
@@ -62,6 +62,30 @@ create or replace type body ut_expectation_date as
     ut_utils.debug_log('ut_expectation_date.not_to_be_between(self in ut_expectation_date, a_lower_bound date, a_upper_bound date)');
     self.not_to( ut_be_between(a_lower_bound,a_upper_bound) );
   end;
+  
+  member procedure not_to_be_greater_or_equal(self in ut_expectation_date, a_expected date) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_date.not_to_be_greater_or_equal(self in ut_expectation_date, a_expected date)');
+    self.not_to(  ut_be_greater_or_equal (a_expected) );
+  end;
+
+  member procedure not_to_be_greater_than(self in ut_expectation_date, a_expected date) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_date.not_to_be_greater_than(self in ut_expectation_date, a_expected date)');
+    self.not_to(  ut_be_greater_than (a_expected) );
+  end;
+  
+  member procedure not_to_be_less_or_equal(self in ut_expectation_date, a_expected date) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_date.not_to_be_less_or_equal(self in ut_expectation_date, a_expected date)');
+    self.not_to(  ut_be_less_or_equal (a_expected) );
+  end;
+  
+  member procedure not_to_be_less_than(self in ut_expectation_date, a_expected date) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_date.not_to_be_less_than(self in ut_expectation_date, a_expected date');
+    self.not_to(  ut_be_less_than (a_expected) );
+  end;
 
 end;
 /
diff --git a/source/expectations/ut_expectation_date.tps b/source/expectations/ut_expectation_date.tps
@@ -23,6 +23,10 @@ create or replace type ut_expectation_date under ut_expectation(
   member procedure to_be_less_than(self in ut_expectation_date, a_expected date),
   
   overriding member procedure not_to_equal(self in ut_expectation_date, a_expected date, a_nulls_are_equal boolean := null),
-  member procedure not_to_be_between(self in ut_expectation_date, a_lower_bound date, a_upper_bound date)
+  member procedure not_to_be_between(self in ut_expectation_date, a_lower_bound date, a_upper_bound date),
+  member procedure not_to_be_greater_or_equal(self in ut_expectation_date, a_expected date),
+  member procedure not_to_be_greater_than(self in ut_expectation_date, a_expected date),
+  member procedure not_to_be_less_or_equal(self in ut_expectation_date, a_expected date),
+  member procedure not_to_be_less_than(self in ut_expectation_date, a_expected date)
 )
 /
diff --git a/source/expectations/ut_expectation_dsinterval.tpb b/source/expectations/ut_expectation_dsinterval.tpb
@@ -59,6 +59,27 @@ create or replace type body ut_expectation_dsinterval as
     ut_utils.debug_log('ut_expectation_dsinterval.not_to_be_between(self in ut_expectation_dsinterval, a_lower_bound dsinterval_unconstrained, a_upper_bound dsinterval_unconstrained)');
     self.not_to( ut_be_between(a_lower_bound,a_upper_bound) );
   end;
+  
+  member procedure not_to_be_greater_or_equal(self in ut_expectation_dsinterval, a_expected dsinterval_unconstrained) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_dsinterval.not_to_be_greater_or_equal(self in ut_expectation_dsinterval, a_expected dsinterval_unconstrained)');
+    self.not_to( ut_be_greater_or_equal (a_expected) );
+  end;
+  member procedure not_to_be_greater_than(self in ut_expectation_dsinterval, a_expected dsinterval_unconstrained) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_dsinterval.not_to_be_greater_than(self in ut_expectation_dsinterval, a_expected dsinterval_unconstrained)');
+    self.not_to( ut_be_greater_than (a_expected) );
+  end;
+  member procedure not_to_be_less_or_equal(self in ut_expectation_dsinterval, a_expected dsinterval_unconstrained) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_dsinterval.not_to_be_less_or_equal(self in ut_expectation_dsinterval, a_expected dsinterval_unconstrained)');
+    self.not_to( ut_be_less_or_equal (a_expected) );
+  end;
+  member procedure not_to_be_less_than(self in ut_expectation_dsinterval, a_expected dsinterval_unconstrained) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_dsinterval.not_to_be_less_than(self in ut_expectation_dsinterval, a_expected dsinterval_unconstrained)');
+    self.not_to( ut_be_less_than (a_expected) );
+  end;
 
 end;
 /
diff --git a/source/expectations/ut_expectation_dsinterval.tps b/source/expectations/ut_expectation_dsinterval.tps
@@ -23,6 +23,10 @@ create or replace type ut_expectation_dsinterval under ut_expectation(
   member procedure to_be_less_than(self in ut_expectation_dsinterval, a_expected dsinterval_unconstrained),
   
   overriding member procedure not_to_equal(self in ut_expectation_dsinterval, a_expected dsinterval_unconstrained, a_nulls_are_equal boolean := null),
-  member procedure not_to_be_between(self in ut_expectation_dsinterval, a_lower_bound dsinterval_unconstrained, a_upper_bound dsinterval_unconstrained)
+  member procedure not_to_be_between(self in ut_expectation_dsinterval, a_lower_bound dsinterval_unconstrained, a_upper_bound dsinterval_unconstrained),
+  member procedure not_to_be_greater_or_equal(self in ut_expectation_dsinterval, a_expected dsinterval_unconstrained),
+  member procedure not_to_be_greater_than(self in ut_expectation_dsinterval, a_expected dsinterval_unconstrained),
+  member procedure not_to_be_less_or_equal(self in ut_expectation_dsinterval, a_expected dsinterval_unconstrained),
+  member procedure not_to_be_less_than(self in ut_expectation_dsinterval, a_expected dsinterval_unconstrained)
 )
 /
diff --git a/source/expectations/ut_expectation_number.tpb b/source/expectations/ut_expectation_number.tpb
@@ -62,6 +62,30 @@ create or replace type body ut_expectation_number as
     ut_utils.debug_log('ut_expectation_number.not_to_be_between(self in ut_expectation_date, a_lower_bound number, a_upper_bound number)');
     self.not_to( ut_be_between(a_lower_bound,a_upper_bound) );
   end;
+  
+  member procedure not_to_be_greater_or_equal(self in ut_expectation_number, a_expected number) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_number.not_to_be_greater_or_equal(self in ut_expectation_number, a_expected number)');
+    self.not_to( ut_be_greater_or_equal (a_expected) );
+  end;
+  
+  member procedure not_to_be_greater_than(self in ut_expectation_number, a_expected number) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_number.not_to_be_greater_than(self in ut_expectation_number, a_expected number)');
+    self.not_to( ut_be_greater_than (a_expected) );
+  end;
+  
+  member procedure not_to_be_less_or_equal(self in ut_expectation_number, a_expected number) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_number.not_to_be_less_or_equal(self in ut_expectation_number, a_expected number)');
+    self.not_to( ut_be_less_or_equal (a_expected) );
+  end;
+  
+  member procedure not_to_be_less_than(self in ut_expectation_number, a_expected number) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_number.not_to_be_less_than(self in ut_expectation_number, a_expected number');
+    self.not_to( ut_be_less_than (a_expected) );
+  end;
 
 end;
 /
diff --git a/source/expectations/ut_expectation_number.tps b/source/expectations/ut_expectation_number.tps
@@ -23,6 +23,10 @@ create or replace type ut_expectation_number under ut_expectation(
   member procedure to_be_less_than(self in ut_expectation_number, a_expected number),
   
   overriding member procedure not_to_equal(self in ut_expectation_number, a_expected number, a_nulls_are_equal boolean := null),
-  member procedure not_to_be_between(self in ut_expectation_number, a_lower_bound number, a_upper_bound number)
+  member procedure not_to_be_between(self in ut_expectation_number, a_lower_bound number, a_upper_bound number),
+  member procedure not_to_be_greater_or_equal(self in ut_expectation_number, a_expected number),
+  member procedure not_to_be_greater_than(self in ut_expectation_number, a_expected number),  
+  member procedure not_to_be_less_or_equal(self in ut_expectation_number, a_expected number),
+  member procedure not_to_be_less_than(self in ut_expectation_number, a_expected number)
 )
 /
diff --git a/source/expectations/ut_expectation_timestamp.tpb b/source/expectations/ut_expectation_timestamp.tpb
@@ -62,6 +62,30 @@ create or replace type body ut_expectation_timestamp as
     ut_utils.debug_log('ut_expectation_timestamp.not_to_be_between(self in ut_expectation_timestamp, a_lower_bound timestamp_unconstrained, a_upper_bound timestamp_unconstrained)');
     self.not_to( ut_be_between(a_lower_bound, a_upper_bound) );
   end;
+  
+  member procedure not_to_be_greater_or_equal(self in ut_expectation_timestamp, a_expected timestamp_unconstrained) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_timestamp.not_to_be_greater_or_equal(self in ut_expectation_timestamp, a_expected timestamp_unconstrained)');
+    self.not_to( ut_be_greater_or_equal (a_expected) );
+  end;
+  
+  member procedure not_to_be_greater_than(self in ut_expectation_timestamp, a_expected timestamp_unconstrained) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_timestamp.not_to_be_greater_than(self in ut_expectation_timestamp, a_expected timestamp_unconstrained)');
+    self.not_to( ut_be_greater_than (a_expected) );
+  end;  
+  
+  member procedure not_to_be_less_or_equal(self in ut_expectation_timestamp, a_expected timestamp_unconstrained) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_timestamp.not_to_be_less_or_equal(self in ut_expectation_timestamp, a_expected timestamp_unconstrained)');
+    self.not_to( ut_be_less_or_equal (a_expected) );
+  end;
+  
+  member procedure not_to_be_less_than(self in ut_expectation_timestamp, a_expected timestamp_unconstrained) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_timestamp.not_to_be_less_than(self in ut_expectation_timestamp, a_expected timestamp_unconstrained)');
+    self.not_to( ut_be_less_than (a_expected) );
+  end;
 
 end;
 /
diff --git a/source/expectations/ut_expectation_timestamp.tps b/source/expectations/ut_expectation_timestamp.tps
@@ -23,6 +23,10 @@ create or replace type ut_expectation_timestamp under ut_expectation(
   member procedure to_be_less_than(self in ut_expectation_timestamp, a_expected timestamp_unconstrained),
   
   overriding member procedure not_to_equal(self in ut_expectation_timestamp, a_expected timestamp_unconstrained, a_nulls_are_equal boolean := null),
-  member procedure not_to_be_between(self in ut_expectation_timestamp, a_lower_bound timestamp_unconstrained, a_upper_bound timestamp_unconstrained)
+  member procedure not_to_be_between(self in ut_expectation_timestamp, a_lower_bound timestamp_unconstrained, a_upper_bound timestamp_unconstrained),
+  member procedure not_to_be_greater_or_equal(self in ut_expectation_timestamp, a_expected timestamp_unconstrained),
+  member procedure not_to_be_greater_than(self in ut_expectation_timestamp, a_expected timestamp_unconstrained),
+  member procedure not_to_be_less_or_equal(self in ut_expectation_timestamp, a_expected timestamp_unconstrained),
+  member procedure not_to_be_less_than(self in ut_expectation_timestamp, a_expected timestamp_unconstrained)
 )
 /
diff --git a/source/expectations/ut_expectation_timestamp_ltz.tpb b/source/expectations/ut_expectation_timestamp_ltz.tpb
@@ -59,6 +59,27 @@ create or replace type body ut_expectation_timestamp_ltz as
     ut_utils.debug_log('ut_expectation_timestamp_ltz.not_to_be_between(self in ut_expectation_timestamp_ltz, a_lower_bound timestamp_ltz_unconstrained, a_upper_bound timestamp_ltz_unconstrained)');
     self.not_to( ut_be_between(a_lower_bound, a_upper_bound) );
   end;
+  
+  member procedure not_to_be_greater_or_equal(self in ut_expectation_timestamp_ltz, a_expected timestamp_ltz_unconstrained) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_timestamp_ltz.not_to_be_greater_or_equal(self in ut_expectation_timestamp_ltz, a_expected timestamp_ltz_unconstrained)');
+    self.not_to( ut_be_greater_or_equal (a_expected) );
+  end;
+  member procedure not_to_be_greater_than(self in ut_expectation_timestamp_ltz, a_expected timestamp_ltz_unconstrained) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_timestamp_ltz.not_to_be_greater_than(self in ut_expectation_timestamp_ltz, a_expected timestamp_ltz_unconstrained)');
+    self.not_to( ut_be_greater_than (a_expected) );
+  end;
+  member procedure not_to_be_less_or_equal(self in ut_expectation_timestamp_ltz, a_expected timestamp_ltz_unconstrained) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_timestamp_ltz.not_to_be_less_or_equal(self in ut_expectation_timestamp_ltz, a_expected timestamp_ltz_unconstrained)');
+    self.not_to( ut_be_less_or_equal (a_expected) );
+  end;
+  member procedure not_to_be_less_than(self in ut_expectation_timestamp_ltz, a_expected timestamp_ltz_unconstrained) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_timestamp_ltz.not_to_be_less_than(self in ut_expectation_timestamp_ltz, a_expected timestamp_ltz_unconstrained)');
+    self.not_to( ut_be_less_than (a_expected) );
+  end;
 
 end;
 /
diff --git a/source/expectations/ut_expectation_timestamp_ltz.tps b/source/expectations/ut_expectation_timestamp_ltz.tps
@@ -23,6 +23,10 @@ create or replace type ut_expectation_timestamp_ltz under ut_expectation(
   member procedure to_be_less_than(self in ut_expectation_timestamp_ltz, a_expected timestamp_ltz_unconstrained),
   
   overriding member procedure not_to_equal(self in ut_expectation_timestamp_ltz, a_expected timestamp_ltz_unconstrained, a_nulls_are_equal boolean := null),
-  member procedure not_to_be_between(self in ut_expectation_timestamp_ltz, a_lower_bound timestamp_ltz_unconstrained, a_upper_bound timestamp_ltz_unconstrained)
+  member procedure not_to_be_between(self in ut_expectation_timestamp_ltz, a_lower_bound timestamp_ltz_unconstrained, a_upper_bound timestamp_ltz_unconstrained),
+  member procedure not_to_be_greater_or_equal(self in ut_expectation_timestamp_ltz, a_expected timestamp_ltz_unconstrained),
+  member procedure not_to_be_greater_than(self in ut_expectation_timestamp_ltz, a_expected timestamp_ltz_unconstrained),
+  member procedure not_to_be_less_or_equal(self in ut_expectation_timestamp_ltz, a_expected timestamp_ltz_unconstrained),
+  member procedure not_to_be_less_than(self in ut_expectation_timestamp_ltz, a_expected timestamp_ltz_unconstrained)
 )
 /
diff --git a/source/expectations/ut_expectation_timestamp_tz.tpb b/source/expectations/ut_expectation_timestamp_tz.tpb
@@ -59,6 +59,27 @@ create or replace type body ut_expectation_timestamp_tz as
     ut_utils.debug_log('ut_expectation_timestamp_tz.not_to_be_between(self in ut_expectation_timestamp_tz, a_lower_bound timestamp_tz_unconstrained, a_upper_bound timestamp_tz_unconstrained)');
     self.not_to( ut_be_between(a_lower_bound, a_upper_bound) );
   end;
+  
+  member procedure not_to_be_greater_or_equal(self in ut_expectation_timestamp_tz, a_expected timestamp_tz_unconstrained) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_timestamp_tz.not_to_be_greater_or_equal(self in ut_expectation_timestamp_tz, a_expected timestamp_tz_unconstrained)');
+    self.not_to( ut_be_greater_or_equal (a_expected) );
+  end;
+  member procedure not_to_be_greater_than(self in ut_expectation_timestamp_tz, a_expected timestamp_tz_unconstrained) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_timestamp_tz.not_to_be_greater_than(self in ut_expectation_timestamp_tz, a_expected timestamp_tz_unconstrained)');
+    self.not_to( ut_be_greater_than (a_expected) );
+  end;
+  member procedure not_to_be_less_or_equal(self in ut_expectation_timestamp_tz, a_expected timestamp_tz_unconstrained) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_timestamp_tz.not_to_be_less_or_equal(self in ut_expectation_timestamp_tz, a_expected timestamp_tz_unconstrained)');
+    self.not_to( ut_be_less_or_equal (a_expected) );
+  end;
+  member procedure not_to_be_less_than(self in ut_expectation_timestamp_tz, a_expected timestamp_tz_unconstrained) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_timestamp_tz.not_to_be_less_than(self in ut_expectation_timestamp_tz, a_expected timestamp_tz_unconstrained)');
+    self.not_to( ut_be_less_than (a_expected) );
+  end;  
 
 end;
 /
diff --git a/source/expectations/ut_expectation_timestamp_tz.tps b/source/expectations/ut_expectation_timestamp_tz.tps
@@ -23,6 +23,10 @@ create or replace type ut_expectation_timestamp_tz under ut_expectation(
   member procedure to_be_less_than(self in ut_expectation_timestamp_tz, a_expected timestamp_tz_unconstrained),
   
   overriding member procedure not_to_equal(self in ut_expectation_timestamp_tz, a_expected timestamp_tz_unconstrained, a_nulls_are_equal boolean := null),
-  member procedure not_to_be_between(self in ut_expectation_timestamp_tz, a_lower_bound timestamp_tz_unconstrained, a_upper_bound timestamp_tz_unconstrained)
+  member procedure not_to_be_between(self in ut_expectation_timestamp_tz, a_lower_bound timestamp_tz_unconstrained, a_upper_bound timestamp_tz_unconstrained),
+  member procedure not_to_be_greater_or_equal(self in ut_expectation_timestamp_tz, a_expected timestamp_tz_unconstrained),  
+  member procedure not_to_be_greater_than(self in ut_expectation_timestamp_tz, a_expected timestamp_tz_unconstrained),
+  member procedure not_to_be_less_or_equal(self in ut_expectation_timestamp_tz, a_expected timestamp_tz_unconstrained),
+  member procedure not_to_be_less_than(self in ut_expectation_timestamp_tz, a_expected timestamp_tz_unconstrained)
 )
 /
diff --git a/source/expectations/ut_expectation_yminterval.tpb b/source/expectations/ut_expectation_yminterval.tpb
@@ -59,6 +59,27 @@ create or replace type body ut_expectation_yminterval as
     ut_utils.debug_log('ut_expectation_yminterval.not_to_be_between(self in ut_expectation_yminterval, a_lower_bound dsinterval_unconstrained, a_upper_bound dsinterval_unconstrained)');
     self.not_to( ut_be_between(a_lower_bound,a_upper_bound) );
   end;
+  
+  member procedure not_to_be_greater_or_equal(self in ut_expectation_yminterval, a_expected yminterval_unconstrained) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_yminterval.not_to_be_greater_or_equal(self in ut_expectation_yminterval, a_expected yminterval_unconstrained)');
+    self.not_to( ut_be_greater_or_equal (a_expected) );
+  end;
+  member procedure not_to_be_greater_than(self in ut_expectation_yminterval, a_expected yminterval_unconstrained) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_yminterval.not_to_be_greater_than(self in ut_expectation_yminterval, a_expected yminterval_unconstrained)');
+    self.not_to(  ut_be_greater_than (a_expected) );
+  end;
+  member procedure not_to_be_less_or_equal(self in ut_expectation_yminterval, a_expected yminterval_unconstrained) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_yminterval.not_to_be_less_or_equal(self in ut_expectation_yminterval, a_expected yminterval_unconstrained)');
+    self.not_to(  ut_be_less_or_equal (a_expected) );
+  end;
+  member procedure not_to_be_less_than(self in ut_expectation_yminterval, a_expected yminterval_unconstrained) is 
+  begin 
+    ut_utils.debug_log('ut_expectation_yminterval.not_to_be_less_than(self in ut_expectation_yminterval, a_expected yminterval_unconstrained)');
+    self.not_to(  ut_be_less_than (a_expected) );
+  end;  
 
 end;
 /
diff --git a/source/expectations/ut_expectation_yminterval.tps b/source/expectations/ut_expectation_yminterval.tps
@@ -23,6 +23,10 @@ create or replace type ut_expectation_yminterval under ut_expectation(
   member procedure to_be_less_than(self in ut_expectation_yminterval, a_expected yminterval_unconstrained),
   
   overriding member procedure not_to_equal(self in ut_expectation_yminterval, a_expected yminterval_unconstrained, a_nulls_are_equal boolean := null),
-  member procedure not_to_be_between(self in ut_expectation_yminterval, a_lower_bound yminterval_unconstrained, a_upper_bound yminterval_unconstrained)
+  member procedure not_to_be_between(self in ut_expectation_yminterval, a_lower_bound yminterval_unconstrained, a_upper_bound yminterval_unconstrained),
+  member procedure not_to_be_greater_or_equal(self in ut_expectation_yminterval, a_expected yminterval_unconstrained),
+  member procedure not_to_be_greater_than(self in ut_expectation_yminterval, a_expected yminterval_unconstrained),  
+  member procedure not_to_be_less_or_equal(self in ut_expectation_yminterval, a_expected yminterval_unconstrained),
+  member procedure not_to_be_less_than(self in ut_expectation_yminterval, a_expected yminterval_unconstrained)
 )
 /

Original file line number	Diff line number	Diff line change
`@@ -23,6 +23,10 @@ create or replace type ut_expectation_date under ut_expectation(`
`23`	`23`	`member procedure to_be_less_than(self in ut_expectation_date, a_expected date),`
`24`	`24`
`25`	`25`	`overriding member procedure not_to_equal(self in ut_expectation_date, a_expected date, a_nulls_are_equal boolean := null),`
`26`		`- member procedure not_to_be_between(self in ut_expectation_date, a_lower_bound date, a_upper_bound date)`
	`26`	`+ member procedure not_to_be_between(self in ut_expectation_date, a_lower_bound date, a_upper_bound date),`
	`27`	`+ member procedure not_to_be_greater_or_equal(self in ut_expectation_date, a_expected date),`
	`28`	`+ member procedure not_to_be_greater_than(self in ut_expectation_date, a_expected date),`
	`29`	`+ member procedure not_to_be_less_or_equal(self in ut_expectation_date, a_expected date),`
	`30`	`+ member procedure not_to_be_less_than(self in ut_expectation_date, a_expected date)`
`27`	`31`	`)`
`28`	`32`	`/`