Revision 2deb38c5
Von G. Richardson vor mehr als 7 Jahren hinzugefügt
| SL/DATEV.pm | ||
|---|---|---|
| 1397 | 1397 |
foreach my $column (@csv_columns) {
|
| 1398 | 1398 |
if (exists $column->{max_length} && $column->{kivi_datev_name} ne 'not yet implemented') {
|
| 1399 | 1399 |
# check max length |
| 1400 |
die "Incorrect lenght of field" if length($row->{ $column->{kivi_datev_name} }) > $column->{max_length};
|
|
| 1400 |
die "Incorrect length of field" if length($row->{ $column->{kivi_datev_name} }) > $column->{max_length};
|
|
| 1401 | 1401 |
} |
| 1402 | 1402 |
if (exists $column->{valid_check} && $column->{kivi_datev_name} ne 'not yet implemented') {
|
| 1403 | 1403 |
# more checks, listed as user warnings |
| SL/DATEV/CSV.pm | ||
|---|---|---|
| 243 | 243 |
my $length_of_accounts = length(SL::DB::Manager::Chart->get_first(where => [charttype => 'A'])->accno) // 4; |
| 244 | 244 |
my $default_curr = SL::DB::Default->get_default_currency; |
| 245 | 245 |
|
| 246 |
# datev metadata and the string lenght limits
|
|
| 246 |
# datev metadata and the string length limits
|
|
| 247 | 247 |
my %meta_datev; |
| 248 | 248 |
my %meta_datev_to_valid_length = ( |
| 249 | 249 |
beraternr => 7, |
Auch abrufbar als: Unified diff
DATEV: Typos