Revert von 55e9890a und 1465da30

Hintergrund. Wird eine Rechnung gebucht, bei der eine Auftragsnummber
angegeben war, so werden beim erneuten Aufrufen der Rechnung durch
diesen Code gewisse sehr wichtige Felder (Zahlungsbedingungen,
Steuerzone, Auftragsdatum etc) mit den Werten aus dem Auftrag
überschrieben.

diff --git a/SL/OE.pm b/SL/OE.pm
index b9aba5c03c27d33e138a54a23f58f1b0c98040e8..63fcf1f06f4ece291516d127f08021d6f4cf3b3f 100644 (file)
--- a/SL/OE.pm
+++ b/SL/OE.pm
@@ -1285,39 +1285,6 @@ sub project_description {
   return $value;
 }
 
   return $value;
 }
 

-##########################
-# Get data for the submitted order id
-# from database
-#
-sub get_order_data_by_ordnumber {
-  $main::lxdebug->enter_sub();
-
-  my $self      = shift;
-  my %params    = @_;
-
-  Common::check_params(\%params, qw(ordnumber));
-
-  my $form     = $main::form;
-  my %myconfig = %main::myconfig;
-  my $dbh      = $form->get_standard_dbh();
-
-  my @values = ($params{ordnumber});
-
-  # We query the database for the fields we need using the submitted "ordnumber"
-  my $query = <<SQL;
-    SELECT o.payment_id, o.salesman_id, o.transdate AS orddate, o.taxzone_id, o.quonumber
-    FROM oe o
-    WHERE o.ordnumber = ?;
-SQL
-
-  # Do the actual query and return the results for later processing by our "frontend"
-  my $result = selectfirst_hashref_query($form, $dbh, $query, @values);
-
-  $main::lxdebug->leave_sub();
-
-  return $result;
-}
-

 1;
 
 __END__
 1;
 
 __END__

diff --git a/bin/mozilla/is.pl b/bin/mozilla/is.pl
index b38cfd1d5446b3793fcd32ff9c4fc151990c308f..f4ae1c9520e74ed5ca6bbeb880a9ddfa1fc3682d 100644 (file)
--- a/bin/mozilla/is.pl
+++ b/bin/mozilla/is.pl
@@ -155,14 +155,6 @@ 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 = OE->get_order_data_by_ordnumber(%$form) if $form->{ordnumber};
-
-  # 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);