X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fis.pl;h=cbddde60d85ed8b36233c465ef097a474ee34c4b;hb=a27cd427a2689b49a7642884edd2d24555305a4b;hp=c6c2bfe3441310dc18941d50a6d259d7ff602948;hpb=c25716f8e96b948bba33b880257191b7fab9fc5d;p=kivitendo-erp.git diff --git a/bin/mozilla/is.pl b/bin/mozilla/is.pl index c6c2bfe34..cbddde60d 100644 --- a/bin/mozilla/is.pl +++ b/bin/mozilla/is.pl @@ -35,10 +35,12 @@ use SL::FU; use SL::IS; use SL::PE; use SL::OE; -use SL::DB::Default; use Data::Dumper; use List::Util qw(max sum); +use SL::DB::Default; +use SL::DB::Customer; + require "bin/mozilla/io.pl"; require "bin/mozilla/invoice_io.pl"; require "bin/mozilla/arap.pl"; @@ -406,14 +408,11 @@ sub form_footer { # tax, total and subtotal calculations my ($tax, $subtotal); - $form->{taxaccounts_array} = [ split / /, $form->{taxaccounts} ]; - - my $paymet_id = $::form->{payment_id}; - IS->get_customer(\%myconfig, \%$form) if $form->{type} =~ /sales_(order|quotation)/; - $::form->{payment_id} = $paymet_id; + $form->{taxaccounts_array} = [ split(/ /, $form->{taxaccounts}) ]; - if ( $form->{vc} eq 'customer' && !$form->{taxincluded_changed_by_user} ) { - $form->{taxincluded} = defined($form->{taxincluded_checked}) ? $form->{taxincluded_checked} : $myconfig{taxincluded_checked}; + if( $form->{customer_id} && !$form->{taxincluded_changed_by_user} ) { + my $customer = SL::DB::Customer->new(id => $form->{customer_id})->load(); + $form->{taxincluded} = defined($customer->taxincluded_checked) ? $customer->taxincluded_checked : $myconfig{taxincluded_checked}; } foreach my $item (@{ $form->{taxaccounts_array} }) { @@ -799,7 +798,7 @@ sub print_and_post { } -sub use_as_template { +sub use_as_new { $main::lxdebug->enter_sub(); my $form = $main::form; @@ -811,8 +810,9 @@ sub use_as_template { $form->{paidaccounts} = 1; $form->{rowcount}--; $form->{invdate} = $form->current_date(\%myconfig); + $form->{duedate} = $form->get_duedate(\%myconfig, $form->{invdate}) || $form->{invdate}; - # remember pricegroups for "use as template" + # remember pricegroups for "use as new" IS->get_pricegroups_for_parts(\%myconfig, \%$form); set_pricegroup($_) for 1 .. $form->{rowcount};