Tests: price_tax_calculator.t muss vor Kunden löschen richtig aufräumen
authorSven Schöling <s.schoeling@linet-services.de>
Thu, 5 Mar 2015 12:41:12 +0000 (13:41 +0100)
committerSven Schöling <s.schoeling@linet-services.de>
Thu, 5 Mar 2015 12:41:12 +0000 (13:41 +0100)
t/db_helper/price_tax_calculator.t

index f7aa9ab..220cd42 100644 (file)
@@ -14,8 +14,10 @@ use Test::Exception;
 use SL::DB::Buchungsgruppe;
 use SL::DB::Currency;
 use SL::DB::Customer;
+use SL::DB::DeliveryOrder;
 use SL::DB::Employee;
 use SL::DB::Invoice;
+use SL::DB::Order;
 use SL::DB::Part;
 use SL::DB::Unit;
 use SL::DB::TaxZone;
@@ -27,6 +29,8 @@ sub reset_state {
 
   $params{$_} ||= {} for qw(buchungsgruppe unit customer part tax);
 
+  SL::DB::Manager::Order->delete_all(all => 1);
+  SL::DB::Manager::DeliveryOrder->delete_all(all => 1);
   SL::DB::Manager::Invoice->delete_all(all => 1);
   SL::DB::Manager::Part->delete_all(all => 1);
   SL::DB::Manager::Customer->delete_all(all => 1);