X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/db06bb909aa58d7c6482c7ea1acf7fa3bcf7e858..15f58ff3dfd79651a95535b53f864ea0e8cb6620:/SL/Controller/DeliveryPlan.pm

diff --git a/SL/Controller/DeliveryPlan.pm b/SL/Controller/DeliveryPlan.pm
index d05b46a12..ebb0dba50 100644
--- a/SL/Controller/DeliveryPlan.pm
+++ b/SL/Controller/DeliveryPlan.pm
@@ -42,7 +42,6 @@ sub action_list {
   $self->prepare_report;
 
   my $orderitems = $self->models->get;
-
   $self->calc_qtys($orderitems);
   $self->report_generator_list_objects(report => $self->{report}, objects => $orderitems);
 }
@@ -122,6 +121,9 @@ sub calc_qtys {
   my ($self, $orderitems) = @_;
   # using $orderitem->shipped_qty 40 times is far too slow. need to do it manually
   #
+
+  return unless scalar @$orderitems;
+
   my %orderitems_by_id = map { $_->id => $_ } @$orderitems;
 
   my $query = <<SQL;