httemplate/misc/xmlhttp-cust_main-search.cgi

   1 %
   2 %   my $sub = $cgi->param('sub');
   3 %
   4 %   if ( $sub eq 'custnum_search' ) {
   5 %
   6 %     my $custnum = $cgi->param('arg');
   7 %     my $cust_main = qsearchs('cust_main', { 'custnum' => $custnum } );
   8 %
   9 %
  10 "<% $cust_main ? $cust_main->name : '' %>"
  11 % } elsif ( $sub eq 'smart_search' ) {
  12 %
  13 %     my $string = $cgi->param('arg');
  14 %     my @cust_main = smart_search( 'search' => $string );
  15 %     my $return = [ map [ $_->custnum, $_->name ], @cust_main ];
  16 %
  17 %
  18 <% objToJson($return) %>
  19 % }
  20
  21
  22