From: Bernd Bleßmann <bernd@kivitendo-premium.de>
Date: Thu, 15 Aug 2019 10:39:05 +0000 (+0200)
Subject: Workflow Lieferantenauftrag->Kreditorenbuchung: mini Performance-Optimierung
X-Git-Tag: release-3.5.6.1~516
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=83a84630860795e669387cd3b15652f0563684d8;p=kivitendo-erp.git

Workflow Lieferantenauftrag->Kreditorenbuchung: mini Performance-Optimierung

Später benötigte Relationen direkt mit laden.
Dank an Geoffrey.
---

diff --git a/bin/mozilla/ap.pl b/bin/mozilla/ap.pl
index bba2af4c0..ed4d86439 100644
--- a/bin/mozilla/ap.pl
+++ b/bin/mozilla/ap.pl
@@ -1189,7 +1189,7 @@ sub add_from_purchase_order {
   return if !$::form->{id};
 
   my $order_id = delete $::form->{id};
-  my $order    = SL::DB::Order->new(id => $order_id)->load;
+  my $order    = SL::DB::Order->new(id => $order_id)->load(with => [ 'vendor', 'currency', 'payment_terms' ]);
 
   return if $order->type ne 'purchase_order';