[freeside-commits] freeside/httemplate/search cust_main.cgi, 1.83, 1.83.2.1
Erik Levinson
levinse at wavetail.420.am
Tue May 3 22:44:31 PDT 2011
Update of /home/cvs/cvsroot/freeside/httemplate/search
In directory wavetail.420.am:/tmp/cvs-serv2971/httemplate/search
Modified Files:
Tag: FREESIDE_2_1_BRANCH
cust_main.cgi
Log Message:
add USPS-unvalidated customer addresses report, RT12402
Index: cust_main.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/search/cust_main.cgi,v
retrieving revision 1.83
retrieving revision 1.83.2.1
diff -u -w -d -r1.83 -r1.83.2.1
--- cust_main.cgi 22 Oct 2010 17:46:52 -0000 1.83
+++ cust_main.cgi 4 May 2011 05:44:28 -0000 1.83.2.1
@@ -83,6 +83,10 @@
% push @select, FS::TicketSystem->sql_num_customer_tickets. " as tickets";
% push @addl_headers, 'Tickets';
% push @addl_cols, 'tickets';
+% } elsif ( $query eq 'uspsunvalid' ) {
+% $search{'country'} = 'US';
+% $sortby=\*custnum_sort;
+% $orderby = "ORDER BY custnum";
% } else {
% die "unknown browse field $query";
% }
@@ -132,6 +136,10 @@
% $addl_qual .= ( $addl_qual ? ' AND ' : '' ).
% $FS::CurrentUser::CurrentUser->agentnums_sql;
%
+% if ( $cgi->param('browse') && $cgi->param('browse') eq 'uspsunvalid' ) {
+% $addl_qual .= ' AND ( length(zip) < 9 OR upper(address1) != address1 OR upper(city) != city ) ';
+% }
+%
% if ( $addl_qual ) {
% $qual .= ' AND ' if $qual;
% $qual .= $addl_qual;
More information about the freeside-commits
mailing list