Revision 8abfdcfc
Von Sven Schöling vor mehr als 6 Jahren hinzugefügt
| t/datev/invoices.t | ||
|---|---|---|
| 123 | 123 |
cmp_ok($::form->round_amount($umsatzsumme,2), '==', 3924.5, "Sum of all bookings ok"); |
| 124 | 124 |
|
| 125 | 125 |
note('testing gldatefrom');
|
| 126 |
my $datev = SL::DATEV->new(
|
|
| 126 |
$datev = SL::DATEV->new( |
|
| 127 | 127 |
dbh => $dbh, |
| 128 | 128 |
from => $startdate, |
| 129 | 129 |
to => DateTime->new(year => 2017, month => 01, day => 31), |
| ... | ... | |
| 133 | 133 |
$::form->{gldatefrom} = DateTime->new(year => 2017, month => 3, day => 1)->to_kivitendo;
|
| 134 | 134 |
|
| 135 | 135 |
$datev->generate_datev_data(from_to => $datev->fromto); |
| 136 |
my $datev_lines = $datev->generate_datev_lines;
|
|
| 137 |
my $umsatzsumme = sum map { $_->{umsatz} } @{ $datev_lines };
|
|
| 136 |
$datev_lines = $datev->generate_datev_lines; |
|
| 137 |
$umsatzsumme = sum map { $_->{umsatz} } @{ $datev_lines };
|
|
| 138 | 138 |
cmp_ok($umsatzsumme, '==', 1569.8, "Sum of bookings made after March 1st (only invoice2) ok"); |
| 139 | 139 |
|
| 140 | 140 |
$::form->{gldatefrom} = DateTime->new(year => 2017, month => 5, day => 1)->to_kivitendo;
|
Auch abrufbar als: Unified diff
datev tests: Warnungen