leeres bestbefore Feld anlegen bei Erzeugnis fertigen.

Wenn das MHD abgeschaltet war ($show_bestbefore = 0), dann
funktionierte das fertigen von Erzeugnissen nicht, da es
kein bestbefore-Feld gab.

diff --git a/bin/mozilla/wh.pl b/bin/mozilla/wh.pl
index 6af6980..3b732bc 100644 (file)
--- a/bin/mozilla/wh.pl
+++ b/bin/mozilla/wh.pl
@@ -434,6 +434,11 @@ sub create_assembly {
   if (!$form->{warehouse_id} || !$form->{bin_id}) {
     $form->error($locale->text('The warehouse or the bin is missing.'));
   }
+
+  if (!$main::show_best_before) {
+      $form->{bestbefore} = '';
+  }
+
   # WIESO war das nicht vorher schon ein %HASH?? ein hash ist ein hash! das hat mich mehr als eine Stunde gekostet herauszufinden. grr. jb 3.3.2009
   # Anm. jb 18.3. vielleicht auch nur meine unwissenheit in perl-datenstrukturen
   my %TRANSFER = (