X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/25160f38f3485069e768f84e7fa7d2adec8415bb..a0f6a00c1db8152633841777a95f5420b56b42ee:/bin/mozilla/io.pl

diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl
index 9518e82c3..d85c367c2 100644
--- a/bin/mozilla/io.pl
+++ b/bin/mozilla/io.pl
@@ -1716,6 +1716,7 @@ sub print_form {
       call_sub($display_form);
       # saving the history
   	  if(!exists $form->{addition}) {
+        $form->{snumber} = qq|ordnumber_| . $form->{ordnumber}; 
   	    $form->{addition} = "PRINTED";
   	    $form->save_history($form->dbconnect(\%myconfig));
       }
@@ -1908,6 +1909,7 @@ sub print_form {
 
 # saving the history
   if(!exists $form->{addition}) {
+    $form->{snumber} = qq|ordnumber_| . $form->{ordnumber};
     if($form->{media} =~ /printer/) {
     	$form->{addition} = "PRINTED";
     }