SF.net SVN: ledger-smb:[4464] branches/1.3

[..hidden..]

Revision: 4464
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=4464&view=rev
Author:   einhverfr
Date:     2012-03-15 06:35:28 +0000 (Thu, 15 Mar 2012)
Log Message:
-----------
Correcting bug 3503463, unable to save when duedate missing

Modified Paths:
--------------
    branches/1.3/Changelog
    branches/1.3/bin/aa.pl
    branches/1.3/bin/ir.pl
    branches/1.3/bin/is.pl

Modified: branches/1.3/Changelog
===================================================================
--- branches/1.3/Changelog	2012-03-15 05:08:19 UTC (rev 4463)
+++ branches/1.3/Changelog	2012-03-15 06:35:28 UTC (rev 4464)
@@ -4,6 +4,7 @@
 
 Changelog for 1.3.14
 * Argentina (Spanish) translation and charts of accounts added. (Andres B)
+* Fixed errors saving when duedate is blank, bug 3503463 (Chris T)
 
 Andres B is Andres Basile
 

Modified: branches/1.3/bin/aa.pl
===================================================================
--- branches/1.3/bin/aa.pl	2012-03-15 05:08:19 UTC (rev 4463)
+++ branches/1.3/bin/aa.pl	2012-03-15 06:35:28 UTC (rev 4464)
@@ -1278,6 +1278,9 @@
        &update;
        $form->finalize_request();
     }
+    if (!$form->{duedate}){
+          $form->{duedate} = $form->{transdate};
+    }
     $label =
       ( $form->{vc} eq 'customer' )
       ? $locale->text('Customer missing!')

Modified: branches/1.3/bin/ir.pl
===================================================================
--- branches/1.3/bin/ir.pl	2012-03-15 05:08:19 UTC (rev 4463)
+++ branches/1.3/bin/ir.pl	2012-03-15 06:35:28 UTC (rev 4464)
@@ -1252,6 +1252,9 @@
        &update;
        $form->finalize_request();
     }
+    if (!$form->{duedate}){
+          $form->{duedate} = $form->{transdate};
+    }
 
     $form->isblank( "transdate", $locale->text('Invoice Date missing!') );
     $form->isblank( "vendor",    $locale->text('Vendor missing!') );

Modified: branches/1.3/bin/is.pl
===================================================================
--- branches/1.3/bin/is.pl	2012-03-15 05:08:19 UTC (rev 4463)
+++ branches/1.3/bin/is.pl	2012-03-15 06:35:28 UTC (rev 4464)
@@ -1292,6 +1292,9 @@
        &update;
        $form->finalize_request();
     }
+    if (!$form->{duedate}){
+          $form->{duedate} = $form->{transdate};
+    }
     $form->isblank( "transdate", $locale->text('Invoice Date missing!') );
     $form->isblank( "customer",  $locale->text('Customer missing!') );
 

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.