% if ( $salesnum ) { % my $url = 'sales_pkg_class.html?' . $cgi->query_string; <% $cgi->redirect($url) %> % } else { <& elements/commission.html, 'title' => $title, 'name_singular' => 'sales person', 'header' => [ 'Sales person' ], 'fields' => [ 'salesperson' ], 'links' => [ '' ], 'align' => 'l', 'query' => \%query, 'count_query' => $count_query, 'disableable' => 1, 'sales_detail_link' => $sales_link, 'credit_detail_link' => $commission_link, &> % } <%init> die "access denied" unless $FS::CurrentUser::CurrentUser->access_right('Financial reports'); my $conf = new FS::Conf; my %query = ( 'table' => 'sales' ); my $count_query = "SELECT COUNT(*) FROM sales"; if ( $cgi->param('agentnum') =~ /^(\d+)$/ ) { $query{hashref}->{agentnum} = $1; $count_query .= " WHERE agentnum = $1"; } my $salesnum = ''; if ( $cgi->param('salesnum') =~ /^(\d+)$/ ) { $salesnum = $1; } else { $cgi->delete('salesnum'); } my $title = 'Sales person commission'; my $cust_main_sales = $cgi->param('cust_main_sales') eq 'Y' ? 'Y' : ''; $query{'cust_main_sales'} = $cust_main_sales; my $sales_link = [ 'sales_pkg_class.html?'. "cust_main_sales=$cust_main_sales;salesnum=", 'salesnum' ]; my $commission_link = [ 'cust_credit.html?'. "cust_main_sales=$cust_main_sales;commission_salesnum=", 'salesnum' ];