Revision 0a64ac3d
Von Kivitendo Admin vor etwa 7 Jahren hinzugefügt
| SL/IS.pm | ||
|---|---|---|
| 1409 | 1409 |
|
| 1410 | 1410 |
# safety check datev export |
| 1411 | 1411 |
if ($::instance_conf->get_datev_check_on_sales_invoice) {
|
| 1412 |
my $transdate = $::form->{invdate} ? DateTime->from_lxoffice($::form->{invdate}) : undef;
|
|
| 1413 |
$transdate ||= DateTime->today; |
|
| 1414 | 1412 |
|
| 1415 | 1413 |
my $datev = SL::DATEV->new( |
| 1416 |
exporttype => DATEV_ET_BUCHUNGEN, |
|
| 1417 |
format => DATEV_FORMAT_KNE, |
|
| 1418 | 1414 |
dbh => $dbh, |
| 1419 | 1415 |
trans_id => $form->{id},
|
| 1420 | 1416 |
); |
| 1421 | 1417 |
|
| 1422 |
$datev->export;
|
|
| 1418 |
$datev->generate_datev_data;
|
|
| 1423 | 1419 |
|
| 1424 | 1420 |
if ($datev->errors) {
|
| 1425 | 1421 |
die join "\n", $::locale->text('DATEV check returned errors:'), $datev->errors;
|
Auch abrufbar als: Unified diff
DATEV-Checks beim Buchen nutzen nun generate_datev_data