X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fap.pl;h=f5ed94069fa891a6931de30add1e08ae56e2e6ac;hb=258fa6e10c842208947c9fd895c4e91fafbd30e9;hp=75631fa292b690dadaf8fbae0cbd5b48aa71bc1e;hpb=847832197409889127e0192f168c3f7e52ef1944;p=kivitendo-erp.git diff --git a/bin/mozilla/ap.pl b/bin/mozilla/ap.pl index 75631fa29..f5ed94069 100644 --- a/bin/mozilla/ap.pl +++ b/bin/mozilla/ap.pl @@ -427,7 +427,7 @@ selectvendor } | - + @@ -699,7 +699,7 @@ $jsscript $column_data{"exchangerate_$i"} = qq||; $column_data{"datepaid_$i"} = qq||; + |; $column_data{"source_$i"} = qq||; $column_data{"memo_$i"} = @@ -852,6 +852,8 @@ sub update { $form->{invtotal} = 0; + delete @{ $form }{ grep { m/^tax_\d+$/ } keys %{ $form } }; + map { $form->{$_} = $form->parse_amount(\%myconfig, $form->{$_}) } qw(exchangerate creditlimit creditremaining);
| . $locale->text('Vendor') . qq|$vendor $vendor $exchangerate -