X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fsearch%2Fsales_pkg_class.html;h=a586fc15614446086a85999d194466249197f6bf;hp=c57aae66db1bfc8939a9ba1fe861a1cc0cf11226;hb=fc263806f5e475559a0c4cfdb70a5f1cefe0ffa3;hpb=eedfe58ba50912dbfb490aa47930bbc0ab9e3ac9 diff --git a/httemplate/search/sales_pkg_class.html b/httemplate/search/sales_pkg_class.html index c57aae66d..a586fc156 100644 --- a/httemplate/search/sales_pkg_class.html +++ b/httemplate/search/sales_pkg_class.html @@ -1,14 +1,14 @@ -<& elements/search.html, - 'title' => $title, - 'name_singular' => 'package class', - 'header' => [ 'Package class', 'Sales', 'Commission', ], - 'fields' => [ 'classname', $sales_sub, $commission_sub, ], - 'links' => [ '', $sales_link, $commission_link ], - 'align' => 'lrr', - 'query' => { 'table' => 'sales_pkg_class', - 'hashref' => { 'salesnum' => $salesnum }, - }, - 'count_query' => "SELECT COUNT(*) FROM sales_pkg_class WHERE salesnum = $salesnum", #show some totals? +<& elements/commission.html, + 'title' => $title, + 'name_singular' => 'package class', + 'header' => [ 'Package class' ], + 'fields' => [ 'classname' ], + 'links' => [ '' ], + 'align' => 'l', + 'query' => \%query, + 'count_query' => $count_query, + 'sales_detail_link' => $sales_link, + 'credit_detail_link' => $commission_link, &> <%init> @@ -17,71 +17,31 @@ die "access denied" my $conf = new FS::Conf; -my $money_char = $conf->config('money_char') || '$'; - $cgi->param('salesnum') =~ /^(\d+)$/ or die 'illegal salesnum'; my $salesnum = $1; -my $sales = qsearchs('sales', { 'salesnum'=>$salesnum } ) - or die 'unknown salesnum'; - -my($beginning, $ending) = FS::UI::Web::parse_beginning_ending($cgi, ''); +my $sales = FS::sales->by_key($salesnum); -my $date_format = $conf->config('date_format') || '%m/%d/%Y'; +my $title = $sales->salesperson . ' commission'; -my $title = $sales->salesperson. ' commission'; -$title .= ': '. time2str($date_format, $beginning). ' to '. - time2str($date_format, $ending) - if $beginning; +my %query = ( 'table' => 'sales_pkg_class', + 'addl_from' => ' LEFT JOIN pkg_class USING (classnum)', + 'hashref' => { 'salesnum' => $salesnum }, + ); +my $count_query = "SELECT COUNT(*) FROM sales_pkg_class WHERE salesnum = $salesnum"; my $cust_main_sales = $cgi->param('cust_main_sales') eq 'Y' ? 'Y' : ''; +$query{'cust_main_sales'} = $cust_main_sales; -my $sales_link = [ 'cust_bill_pkg.cgi?'. - "begin=$beginning;". - "end=$ending;". - "cust_main_sales=$cust_main_sales;". - 'salesnum='. $sales->salesnum. ';'. - 'nottax=1;'. - 'classnum=', - 'classnum' +my $sales_link = [ 'cust_bill_pkg.cgi?nottax=1;'. + "cust_main_sales=$cust_main_sales;salesnum=$salesnum;" . + 'classnum=', + sub { shift->classnum || 0 }, ]; -my $sales_sub = sub { - my $sales_pkg_class = shift; - - #efficiency improvement: ask the db for a sum instead of all the records - my $total_recur = 0; - my @cust_bill_pkg = $sales->cust_bill_pkg( - $beginning, - $ending, - 'cust_main_sales' => $cust_main_sales, - 'classnum' => $sales_pkg_class->classnum, - ); - $total_recur += $_->recur foreach @cust_bill_pkg; - - $money_char. sprintf('%.2f', $total_recur); -}; - -my $commission_sub = sub { - my $sales_pkg_class = shift; - - #efficiency improvement: ask the db for a sum instead of all the records - my $total_credit = 0; - my @cust_credit = $sales->cust_credit( - $beginning, - $ending, - 'commission_classnum' => $sales_pkg_class->classnum, - ); - $total_credit += $_->amount foreach @cust_credit; - - $money_char. sprintf('%.2f', $total_credit); -}; - my $commission_link = [ 'cust_credit.html?'. - "begin=$beginning;". - "end=$ending;". - "cust_main_sales=$cust_main_sales;". - 'commission_salesnum='. $sales->salesnum. ';'. - 'commission_classnum=', + "cust_main_sales=$cust_main_sales;" . + "commission_salesnum=$salesnum;" . + 'classnum=', 'classnum' ];