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 <DIV STYLE="color:#FF0000; font-size:1000%; font-weight:bold; z-index:100;
  15             position: absolute; top: 300px; left: 130px;
  16             zoom: 1; filter: alpha(opacity=25); opacity: 0.25;
  17 ">VOID</DIV>
  18
  19 % if ( $conf->exists('invoice_html') ) {
  20   <% join('', $cust_bill_void->print_html(\%opt) ) %>
  21 % } else {
  22   <PRE><% join('', $cust_bill_void->print_text(\%opt) ) %></PRE>
  23 % }
  24
  25 <& /elements/footer.html &>
  26 <%init>
  27
  28 my $curuser = $FS::CurrentUser::CurrentUser;
  29
  30 die "access denied"
  31   unless $curuser->access_right('View invoices');
  32
  33 my $invnum;
  34 my($query) = $cgi->keywords;
  35 if ( $query =~ /^(\d+)$/ ) {
  36   $invnum = $1;
  37 } else {
  38   $invnum = $cgi->param('invnum');
  39 }
  40
  41 my $conf = new FS::Conf;
  42
  43 my %opt = (
  44   'unsquelch_cdr' => $conf->exists('voip-cdr_email'),
  45 );
  46
  47 my $cust_bill_void = qsearchs({
  48   'select'    => 'cust_bill_void.*',
  49   'table'     => 'cust_bill_void',
  50   #'addl_from' => 'LEFT JOIN cust_main USING ( custnum )',
  51   'hashref'   => { 'invnum' => $invnum },
  52   #'extra_sql' => ' AND '. $curuser->agentnums_sql,
  53 });
  54 die "Voided invoice #$invnum not found!" unless $cust_bill_void;
  55
  56 my $custnum = $cust_bill_void->custnum;
  57 my $display_custnum = $cust_bill_void->cust_main->display_custnum;
  58
  59 #my $link = "invnum=$invnum";
  60
  61 </%init>