httemplate/view/cust_main/billing.html

   1 <%
   2   my( $cust_main ) = @_;
   3   my @invoicing_list = $cust_main->invoicing_list;
   4 %>
   5
   6 Billing information
   7 (<A HREF="<%= $p %>misc/bill.cgi?<%= $cust_main->custnum %>">Bill now</A>)
   8 <%= ntable("#cccccc") %><TR><TD><%= ntable("#cccccc",2) %>
   9 <TR>
  10   <TD ALIGN="right">Tax&nbsp;exempt</TD>
  11   <TD BGCOLOR="#ffffff"><%= $cust_main->tax ? 'yes' : 'no' %></TD>
  12 </TR>
  13 <TR>
  14   <TD ALIGN="right">Postal&nbsp;invoices</TD>
  15   <TD BGCOLOR="#ffffff">
  16     <%= ( grep { $_ eq 'POST' } @invoicing_list ) ? 'yes' : 'no' %>
  17   </TD>
  18 </TR>
  19 <TR>
  20   <TD ALIGN="right">Email&nbsp;invoices</TD>
  21   <TD BGCOLOR="#ffffff">
  22     <%= join(', ', grep { $_ ne 'POST' } @invoicing_list ) || 'no' %>
  23   </TD>
  24 </TR>
  25 <TR>
  26   <TD ALIGN="right">Billing&nbsp;type</TD>
  27   <TD BGCOLOR="#ffffff">
  28
  29 <% if ( $cust_main->payby eq 'CARD' || $cust_main->payby eq 'DCRD' ) { %>
  30
  31     Credit&nbsp;card&nbsp;<%= $cust_main->payby eq 'CARD' ? '(automatic)' : '(on-demand)' %>
  32   </TD>
  33 </TR>
  34 <TR>
  35   <TD ALIGN="right">Card number</TD>
  36   <TD BGCOLOR="#ffffff"><%= $cust_main->payinfo_masked %></TD>
  37 </TR>
  38 <TR>
  39   <TD ALIGN="right">Expiration</TD>
  40   <TD BGCOLOR="#ffffff"><%= $cust_main->paydate %></TD>
  41 </TR>
  42 <TR>
  43   <TD ALIGN="right">Name on card</TD>
  44   <TD BGCOLOR="#ffffff"><%= $cust_main->payname %></TD>
  45 </TR>
  46
  47 <% } elsif ( $cust_main->payby eq 'CHEK' || $cust_main->payby eq 'DCHK') {
  48      my( $account, $aba ) = split('@', $cust_main->payinfo );
  49 %>
  50
  51     Electronic&nbsp;check&nbsp;<%= $cust_main->payby eq 'CHEK' ? '(automatic)' : '(on-demand)' %>
  52   </TD>
  53 </TR>
  54 <TR>
  55   <TD ALIGN="right">ABA/Routing code</TD>
  56   <TD BGCOLOR="#ffffff"><%= $aba %></TD>
  57 </TR>
  58 <TR>
  59   <TD ALIGN="right">Account number</TD>
  60   <TD BGCOLOR="#ffffff"><%= $account %></TD>
  61 </TR>
  62 <TR>
  63   <TD ALIGN="right">Bank name</TD>
  64   <TD BGCOLOR="#ffffff"><%= $cust_main->payname %></TD>
  65 </TR>
  66
  67 <% } elsif ( $cust_main->payby eq 'LECB' ) {
  68      $cust_main->payinfo =~ /^(\d{3})(\d{3})(\d{4})$/;
  69      my $payinfo = "$1-$2-$3";
  70 %>
  71
  72     Phone&nbsp;bill&nbsp;billing
  73   </TD>
  74 </TR>
  75 <TR>
  76   <TD ALIGN="right">Phone number</TD>
  77   <TD BGCOLOR="#ffffff"><%= $payinfo %></TD>
  78 </TR>
  79
  80 <% } elsif ( $cust_main->payby eq 'BILL' ) { %>
  81
  82     Billing
  83   </TD>
  84 </TR>
  85
  86   <% if ( $cust_main->payinfo ) { %>
  87 <TR>
  88   <TD ALIGN="right">P.O. </TD>
  89   <TD BGCOLOR="#ffffff"><%= $cust_main->payinfo %></TD>
  90 </TR>
  91   <% } %>
  92
  93 <TR>
  94   <TD ALIGN="right">Expiration</TD>
  95   <TD BGCOLOR="#ffffff"><%= $cust_main->paydate %></TD>
  96 </TR>
  97 <TR>
  98   <TD ALIGN="right">Attention</TD>
  99   <TD BGCOLOR="#ffffff"><%= $cust_main->payname %></TD>
 100 </TR>
 101
 102 <% } elsif ( $cust_main->payby eq 'COMP' ) { %>
 103
 104     Complimentary
 105   </TD>
 106 </TR>
 107 <TR>
 108   <TD ALIGN="right">Authorized&nbsp;by</TD>
 109   <TD BGCOLOR="#ffffff"><%= $cust_main->payinfo %></TD>
 110 </TR>
 111 <TR>
 112   <TD ALIGN="right">Expiration</TD>
 113   <TD BGCOLOR="#ffffff"><%= $cust_main->paydate %></TD>
 114 </TR>
 115
 116 <% } %>
 117
 118 </TABLE></TD></TR></TABLE>
 119