Zusätzliche Auftragsfelder beim Laden von Rechnungen holen.

[kivitendo-erp.git] / bin / mozilla / is.pl

diff --git a/bin/mozilla/is.pl b/bin/mozilla/is.pl
index 4b8b8175d0538c87ed5738ac0b018ec2f78663e3..ad0c99080d941e0355f9327d9a02b43c9894b771 100644 (file)
--- a/bin/mozilla/is.pl
+++ b/bin/mozilla/is.pl
@@ -155,6 +155,14 @@ sub invoice_links {
     $ref->{name} = $form->quote($ref->{name});
   }
 
     $ref->{name} = $form->quote($ref->{name});
   }
 

+  # Load data for a specific order and update form fields
+  my $order_data = IS->get_order_data();
+
+  # Copy the fields we need to %form
+  for my $key (qw(payment_id salesman_id orddate taxzone_id quonumber)) {
+    $form->{$key} = $order_data->{$key};
+  }
+

   $form->restore_vars(qw(id));
 
   IS->retrieve_invoice(\%myconfig, \%$form);
   $form->restore_vars(qw(id));
 
   IS->retrieve_invoice(\%myconfig, \%$form);


@@ -162,6 +170,7 @@ sub invoice_links {
   $form->restore_vars(qw(taxincluded)) if $form->{id};
   $form->restore_vars(qw(salesman_id)) if $main::editing;
 
   $form->restore_vars(qw(taxincluded)) if $form->{id};
   $form->restore_vars(qw(salesman_id)) if $main::editing;
 

+

   # build vendor/customer drop down comatibility... don't ask
   if (@{ $form->{"all_customer"} }) {
     $form->{"selectcustomer"} = 1;
   # build vendor/customer drop down comatibility... don't ask
   if (@{ $form->{"all_customer"} }) {
     $form->{"selectcustomer"} = 1;