X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fcust_main%2Fbilling.html;h=e6600e6891f95171eaf3b5d6b56c75a58778cf03;hb=3714fa41c5306981c9f500df13eea52c72d82545;hp=353f2b9a093b8435f6cbd73466dbc861cde30673;hpb=8fb243091939f37e24163925be78f4e9f3485978;p=freeside.git
diff --git a/httemplate/edit/cust_main/billing.html b/httemplate/edit/cust_main/billing.html
index 353f2b9a0..e6600e689 100644
--- a/httemplate/edit/cust_main/billing.html
+++ b/httemplate/edit/cust_main/billing.html
@@ -112,6 +112,14 @@
% $text_disabled = 'style="color: #000000";'
% }
%
+% my $disable_payauto = $conf->exists('disable_payauto_default');
+% my $CARD_payauto_checked = $payby eq 'DCRD' ? ''
+% : $payby eq 'CARD' ? 'CHECKED'
+% : $disable_payauto ? '' : 'CHECKED';
+% my $CHEK_payauto_checked = $payby eq 'DCHK' ? ''
+% : $payby eq 'CHEK' ? 'CHECKED'
+% : $disable_payauto ? '' : 'CHECKED';
+%
% my %payby = (
%
% 'CARD' =>
@@ -163,7 +171,7 @@
% qq!
${r}Exact name on card | !.
% qq! |
!.
%
-% qq! Charge future payments to this card automatically |
'.
+% qq! Charge future payments to this card automatically |
!.
%
% '',
%
@@ -201,7 +209,7 @@
% ).
%
%
-% qq! Charge future payments to this electronic check automatically |
'.
+% qq! Charge future payments to this electronic check automatically |
!.
%
% ' |
'.
% ' |
'.
@@ -240,7 +248,7 @@
% qq!!.
%
% qq!Attention | !.
-% qq! |
!.
+% qq! | !.
%
% ' |
'.
% ' |
'.
@@ -359,10 +367,19 @@
|
+% my @exempt_groups = grep /\S/, $conf->config('tax-cust_exempt-groups');
+
- tax eq "Y" ? 'CHECKED' : '' %>> Tax Exempt |
+ tax eq "Y" ? 'CHECKED' : '' %>> Tax Exempt<% @exempt_groups ? ' (all taxes)' : '' %> |
+% foreach my $exempt_group ( @exempt_groups ) {
+% #escape $exempt_group for NAME
+
+ tax_exemption($exempt_group) ? 'CHECKED' : '' %>> Tax Exempt (<% $exempt_group %> taxes) |
+ |
+% }
+
% unless ( $conf->exists('emailinvoiceonly') ) {
@@ -402,14 +419,22 @@
Invoice terms |
-
+ <% include('/elements/select-terms.html',
+ 'curr_value' => $cust_main->invoice_terms,
+ )
+ %>
+ |
+
+
+ Credit limit |
+
+
+ credit_limit) %><% length($cust_main->credit_limit) ? '' : ' DISABLED' %>>
+ credit_limit) ? '' : ' CHECKED'%>> Unlimited
|
@@ -418,18 +443,38 @@
spool_cdr eq "Y" ? 'CHECKED' : '' %>> Spool CDRs |
% } else {
-
-% }
+% }
% if ( $conf->exists('voip-cust_cdr_squelch') ) {
squelch_cdr eq "Y" ? 'CHECKED' : '' %>> Omit CDRs from invoices |
% } else {
-
-% }
+% }
+
+% if ( $conf->exists('voip-cust_email_csv_cdr') ) {
+
+ email_csv_cdr eq "Y" ? 'CHECKED' : '' %>> Attach CDRs as CSV to emailed invoices |
+
+% } else {
+
+% }
+
+% if ( $show_term || $cust_main->cdr_termination_percentage ) {
+
+ CDR termination settlement |
+ % |
+
+% } else {
+
+% }
@@ -455,4 +500,13 @@ my @payby = grep /\w/, $conf->config('payby');
@payby = (qw( CARD DCRD CHEK DCHK LECB BILL CASH COMP ))
unless @payby;
+my $show_term = '';
+if ( $cust_main->custnum ) {
+ #false laziness w/view/cust_main/billing.html
+ my $term_sql = "SELECT COUNT(*) FROM cust_pkg LEFT JOIN part_pkg USING ( pkgpart ) WHERE custnum = ? AND plan = 'cdr_termination' LIMIT 1";
+ my $term_sth = dbh->prepare($term_sql) or die dbh->errstr;
+ $term_sth->execute($cust_main->custnum) or die $term_sth->errstr;
+ $show_term = $term_sth->fetchrow_arrayref->[0];
+}
+
%init>