httemplate/misc/void-cust_bill.html

   1 <& /elements/header-popup.html, mt('Void invoice') &>
   2
   3 <% include('/elements/error.html') %>
   4
   5 <% emt('Are you sure you want to void this invoice?') %>
   6 <BR><BR>
   7
   8 <% emt("Invoice #[_1] ([_2])",$cust_bill->display_invnum, $money_char. $cust_bill->owed) %>
   9 <BR><BR>
  10
  11 <FORM METHOD="POST" ACTION="process/void-cust_bill.html">
  12 <INPUT TYPE="hidden" NAME="invnum" VALUE="<% $invnum %>">
  13
  14 <% ntable("#cccccc", 2) %>
  15 <TR>
  16   <TD ALIGN="right">Reason</TD>
  17   <TD><INPUT TYPE="text" NAME="reason" VALUE="<% scalar($cgi->param('reason')) |h %>"></TD>
  18 </TR>
  19
  20 </TABLE>
  21
  22 <BR>
  23 <CENTER>
  24 <BUTTON TYPE="submit">Yes, void invoice</BUTTON>&nbsp;&nbsp;&nbsp;\
  25 <BUTTON TYPE="button" onClick="parent.cClick();">No, do not void invoice</BUTTON>
  26 </CENTER>
  27
  28 </FORM>
  29 </BODY>
  30 </HTML>
  31 <%init>
  32
  33 die "access denied"
  34   unless $FS::CurrentUser::CurrentUser->access_right('Void invoices');
  35
  36 my $conf = new FS::Conf;
  37 my $money_char = $conf->config('money_char') || '$';
  38
  39 #untaint invnum
  40 $cgi->param('invnum') =~ /^(\d+)$/ || die "Illegal invnum";
  41 my $invnum = $1;
  42
  43 my $cust_bill = qsearchs('cust_bill',{'invnum'=>$invnum});
  44
  45 </%init>