Revision 15a85450
Von Jan Büren vor etwa 6 Jahren hinzugefügt
| SL/DATEV/CSV.pm | ||
|---|---|---|
| 113 | 113 |
type => 'Text', |
| 114 | 114 |
default => '', |
| 115 | 115 |
input_check => sub { my ($check) = @_; return 1 unless $check; return (ref (DateTime->from_kivitendo($check)) eq 'DateTime') },
|
| 116 |
formatter => sub { my ($input) = @_; return undef unless $input; return trim(DateTime->from_kivitendo($input)->strftime('%e%m%y')) },
|
|
| 116 |
formatter => sub { my ($input) = @_; return '' unless $input; return trim(DateTime->from_kivitendo($input)->strftime('%e%m%y')) },
|
|
| 117 | 117 |
valid_check => sub { my ($check) = @_; return 1 unless $check; return ($check =~ m/^[0-9]{5,6}$/) },
|
| 118 | 118 |
}, |
| 119 | 119 |
{
|
Auch abrufbar als: Unified diff
DATEV::CSV undef ist kein gültiger Wert für den DATEV-Export
fixt den Fehler beim Testfall