Revision 80fad2fd
Von Jan Büren vor mehr als 6 Jahren hinzugefügt
SL/DATEV/CSV.pm | ||
---|---|---|
112 | 112 |
type => 'Text', |
113 | 113 |
default => '', |
114 | 114 |
input_check => sub { my ($check) = @_; return 1 unless $check; return (ref (DateTime->from_kivitendo($check)) eq 'DateTime') }, |
115 |
formatter => sub { my ($input) = @_; return DateTime->from_kivitendo($input)->strftime('%d%m%y') },
|
|
116 |
valid_check => sub { my ($check) = @_; return ($check =~ m/^[0-9]{6}$/) }, |
|
115 |
formatter => sub { my ($input) = @_; my $date = DateTime->from_kivitendo($input)->strftime('%e%m%y'); $date =~ s/^\s+//; return $date },
|
|
116 |
valid_check => sub { my ($check) = @_; return ($check =~ m/^[0-9]{5,6}$/) },
|
|
117 | 117 |
}, |
118 | 118 |
{ |
119 | 119 |
kivi_datev_name => 'not yet implemented', |
Auch abrufbar als: Unified diff
DATEV-CSV-Export Belegfeld 2 6- oder 5-stellig formatieren
Ansonsten gibt es bei führenden 0en immer eine Warnung beim
DATEV-Import.