SF.net SVN: ledger-smb:[2512] trunk/scripts/recon.pl

[..hidden..]

Revision: 2512
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=2512&view=rev
Author:   einhverfr
Date:     2009-03-18 22:14:54 +0000 (Wed, 18 Mar 2009)

Log Message:
-----------
Recon now saves on every update

Modified Paths:
--------------
    trunk/scripts/recon.pl

Modified: trunk/scripts/recon.pl
===================================================================
--- trunk/scripts/recon.pl	2009-03-18 20:04:51 UTC (rev 2511)
+++ trunk/scripts/recon.pl	2009-03-18 22:14:54 UTC (rev 2512)
@@ -83,6 +83,7 @@
 		column  => $recon->{line_order}}
        );
     }
+    $recon->save();
     $recon->update();
     _display_report($recon);
 }
@@ -405,7 +406,7 @@
             $l->{our_credits} = $recon->format_amount({amount => $l->{our_credits}, money => 1});
         }
 	$recon->{statement_gl_calc} = $recon->{their_total} 
-		- $recon->{outstanding_total};
+		+ $recon->{outstanding_total};
 	$recon->{out_of_balance} = $recon->{their_total} - $recon->{our_total};
         $recon->{cleared_total} = $recon->format_amount({amount => $recon->{cleared_total}, money => 1});
         $recon->{outstanding_total} = $recon->format_amount({amount => $recon->{outstanding_total}, money => 1});


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