Revision be157296
Von Jan Büren vor etwa 2 Jahren hinzugefügt
SL/DATEV/CSV.pm | ||
---|---|---|
490 | 490 |
{ |
491 | 491 |
kivi_datev_name => 'not yet implemented', |
492 | 492 |
}, |
493 |
{ |
|
494 |
kivi_datev_name => 'not yet implemented', |
|
495 |
}, |
|
496 |
{ |
|
497 |
kivi_datev_name => 'not yet implemented', |
|
498 |
}, |
|
499 |
{ |
|
500 |
kivi_datev_name => 'not yet implemented', |
|
501 |
}, |
|
502 |
{ |
|
503 |
kivi_datev_name => 'not yet implemented', |
|
504 |
}, # pos 120 |
|
493 |
# DATEV Prüfprogramm says: Only 116 fields are allowed |
|
494 |
#{ |
|
495 |
# kivi_datev_name => 'not yet implemented', |
|
496 |
#}, |
|
497 |
#{ |
|
498 |
# kivi_datev_name => 'not yet implemented', |
|
499 |
#}, |
|
500 |
#{ |
|
501 |
# kivi_datev_name => 'not yet implemented', |
|
502 |
#}, |
|
503 |
#{ |
|
504 |
# kivi_datev_name => 'not yet implemented', |
|
505 |
#}, # pos 120 |
|
505 | 506 |
); |
506 | 507 |
|
507 | 508 |
sub new { |
... | ... | |
554 | 555 |
next unless $datev->{$k}; |
555 | 556 |
$meta_datev{$k} = substr $datev->{$k}, 0, $v; |
556 | 557 |
} |
558 |
my $coa = $::instance_conf->get_coa eq 'Germany-DATEV-SKR03EU' ? '03' |
|
559 |
: $::instance_conf->get_coa eq 'Germany-DATEV-SKR04EU' ? '04' |
|
560 |
: ''; |
|
557 | 561 |
|
558 | 562 |
my @header_row_1 = ( |
559 | 563 |
"EXTF", "510", 21, "Buchungsstapel", 7, $created_on, "", "ki", |
560 | 564 |
"kivitendo-datev", "", $meta_datev{beraternr}, $meta_datev{mandantennr}, |
561 | 565 |
$self->first_day_of_fiscal_year->ymd(''), $length_of_accounts, |
562 | 566 |
$self->from->ymd(''), $self->to->ymd(''), "", "", 1, "", $self->locked, |
563 |
$default_curr, "", "", "","" |
|
567 |
$default_curr, "", "", "","", $coa, "", "", "", ""
|
|
564 | 568 |
); |
565 | 569 |
push @header, [ @header_row_1 ]; |
566 | 570 |
|
Auch abrufbar als: Unified diff
DATEV: Ungenauigkeiten, die das DATEV-Prüfprogramm noch anmeckert ausgemerzt