X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fsearch%2Freport_cust_bill.html;h=51618fb2407dafc52cf27a9000c8409c1bc7319f;hb=d7a9f5c6dbf89aa85c281578bb553e04a573cbd0;hp=00d566a6221c20801bbfcb5ae1f1bf0f856a98eb;hpb=d99758f77f8d2f839934498af839109596e216b8;p=freeside.git diff --git a/httemplate/search/report_cust_bill.html b/httemplate/search/report_cust_bill.html index 00d566a62..51618fb24 100644 --- a/httemplate/search/report_cust_bill.html +++ b/httemplate/search/report_cust_bill.html @@ -1,51 +1,101 @@ -<% include('/elements/header.html', 'Invoice Report' ) %> +<& /elements/header.html, mt($title, @title_arg) &>
-<% include('/elements/footer.html') %> +<& /elements/footer.html &> <%init> die "access denied" unless $FS::CurrentUser::CurrentUser->access_right('List invoices'); +my $conf = new FS::Conf; + +my $title = 'Invoice Report'; +#false laziness w/report_cust_pkg.html +my @title_arg = (); + +my $custnum = ''; +my $cust_main = ''; +if ( $cgi->param('custnum') =~ /^(\d+)$/ ) { + $custnum = $1; + $cust_main = qsearchs({ + 'table' => 'cust_main', + 'hashref' => { 'custnum' => $custnum }, + 'extra_sql' => ' AND '. $FS::CurrentUser::CurrentUser->agentnums_sql, + }) or die "unknown custnum $custnum"; + $title .= ': [_1]'; + push @title_arg, $cust_main->name; +} + %init>