Tests: SL::Dev Änderungen übernommen
[kivitendo-erp.git] / t / part / stock.t
index 583aefe..39e5756 100644 (file)
@@ -6,20 +6,20 @@ use Support::TestSetup;
 use Carp;
 use Test::Exception;
 use SL::DB::Part;
-use SL::Dev::Part;
-use SL::Dev::Inventory;
+use SL::Dev::Part qw(new_part);
+use SL::Dev::Inventory qw(create_warehouse_and_bins set_stock transfer_stock);
 
 Support::TestSetup::login();
 
 clear_up();
 
-my ($wh1, $bin1_1) = SL::Dev::Inventory::create_warehouse_and_bins(
+my ($wh1, $bin1_1) = create_warehouse_and_bins(
   warehouse_description => 'Testlager',
   bin_description       => 'Testlagerplatz',
   number_of_bins        => 2,
 );
 my $bin1_2 = $wh1->bins->[1];
-my ($wh2, $bin2_1) = SL::Dev::Inventory::create_warehouse_and_bins(
+my ($wh2, $bin2_1) = create_warehouse_and_bins(
   warehouse_description => 'Testlager 2',
   bin_description       => 'Testlagerplatz 2',
   number_of_bins        => 2,
@@ -28,18 +28,18 @@ my ($wh2, $bin2_1) = SL::Dev::Inventory::create_warehouse_and_bins(
 my $today     = DateTime->today;
 my $yesterday = $today->clone->add(days => -1);
 
-my $part = SL::Dev::Part::create_part->save;
-SL::Dev::Inventory::set_stock(part => $part, bin_id => $bin1_1->id, qty => 7, shippingdate => $yesterday);
-SL::Dev::Inventory::set_stock(part => $part, bin_id => $bin1_1->id, qty => 5);
-SL::Dev::Inventory::set_stock(part => $part, bin_id => $bin1_1->id, abs_qty => 8); # apply -4 to get qty 8 in bin1_1
-SL::Dev::Inventory::set_stock(part => $part, bin_id => $bin1_2->id, qty => 9);
-
-SL::Dev::Inventory::set_stock(part => $part, bin_id => $bin2_1->id, abs_qty => 10);
-SL::Dev::Inventory::transfer_stock(part     => $part,
-                                   from_bin => $wh2->bins->[0],
-                                   to_bin   => $wh2->bins->[1],
-                                   qty      => 2,
-                                  );
+my $part = new_part()->save;
+set_stock(part => $part, bin_id => $bin1_1->id, qty => 7, shippingdate => $yesterday);
+set_stock(part => $part, bin_id => $bin1_1->id, qty => 5);
+set_stock(part => $part, bin_id => $bin1_1->id, abs_qty => 8); # apply -4 to get qty 8 in bin1_1
+set_stock(part => $part, bin_id => $bin1_2->id, qty => 9);
+
+set_stock(part => $part, bin_id => $bin2_1->id, abs_qty => 10);
+transfer_stock(part     => $part,
+               from_bin => $wh2->bins->[0],
+               to_bin   => $wh2->bins->[1],
+               qty      => 2,
+              );
 
 is( SL::DB::Manager::Part->get_all_count(), 1,  "total number of parts created is 1");
 is( $part->get_stock == 27                                     , 1 , "total stock of part is 27");