From: Mark Wells Date: Mon, 9 Apr 2012 20:12:31 +0000 (-0700) Subject: duplicate checking on 2.3, #17290 X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=8824f2dc4410251c89e4913c713ceb11bb312e88;p=freeside.git duplicate checking on 2.3, #17290 --- diff --git a/httemplate/misc/xmlhttp-cust_main-duplicates.html b/httemplate/misc/xmlhttp-cust_main-duplicates.html new file mode 100644 index 000000000..6654b3e39 --- /dev/null +++ b/httemplate/misc/xmlhttp-cust_main-duplicates.html @@ -0,0 +1,68 @@ +% if ( @cust_main ) { +

Duplicate customer
+Choose an existing customer + + +% foreach (@cust_main) { +% my $custnum = $_->custnum; + + + + + +% } #foreach cust_main + +
<% $custnum %>: + <% $_->name %>—<%$_->ucfirst_cust_status%>
+<% $_->address1 %>
+<% $_->city %>, <% $_->state %>  <% $_->zip %> +
+ +
+ + + + + + + + +% } +%# else return nothing +<%init> + +die "access denied" + unless $FS::CurrentUser::CurrentUser->access_right('List customers'); + +my $conf = new FS::Conf; + +my $sub = $cgi->param('sub'); +my $hashref = decode_json($cgi->param('arg')); +my @cust_main = qsearch('cust_main', $hashref); + +my $set_to_customer = <
+ + + +
+ +