in print_form korrekte Belegwerte an history_erp übergeben

Bei Verkaufsbelegen wurde in snumbers immer nur "ordnumber_"
geschrieben, jetzt wird der korrekte Name (z.B. invnumber_123)
geschrieben, so daß man in der Historiensuchmaschine nach
Verkaufsbelegen suchen kann.

diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl
index 515d08e..9c76b45 100644 (file)
--- a/bin/mozilla/io.pl
+++ b/bin/mozilla/io.pl
@@ -1335,7 +1335,7 @@ sub print_form {
       call_sub($display_form);
       # saving the history
       if(!exists $form->{addition}) {
-        $form->{snumbers} = qq|ordnumber_| . $form->{ordnumber};
+        $form->{snumbers} = "${inv}number" . "_" . $form->{"${inv}number"};
         $form->{addition} = "PRINTED";
         $form->save_history;
       }
@@ -1576,7 +1576,7 @@ sub print_form {
 
 # saving the history
   if(!exists $form->{addition}) {
-    $form->{snumbers} = qq|ordnumber_| . $form->{ordnumber};
+    $form->{snumbers} = "${inv}number" . "_" . $form->{"${inv}number"};
     if($form->{media} =~ /printer/) {
       $form->{addition} = "PRINTED";
     }