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

[..hidden..]

Revision: 4727
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=4727&view=rev
Author:   ehuelsmann
Date:     2012-05-19 06:59:11 +0000 (Sat, 19 May 2012)
Log Message:
-----------
Commit work-in-progress to fix customer e-mail lookup for aging e-mail function.

Modified Paths:
--------------
    branches/1.3/LedgerSMB/RP.pm
    branches/1.3/bin/rp.pl

Modified: branches/1.3/LedgerSMB/RP.pm
===================================================================
--- branches/1.3/LedgerSMB/RP.pm	2012-05-19 00:56:19 UTC (rev 4726)
+++ branches/1.3/LedgerSMB/RP.pm	2012-05-19 06:59:11 UTC (rev 4727)
@@ -1786,7 +1786,7 @@
         $form->{arap} = 'ap';
     }
         $query .= qq|
-		SELECT c.entity_id AS ctid, 
+		SELECT c.id AS ctid, 
 		       c.meta_number as $form->{ct}number, e.legal_name as name,
 		       '' as address1, '' as address2, '' as city,
 		       '' as state, 
@@ -1836,7 +1836,7 @@
                        ON (a.entity_credit_account = c.id)
 		  JOIN company e ON e.entity_id = c.entity_id
 		 WHERE $where
-              GROUP BY c.entity_id, c.meta_number, e.legal_name, a.invnumber,
+              GROUP BY c.id, c.meta_number, e.legal_name, a.invnumber,
                        a.transdate, a.ordnumber, a.duedate, a.invoice, a.id,
                        a.curr, a.ponumber, a.notes, c.language_code
 		HAVING sum(p.due) <> 0|;

Modified: branches/1.3/bin/rp.pl
===================================================================
--- branches/1.3/bin/rp.pl	2012-05-19 00:56:19 UTC (rev 4726)
+++ branches/1.3/bin/rp.pl	2012-05-19 06:59:11 UTC (rev 4727)
@@ -1072,6 +1072,7 @@
                 };
             $column_data{statement}{checked} = 'checked' if $ref->{checked};
             $hiddens{"curr_$i"} = $ref->{curr};
+            $hiddens{"$form->{ct}_id_$i"} = $ref->{ctid};
         }
 
 

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