%# Copyright (c) 2004 Ivan Kohler %# Copyright (c) 2008 Freeside Internet Services, Inc. %# %# This work is made available to you under the terms of Version 2 of %# the GNU General Public License. A copy of that license should have %# been provided with this software, but in any event can be snarfed %# from www.gnu.org. %# %# This work is distributed in the hope that it will be useful, but %# WITHOUT ANY WARRANTY; without even the implied warranty of %# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU %# General Public License for more details.
<%$msg%>
% if (@Customers) {
(Check box to link) % foreach my $customer (@Customers) { % }
> <% &RT::URI::freeside::small_custview($customer->{'custnum'}, &RT::URI::freeside::FreesideGetConfig('countrydefault'), 1) |n %>
% } <%INIT> my ($msg); my $freeside_url = &RT::URI::freeside::FreesideURL(); warn "/Elements/AddCustomers called with CustomerString $CustomerString\n" if $Debug; my @Customers = (); if ( $CustomerString ) { @Customers = &RT::URI::freeside::smart_search( 'search' => $CustomerString ); } my @Services = (); if ($ServiceString) { @Services = (); #service_search(); } warn "/Elements/AddCustomers displaying ". scalar(@Customers). " customers\n" if $Debug; <%ARGS> $CustomerString => undef $ServiceString => undef $Debug => 0