Tests: SL::Dev Änderungen übernommen

[kivitendo-erp.git] / t / datev / invoices.t

diff --git a/t/datev/invoices.t b/t/datev/invoices.t
index 45c68ca..c944dd8 100644 (file)
--- a/t/datev/invoices.t
+++ b/t/datev/invoices.t
@@ -6,7 +6,7 @@ use lib 't';
 
 use_ok 'Support::TestSetup';
 use SL::DATEV qw(:CONSTANTS);
-use SL::Dev::ALL;
+use SL::Dev::ALL qw(:ALL);
 use List::Util qw(sum);
 use SL::DB::Buchungsgruppe;
 use SL::DB::Chart;
@@ -24,22 +24,22 @@ my $date            = DateTime->new(year => 2017, month =>  1, day => 1);
 my $payment_date    = DateTime->new(year => 2017, month =>  1, day => 5);
 my $gldate          = DateTime->new(year => 2017, month =>  2, day => 9); # simulate bookings for Jan being made in Feb
 
-my $part1 = SL::Dev::Part::create_part(partnumber => '19', description => 'Part 19%')->save;
-my $part2 = SL::Dev::Part::create_part(
+my $part1 = new_part(partnumber => '19', description => 'Part 19%')->save;
+my $part2 = new_part(
   partnumber         => '7',
   description        => 'Part 7%',
   buchungsgruppen_id => $buchungsgruppe7->id,
 )->save;
 
-my $invoice = SL::Dev::Record::create_sales_invoice(
+my $invoice = create_sales_invoice(
   invnumber    => "1 sales invoice",
   itime        => $gldate,
   gldate       => $gldate,
   intnotes     => 'booked in February',
   taxincluded  => 0,
   transdate    => $date,
-  invoiceitems => [ SL::Dev::Record::create_invoice_item(part => $part1, qty =>  3, sellprice => 70),
-                    SL::Dev::Record::create_invoice_item(part => $part2, qty => 10, sellprice => 50),
+  invoiceitems => [ create_invoice_item(part => $part1, qty =>  3, sellprice => 70),
+                    create_invoice_item(part => $part2, qty => 10, sellprice => 50),
                   ]
 );
 $invoice->pay_invoice(chart_id      => $bank->id,
@@ -85,27 +85,27 @@ cmp_bag $datev1->generate_datev_lines, [
                                        ], "trans_id datev check ok";
 
 my $march_9 = DateTime->new(year => 2017, month =>  3, day => 9);
-my $invoice2 = SL::Dev::Record::create_sales_invoice(
+my $invoice2 = create_sales_invoice(
   invnumber    => "2 sales invoice",
   itime        => $march_9,
   gldate       => $march_9,
   intnotes     => 'booked in March',
   taxincluded  => 0,
   transdate    => $date,
-  invoiceitems => [ SL::Dev::Record::create_invoice_item(part => $part1, qty =>  6, sellprice => 70),
-                    SL::Dev::Record::create_invoice_item(part => $part2, qty => 20, sellprice => 50),
+  invoiceitems => [ create_invoice_item(part => $part1, qty =>  6, sellprice => 70),
+                    create_invoice_item(part => $part2, qty => 20, sellprice => 50),
                   ]
 );
 
-my $credit_note = SL::Dev::Record::create_credit_note(
+my $credit_note = create_credit_note(
   invnumber    => 'Gutschrift 34',
   itime        => $gldate,
   gldate       => $gldate,
   intnotes     => 'booked in February',
   taxincluded  => 0,
   transdate    => $date,
-  invoiceitems => [ SL::Dev::Record::create_invoice_item(part => $part1, qty =>  3, sellprice => 70),
-                    SL::Dev::Record::create_invoice_item(part => $part2, qty => 10, sellprice => 50),
+  invoiceitems => [ create_invoice_item(part => $part1, qty =>  3, sellprice => 70),
+                    create_invoice_item(part => $part2, qty => 10, sellprice => 50),
                   ]
 );