[freeside-commits] freeside/httemplate/search cust_pay.cgi, 1.30.2.2, 1.30.2.3

Ivan,,, ivan at wavetail.420.am
Wed Feb 13 19:54:16 PST 2008


Update of /home/cvs/cvsroot/freeside/httemplate/search
In directory wavetail.420.am:/tmp/cvs-serv20144/httemplate/search

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	cust_pay.cgi 
Log Message:
add cust_pay.otaker field; populate it based on history on upgrades, and show the order taker on all payments (on customer view and payment search)  closes: #2953

Index: cust_pay.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/search/cust_pay.cgi,v
retrieving revision 1.30.2.2
retrieving revision 1.30.2.3
diff -u -d -r1.30.2.2 -r1.30.2.3
--- cust_pay.cgi	27 Oct 2007 04:46:21 -0000	1.30.2.2
+++ cust_pay.cgi	14 Feb 2008 03:54:13 -0000	1.30.2.3
@@ -7,6 +7,7 @@
                  'header'      => [ 'Payment',
                                     'Amount',
                                     'Date',
+                                    'By',
                                     FS::UI::Web::cust_header(),
                                   ],
                  'fields'      => [
@@ -32,14 +33,20 @@
                    },
                    sub { sprintf('$%.2f', shift->paid ) },
                    sub { time2str('%b %d %Y', shift->_date ) },
+                   sub { my $o = shift->otaker;
+                         $o = 'auto billing'          if $o eq 'fs_daily';
+                         $o = 'customer self-service' if $o eq 'fs_selfservice';
+                         $o;
+                       },
                    \&FS::UI::Web::cust_fields,
                  ],
                  #'align' => 'lrrrll',
-                 'align' => 'rrr'.FS::UI::Web::cust_aligns(),
+                 'align' => 'rrrc'.FS::UI::Web::cust_aligns(),
                  'links' => [
                    $link,
                    $link,
                    $link,
+                   '',
                    ( map { $_ ne 'Cust. Status' ? $cust_link : '' }
                          FS::UI::Web::cust_header()
                    ),
@@ -48,12 +55,14 @@
                               '',
                               '',
                               '',
+                              '',
                               FS::UI::Web::cust_colors(),
                             ],
                  'style' => [ 
                               '',
                               '',
                               '',
+                              '',
                               FS::UI::Web::cust_styles(),
                             ],
       )



More information about the freeside-commits mailing list