[freeside-commits] freeside/httemplate/misc xmlhttp-cust_main-address_standardize.html, 1.4, 1.5
Ivan,,,
ivan at wavetail.420.am
Sat Mar 21 19:47:39 PDT 2009
Update of /home/cvs/cvsroot/freeside/httemplate/misc
In directory wavetail.420.am:/tmp/cvs-serv28830
Modified Files:
xmlhttp-cust_main-address_standardize.html
Log Message:
fix usps address standardization when the zip returned has no zip+4, RT#4882
Index: xmlhttp-cust_main-address_standardize.html
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/xmlhttp-cust_main-address_standardize.html,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- xmlhttp-cust_main-address_standardize.html 3 Dec 2008 01:42:26 -0000 1.4
+++ xmlhttp-cust_main-address_standardize.html 22 Mar 2009 02:47:36 -0000 1.5
@@ -50,6 +50,9 @@
unless ( $verifier->is_error ) {
+ my $zip = $hash->{Zip5};
+ $zip .= '-'. $hash->{Zip4} if $hash->{Zip4} =~ /\d/;
+
$return = {
%$return,
"new_$pre".'company' => $hash->{FirmName},
@@ -57,7 +60,7 @@
"new_$pre".'address2' => $hash->{Address1},
"new_$pre".'city' => $hash->{City},
"new_$pre".'state' => $hash->{State},
- "new_$pre".'zip' => $hash->{Zip5}. '-'. $hash->{Zip4},
+ "new_$pre".'zip' => $zip,
};
my @fields = (qw( company address1 address2 city state zip )); #hmm
More information about the freeside-commits
mailing list