httemplate/view/cust_bill_void.html

   1 <& /elements/header.html, mt('Voided Invoice'),  menubar(
   2   emt("View this customer (#[_1])",$display_custnum) => "${p}view/cust_main.cgi?$custnum",
   3 ) &>
   4
   5 %#XXX something very big and obvious showing its voided...
   6
   7 % #voided PDFs?
   8 % #if ( $conf->exists('invoice_latex') ) {
   9 %#
  10 %#  <A HREF="<% $p %>view/cust_bill-pdf.cgi?<% $link %>"><% mt('View typeset invoice PDF') |h %></A>
  11 %#  <BR><BR>
  12 % #}
  13
  14 % if ( $conf->exists('invoice_html') ) {
  15   <% join('', $cust_bill_void->print_html(\%opt) ) %>
  16 % } else {
  17   <PRE><% join('', $cust_bill_void->print_text(\%opt) ) %></PRE>
  18 % }
  19
  20 <& /elements/footer.html &>
  21 <%init>
  22
  23 my $curuser = $FS::CurrentUser::CurrentUser;
  24
  25 die "access denied"
  26   unless $curuser->access_right('View invoices');
  27
  28 my $invnum;
  29 my($query) = $cgi->keywords;
  30 if ( $query =~ /^(\d+)$/ ) {
  31   $invnum = $1;
  32 } else {
  33   $invnum = $cgi->param('invnum');
  34 }
  35
  36 my $conf = new FS::Conf;
  37
  38 my %opt = (
  39   'unsquelch_cdr' => $conf->exists('voip-cdr_email'),
  40 );
  41
  42 my $cust_bill_void = qsearchs({
  43   'select'    => 'cust_bill_void.*',
  44   'table'     => 'cust_bill_void',
  45   #'addl_from' => 'LEFT JOIN cust_main USING ( custnum )',
  46   'hashref'   => { 'quotationnum' => $quotationnum },
  47   #'extra_sql' => ' AND '. $curuser->agentnums_sql,
  48 });
  49 die "Quotation #$quotationnum not found!" unless $quotation;
  50
  51 my $custnum = $cust_bill->custnum;
  52 my $display_custnum = $cust_bill->cust_main->display_custnum;
  53
  54 #my $link = "invnum=$invnum";
  55
  56 </%init>