diff options
Diffstat (limited to 'httemplate/view/cust_bill-pdf.cgi')
-rwxr-xr-x | httemplate/view/cust_bill-pdf.cgi | 40 |
1 files changed, 0 insertions, 40 deletions
diff --git a/httemplate/view/cust_bill-pdf.cgi b/httemplate/view/cust_bill-pdf.cgi deleted file mode 100755 index 51e47e00d..000000000 --- a/httemplate/view/cust_bill-pdf.cgi +++ /dev/null @@ -1,40 +0,0 @@ -<% $pdf %> -<%init> - -die "access denied" - unless $FS::CurrentUser::CurrentUser->access_right('View invoices'); - -my( $invnum, $template, $notice_name ); -my($query) = $cgi->keywords; -if ( $query =~ /^((.+)-)?(\d+)(.pdf)?$/ ) { - $template = $2; - $invnum = $3; - $notice_name = 'Invoice'; -} else { - $invnum = $cgi->param('invnum'); - $invnum =~ s/\.pdf//i; - $template = $cgi->param('template'); - $notice_name = ( $cgi->param('notice_name') || 'Invoice' ); -} - -my %opt = ( - 'template' => $template, - 'notice_name' => $notice_name, -); - -my $cust_bill = qsearchs({ - 'select' => 'cust_bill.*', - 'table' => 'cust_bill', - 'addl_from' => 'LEFT JOIN cust_main USING ( custnum )', - 'hashref' => { 'invnum' => $invnum }, - 'extra_sql' => ' AND '. $FS::CurrentUser::CurrentUser->agentnums_sql, -}); -die "Invoice #$invnum not found!" unless $cust_bill; - -my $pdf = $cust_bill->print_pdf(\%opt); - -http_header('Content-Type' => 'application/pdf' ); -http_header('Content-Length' => length($pdf) ); -http_header('Cache-control' => 'max-age=60' ); - -</%init> |