Setzen des Stornoflags auf "0" anstelle von NULL.
authorMoritz Bunkus <m.bunkus@linet-services.de>
Fri, 8 Jun 2007 14:28:40 +0000 (14:28 +0000)
committerMoritz Bunkus <m.bunkus@linet-services.de>
Fri, 8 Jun 2007 14:28:40 +0000 (14:28 +0000)
bin/mozilla/ap.pl
bin/mozilla/ar.pl
bin/mozilla/gl.pl
bin/mozilla/ir.pl
bin/mozilla/is.pl

index 6f86e90..5fa7710 100644 (file)
@@ -993,6 +993,7 @@ sub post {
   $form->{AP}{amount_1} = $debitaccno;
   $form->{AP}{payables} = $payablesaccno;
   $form->{taxkey}       = $taxkey;
+  $form->{storno}       = 0;
 
   $form->{id} = 0 if $form->{postasnew};
 
index c653382..fbdbbc0 100644 (file)
@@ -1023,8 +1023,11 @@ sub post {
   }
 
   $form->{AR}{receivables} = $form->{ARselected};
+  $form->{storno}          = 0;
 
   $form->{id} = 0 if $form->{postasnew};
+
+
   if (AR->post_transaction(\%myconfig, \%$form)) {
     # saving the history
     if(!exists $form->{addition} && $form->{id} ne "") {
index ea6708f..18e3fa5 100644 (file)
@@ -1760,7 +1760,8 @@ sub post_transaction {
 sub post {
   $lxdebug->enter_sub();
 
-  $form->{title} = $locale->text("$form->{title} General Ledger Transaction");
+  $form->{title}  = $locale->text("$form->{title} General Ledger Transaction");
+  $form->{storno} = 0;
 
   post_transaction();
 
index 701c91b..99ff958 100644 (file)
@@ -1141,6 +1141,7 @@ sub post {
 
   ($form->{AP})      = split /--/, $form->{AP};
   ($form->{AP_paid}) = split /--/, $form->{AP_paid};
+  $form->{storno}    = 0;
 
   $form->{id} = 0 if $form->{postasnew};
 
index feb43ac..fbfabe6 100644 (file)
@@ -1463,6 +1463,7 @@ sub post {
 
   ($form->{AR})      = split /--/, $form->{AR};
   ($form->{AR_paid}) = split /--/, $form->{AR_paid};
+  $form->{storno}    = 0;
 
   $form->{label} = $locale->text('Invoice');