From: Jan Büren <jan@kivitendo.de>
Date: Wed, 18 Aug 2021 09:20:21 +0000 (+0200)
Subject: Seriennummer in LS auf Pos. 1, falls Pflichtfeld
X-Git-Tag: kivitendo-mebil_0.1-0~10^2~2^2~394
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=e503a1d422ed53d99d68db3ebbc6d4dfe11dea7f;p=kivitendo-erp.git

Seriennummer in LS auf Pos. 1, falls Pflichtfeld

... aber nur wenn die Positionen im Lieferschein auch das
Pflichtfeld Seriennummer enthalten
---

diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl
index a69521b12..e889f2aef 100644
--- a/bin/mozilla/io.pl
+++ b/bin/mozilla/io.pl
@@ -172,8 +172,12 @@ sub display_row {
   );
   # serialnr is important for delivery_orders
   if ($form->{type} eq 'sales_delivery_order') {
-    splice @row2_sort, 0, 1;
-    splice @header_sort, 4, 0, "serialnr";
+    for my $i (1 .. $form->{rowcount} - 1) {
+      next unless $form->{"has_sernumber_$i"};
+      splice @row2_sort, 0, 1;
+      splice @header_sort, 4, 0, "serialnr";
+      last;
+    }
   }
 
   my %column_def = (