Recommit von r1202 von skoehler: Bug 381, Auftrags-, Angebots-, Rechnungsnummern...
authorMoritz Bunkus <m.bunkus@linet-services.de>
Wed, 22 Nov 2006 16:47:00 +0000 (16:47 +0000)
committerMoritz Bunkus <m.bunkus@linet-services.de>
Wed, 22 Nov 2006 16:47:00 +0000 (16:47 +0000)
bin/mozilla/ir.pl
bin/mozilla/oe.pl

index c3374b6..75b44c1 100644 (file)
@@ -993,6 +993,11 @@ sub post {
 
   $form->{id} = 0 if $form->{postasnew};
 
+  # get new invnumber in sequence if no invnumber is given or if posasnew was requested
+  if (!$form->{invnumber} || $form->{postasnew}) {
+    $form->{invnumber} = $form->update_defaults(\%myconfig, "invnumber");
+  }
+
   $form->redirect(  $locale->text('Invoice')
                   . " $form->{invnumber} "
                   . $locale->text('posted!'))
index 67c99bd..410a06e 100644 (file)
@@ -1943,8 +1943,10 @@ sub save_and_close {
 
   }
 
-  $form->{$ordnumber} = $form->update_defaults(\%myconfig, $numberfld)
-    unless $form->{$ordnumber};
+  # get new number in sequence if no number is given or if saveasnew was requested
+  if (!$form->{$ordumber} || $form->{saveasnew}) {
+    $form->{$ordnumber} = $form->update_defaults(\%myconfig, $numberfld);
+  }
 
   $form->redirect(
             $form->{label} . " $form->{$ordnumber} " . $locale->text('saved!'))