X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fsearch%2Freport_receivables.cgi;h=d675346f0e86e9443f835ac372bf75ece3293515;hb=fadaa67e77ad8d5d966e252aba7f193e9e3840e3;hp=77e1d4a3603817a2dac5dbbd40ad8bc34b0d9a26;hpb=2f3390c76813f42a5456730f58a5fcb69d320bde;p=freeside.git

diff --git a/httemplate/search/report_receivables.cgi b/httemplate/search/report_receivables.cgi
index 77e1d4a36..d675346f0 100755
--- a/httemplate/search/report_receivables.cgi
+++ b/httemplate/search/report_receivables.cgi
@@ -118,14 +118,18 @@ END
   my $conf = new FS::Conf;
   my $money_char = $conf->config('money_char') || '$';
 
+  my $align = join('', map { /#/ ? 'r' : 'l' } FS::UI::Web::cust_header() ).
+             'crrrrr';
+
+  my $clink = [ "${p}view/cust_main.cgi?", 'custnum' ];
+
 %><%= include( 'elements/search.html',
                  'title'       => 'Accounts Receivable Aging Summary',
                  'name'        => 'customers',
                  'query'       => $sql_query,
                  'count_query' => $count_sql,
                  'header'      => [
-                                    '#',
-                                    'Customer',
+                                    FS::UI::Web::cust_header(),
                                     'Status', # (me)',
                                     #'Status', # (cust_main)',
                                     '0-30',
@@ -135,8 +139,12 @@ END
                                     'Total',
                                   ],
                  'footer'      => [
-                                    '',
                                     'Total',
+                                    ( map '',
+                                          ( 1 .. 
+                                            scalar(FS::UI::Web::cust_header()-1)
+                                          )
+                                    ),
                                     '',
                                     #'',
                                     sprintf( $money_char.'%.2f',
@@ -151,8 +159,7 @@ END
                                              $row->{'owed_total'} ),
                                   ],
                  'fields'      => [
-                                    'custnum',
-                                    'name',
+                                    \&FS::UI::Web::cust_fields,
                                     sub {
                                           my $row = shift;
                                           my $status = 'Cancelled';
@@ -180,8 +187,7 @@ END
                                                    shift->get('owed_total') ) },
                                   ],
                  'links'       => [
-                                    [ "${p}view/cust_main.cgi?", 'custnum' ],
-                                    [ "${p}view/cust_main.cgi?", 'custnum' ],
+                                    ( map $clink, FS::UI::Web::cust_header() ),
                                     '',
                                     #'',
                                     '',
@@ -191,14 +197,15 @@ END
                                     '',
                                   ],
                  #'align'       => 'rlccrrrrr',
-                 'align'       => 'rlcrrrrr',
+                 'align'       => $align,
                  #'size'        => [ '', '', '-1', '-1', '', '', '', '',  '', ],
                  #'style'       => [ '', '',  'b',  'b', '', '', '', '', 'b', ],
-                 'size'        => [ '', '', '-1', '', '', '', '',  '', ],
-                 'style'       => [ '', '',  'b', '', '', '', '', 'b', ],
+                 'size'        => [ ( map '', FS::UI::Web::cust_header() ),
+                                    '-1', '', '', '', '',  '', ],
+                 'style'       => [ ( map '', FS::UI::Web::cust_header() ),
+                                    'b', '', '', '', '', 'b', ],
                  'color'       => [
-                                    '',
-                                    '',
+                                    ( map '', FS::UI::Web::cust_header() ),
                                     sub {  
                                           my $row = shift;
                                           my $status = 'Cancelled';
@@ -223,4 +230,3 @@ END
 
              )
 %>
-