From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Mon, 16 Mar 2020 08:52:07 +0000 (+0100)
Subject: DATEV-Tests: eine gültige UStID-Nr benutzen
X-Git-Tag: release-3.5.6.1~242
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=84c2f6a9df46ecb82df078ce6977e035ab28877a;p=kivitendo-erp.git

DATEV-Tests: eine gültige UStID-Nr benutzen

Der DATEV-Export nutzt inzwischen Routinen zur Prüfung & sauberen
Formatierung von UStID-Nummern, und die in den Tests verwendete war
nach dem gültigen Algorithmus schlicht nicht gültig.
---

diff --git a/t/datev/datev_format_2018.t b/t/datev/datev_format_2018.t
index d97c32998..5073cce0f 100644
--- a/t/datev/datev_format_2018.t
+++ b/t/datev/datev_format_2018.t
@@ -23,11 +23,12 @@ clear_up();
 my $d = SL::DB::Default->get;
 $d->update_attributes(datev_export_format => 'cp1252');
 
+my $ustid           = 'DE123456788';
 my $buchungsgruppe7 = SL::DB::Manager::Buchungsgruppe->find_by(description => 'Standard 7%') || die "No accounting group for 7\%";
 my $date            = DateTime->new(year => 2017, month =>  7, day => 19);
 my $department      = create_department(description => 'Kästchenweiße heiße Preise');
 my $project         = create_project(projectnumber => 2017, description => '299');
-my $customer        = new_customer(name => 'Test customer', ustid => 'DE12345678')->save();
+my $customer        = new_customer(name => 'Test customer', ustid => $ustid)->save();
 my $part1 = new_part(partnumber => '19', description => 'Part 19%')->save;
 my $part2 = new_part(
   partnumber         => '7',
@@ -153,7 +154,7 @@ cmp_deeply $sorted[0],    [ '1963,5', 'S', 'EUR', '', '', '',
                             '', '', 'Test customer', '', '', '', '', '', '',
                             '', '', '', '', '', '', '', '', '',
                             '', '', '', '', '', '', '', "K\x{e4}stchen",
-                            '299', '','DE12345678', '', '', '',
+                            '299', '', $ustid, '', '', '',
                             '', '', '', '', '', '', '', '', '',
                             '', '', '', '', '', '', '', '', '',
                             '', '', '', '', '', '', '', '', '',
@@ -169,7 +170,7 @@ cmp_deeply $sorted[1],     [ '535', 'S', 'EUR', '', '', '',
                             '', '', 'Test customer', '', '', '', '', '', '',
                             '', '', '', '', '', '', '', '', '',
                             '', '', '', '', '', '', '', "K\x{e4}stchen",
-                            '299', '','DE12345678', '', '', '',
+                            '299', '', $ustid, '', '', '',
                             '', '', '', '', '', '', '', '', '',
                             '', '', '', '', '', '', '', '', '',
                             '', '', '', '', '', '', '', '', '',