% include('/elements/header.html', $title ) %>
<% include('/elements/footer.html') %> <%init> die "access denied" unless $FS::CurrentUser::CurrentUser->access_right('Services: Wireless broadband services: Advanced search'); my $title = 'Broadband Service Report'; my $routernum = [ $cgi->param('routernum') || '' ]; $routernum = join(',', @$routernum); #false laziness w/report_cust_pkg.html my $custnum = ''; if ( $cgi->param('custnum') =~ /^(\d+)$/ ) { $custnum = $1; my $cust_main = qsearchs({ 'table' => 'cust_main', 'hashref' => { 'custnum' => $custnum }, 'extra_sql' => ' AND '. $FS::CurrentUser::CurrentUser->agentnums_sql, }) or die "unknown custnum $custnum"; $title .= ': '. $cust_main->name; } # exclude one-time charges, disabled packages, and packages with no # broadband services my %pkg_search = ( 'extra_sql' => " WHERE freq != '0' AND disabled IS NULL AND 0 < ( SELECT COUNT(*) FROM part_svc JOIN pkg_svc USING ( svcpart ) WHERE pkg_svc.pkgpart = part_pkg.pkgpart AND part_svc.svcdb = 'svc_broadband' AND pkg_svc.quantity > 0 )", ); %init> <%once> %once>