SF.net SVN: ledger-smb:[5602] trunk/LedgerSMB/AA.pm

[..hidden..]

Revision: 5602
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=5602&view=rev
Author:   einhverfr
Date:     2013-01-17 19:00:55 +0000 (Thu, 17 Jan 2013)
Log Message:
-----------
Changing credit limit calculations to exclude unapproved payments

Modified Paths:
--------------
    trunk/LedgerSMB/AA.pm

Modified: trunk/LedgerSMB/AA.pm
===================================================================
--- trunk/LedgerSMB/AA.pm	2013-01-17 10:11:49 UTC (rev 5601)
+++ trunk/LedgerSMB/AA.pm	2013-01-17 19:00:55 UTC (rev 5602)
@@ -895,7 +895,7 @@
 		SELECT SUM(ac.amount) 
                        * CASE WHEN '$arap' = 'ar' THEN -1 ELSE 1 END as used
 		  FROM $arap a
-                  JOIN acc_trans ac ON a.id = ac.trans_id
+                  JOIN acc_trans ac ON a.id = ac.trans_id and approved
                   JOIN account_link al ON al.account_id = ac.chart_id
                                        AND al.description IN ('AR', 'AP')
 		 WHERE entity_credit_account = ?

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