X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=t%2Fhelper%2Fattr.t;h=ef49d8e74fa073d60a92918ef1b00bf82b308b59;hb=2e9687c8d57a1609e2936e30c3f97d9366fab61d;hp=9f91865a427a6a321187a049b2119cdd438afc02;hpb=c616c9090b5e839938707d1ca3bf70b2de46b858;p=kivitendo-erp.git diff --git a/t/helper/attr.t b/t/helper/attr.t index 9f91865a4..ef49d8e74 100644 --- a/t/helper/attr.t +++ b/t/helper/attr.t @@ -1,17 +1,22 @@ -use Test::More tests => 25; +use Test::More tests => 29; use DateTime; use_ok 'SL::DB::Part'; use_ok 'SL::DB::Order'; +use_ok 'SL::DB::Invoice'; use_ok 'SL::Dispatcher'; -SL::Dispatcher::pre_startup_setup(); +{ +$::dispatcher = SL::Dispatcher->new; +$::dispatcher->pre_startup_setup; +no warnings 'once'; $::form = Form->new; $::myconfig{numberformat} = '1.000,00'; $::myconfig{dateformat} = 'dd.mm.yyyy'; $::locale = Locale->new('de'); +} my $p = new_ok 'SL::DB::Part'; is($p->sellprice_as_number('2,30'), '2,30'); @@ -38,3 +43,12 @@ is($o->marge_percent, 0.224); is($o->marge_percent_as_percent, '22,40'); is($o->marge_percent(0.231), 0.231); is($o->marge_percent_as_percent, '23,10'); + +# overloaded attr: invoice taxamount +my $i = new_ok 'SL::DB::Invoice'; + +is($i->taxamount_as_number, '0,00'); +$i->amount(12); +$i->netamount(10.34); +is($i->taxamount_as_number, '1,66'); +