have expanded the AR aging summary to include other fields. Have not yet populated...
authorC.J. Adams-Collier <cjac@colliertech.org>
Tue, 9 Sep 2014 20:16:21 +0000 (13:16 -0700)
committerC.J. Adams-Collier <cjac@colliertech.org>
Wed, 17 Sep 2014 00:19:37 +0000 (17:19 -0700)
FS/FS/ConfDefaults.pm
httemplate/elements/select-cust-fields.html
httemplate/search/elements/cust_main_dayranges.html
httemplate/search/report_receivables.html

index 191ff85..df8024a 100644 (file)
@@ -33,6 +33,9 @@ sub cust_fields_avail { (
   'Cust# | Cust. Status | Customer' =>
     'custnum | Status | Last, First or Company (Last, First)',
 
+  'Cust# | Day phone | Night phone | Fax number' =>
+    'custnum | (all phones)',
+
   'Cust. Status | Name | Company' =>
     'Status | Last, First | Company',
   'Cust# | Cust. Status | Name | Company' =>
index 98feaf8..5e30638 100644 (file)
@@ -1,22 +1,18 @@
-%
-%  my( $cust_fields, %opt ) = @_;
-%
-%  use FS::ConfDefaults;
-%  $opt{'avail_fields'} ||= [ FS::ConfDefaults->cust_fields_avail() ];
-%
-%  tie my %hash, 'Tie::IxHash', @{ $opt{'avail_fields'} };
-%
-%
+<%init>
+  my( $cust_fields, %opt ) = @_;
 
+  use FS::ConfDefaults;
+  $opt{'avail_fields'} ||= [ FS::ConfDefaults->cust_fields_avail() ];
+
+  tie my %hash, 'Tie::IxHash', @{ $opt{'avail_fields'} };
+</%init>
 
 <SELECT NAME="cust_fields">
 
   <OPTION VALUE="">(configured default)
-% 
-%     foreach my $value ( keys %hash ) { 
-
 
-       <OPTION VALUE="<% $value %>"><% $hash{$value} %>
+% foreach my $value ( keys %hash ) { 
+  <OPTION VALUE="<% $value %>"><% $hash{$value} %>
 % } 
 
 
index 4933652..e78f2a4 100644 (file)
@@ -15,12 +15,13 @@ Example:
   };
 
 </%doc>
+
 <& search.html,
                  'name'        => 'customers',
                  'query'       => $sql_query,
                  'count_query' => $count_sql,
-                 'header'      => [ 
-                                    FS::UI::Web::cust_header(),
+                 'header'      => [
+                                   @cust_header = FS::UI::Web::cust_header($cgi->param('cust_fields')),
                                     '0-30',
                                     '30-60',
                                     '60-90',
@@ -30,12 +31,8 @@ Example:
                                   ],
                  'footer'      => [
                                     'Total',
-                                    ( map '',
-                                          ( 1 .. 
-                                            scalar(FS::UI::Web::cust_header()-1)
-                                          ),
-                                    ),
-                                    
+                                    ( map '', ( 1 .. $#cust_header ) ),
+
                                     sprintf( $money_char.'%.2f',
                                              $row->{'rangecol_0_30'} ),
                                     sprintf( $money_char.'%.2f',
@@ -58,9 +55,7 @@ Example:
                                     @pay_labels,
                                   ],
                  'links'       => [
-                                    ( map { $_ ne 'Cust. Status' ? $clink : '' }
-                                          FS::UI::Web::cust_header()
-                                    ),
+                                    ( map { $_ ne 'Cust. Status' ? $clink : '' } @cust_header) ),
                                     '',
                                     '',
                                     '',
@@ -68,10 +63,10 @@ Example:
                                     '',
                                     @pay_links,
                                   ],
-                 'align'       => FS::UI::Web::cust_aligns(). 
+                 'align'       => FS::UI::Web::cust_aligns().
                                    'rrrrr'.
                                   ('c' x @pay_labels),
-                 'size'        => [ ( map '', FS::UI::Web::cust_header() ),
+                 'size'        => [ ( map '', @cust_header ) ),
                                     #'-1', '', '', '', '',  '', ],
                                     '', '', '', '', '',  '', 
                                     ( map '', @pay_labels ),
@@ -99,6 +94,7 @@ Example:
 <%init>
 
 my %opt = @_;
+my @cust_header = ();
 
 #actually need to auto-generate other things too for a passed-in ranges to work
 my $ranges = $opt{'ranges'} ? delete($opt{'ranges'}) : [
index 854b24a..20a98be 100755 (executable)
@@ -65,6 +65,15 @@ function toggle(obj) {
                 } 
   &>
 
+  <TR>
+    <TH CLASS="background" COLSPAN=2>&nbsp;</TH>
+  </TR>
+
+  <TR>
+    <TH CLASS="background" COLSPAN=2 ALIGN="left"><FONT SIZE="+1"><% mt('Display options') |h %></FONT></TH>
+  </TR>
+  <& /elements/tr-select-cust-fields.html &>
+
 </TABLE>
 
 <BR><INPUT TYPE="submit" VALUE="Get Report">