${r}!.emt('Expiration').qq! | !.
% ''.
%
% include('/elements/select-month_year.html',
-% 'prefix' => 'exp',
+% 'prefix' => 'COMP_exp',
% 'selected_date' =>
% ( $payby eq 'COMP' ? $cust_main->paydate : '' ),
% ).
@@ -289,8 +348,8 @@
%
% ''.
%
-% qq!${r}Amount | !.
-% qq! | !.
+% qq!${r}!.emt('Amount').qq! | !.
+% qq! | !.
%
% ' | '.
% ' | '.
@@ -305,8 +364,8 @@
%
% ''.
%
-% qq!${r}Amount | !.
-% qq! | !.
+% qq!${r}!.emt('Amount').qq! | !.
+% qq! | !.
%
% ' | '.
% ' | '.
@@ -321,8 +380,8 @@
%
% ''.
%
-% qq!${r}Amount | !.
-% qq! | !.
+% qq!${r}!.emt('Amount').qq! | !.
+% qq! | !.
%
% ' | '.
% ' | '.
@@ -336,57 +395,51 @@
% );
%
% #this should use FS::payby
-% my %allopt = (
-% 'CARD' => 'Credit card',
-% 'CHEK' => 'Electronic check',
-% 'LECB' => 'Phone bill billing',
-% 'BILL' => 'Billing',
-% 'CASH' => 'Cash', # initial payment, then billing',
-% 'WEST' => 'Western Union', # initial payment, then billing',
-% 'MCRD' => 'Manual credit card', # initial payment, then billing',
-% 'COMP' => 'Complimentary',
-% );
-% if ( $cust_main->custnum ) { #don't offer CASH/WEST/MCRD initial payment types
-% # when editing customer
+% my @allopt = qw( CARD CHEK LECB BILL CASH WEST MCRD COMP );
+%
+% my %allopt = map { $_ => FS::payby->shortname($_) } @allopt;
+%
+% if ( $cust_main->custnum ) {
+% #don't offer CASH/WEST/MCRD initial payment types when editing customer
% delete $allopt{$_} for qw(CASH WEST MCRD);
% }
%
-% tie my %options, 'Tie::IxHash',
-% map { $_ => $allopt{$_} }
-% grep { exists $allopt{$_} }
-% @payby;
+% my @options = grep exists( $allopt{$_} ), @payby;
%
% my %payby2option = (
-% ( map { $_ => $_ } keys %options ),
+% ( map { $_ => $_ } @options ),
% 'DCRD' => 'CARD',
% 'DCHK' => 'CHEK',
% );
-%
-% my $widget = new HTML::Widgets::SelectLayers(
-% 'options' => \%options,
-% #'form_name' => 'dummy',
-% #'form_action' => 'nothingyet',
-% #chops bottom of page in IE# 'under_position' => 'absolute',
-% 'html_between' => ' ',
-% 'selected_layer' => $payby2option{$payby || $payby_default || $payby[0] },
-% 'layer_callback' => sub { my $layer = shift; $payby{$layer}; },
-% );
-%
-%
-
- <% $widget->html %>
-
- | ',
+ 'layer_callback' => sub { my $layer = shift; $payby{$layer}; },
+ 'onchange' => 'init_payauto_changed();',
+ &>
<% &ntable("#cccccc") %>
|
+% 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') ) {
@@ -397,7 +450,7 @@
? 'CHECKED'
: ''
- %>> Postal mail invoice
+ %>> <% mt('Postal mail invoice') |h %>
@@ -409,59 +462,122 @@
? 'CHECKED'
: ''
- %>> Fax invoice
+ %>> <% mt('Fax invoice') |h %>
% }
+% unless ( $conf->exists('cust-email-high-visibility')) {
<% $conf->exists('cust_main-require_invoicing_list_email') ? $r : '' %>Email address(es)
|
|
+% }
+
+
+ <% mt('Invoice terms') |h %> |
+
+ <& /elements/select-terms.html,
+ 'curr_value' => $cust_main->invoice_terms,
+ &>
+ |
+
- Invoice terms |
+ <% mt('Credit limit') |h %> |
-
+
+ credit_limit) %><% length($cust_main->credit_limit) ? '' : ' DISABLED' %>>
+ credit_limit) ? '' : ' CHECKED'%>> <% mt('Unlimited') |h %>
|
% if ( $conf->exists('voip-cust_cdr_spools') ) {
- spool_cdr eq "Y" ? 'CHECKED' : '' %>> Spool CDRs |
+ spool_cdr eq "Y" ? 'CHECKED' : '' %>> <% mt('Spool CDRs') |h %> |
% } else {
-
-% }
+% }
% if ( $conf->exists('voip-cust_cdr_squelch') ) {
- squelch_cdr eq "Y" ? 'CHECKED' : '' %>> Omit CDRs from invoices |
+ squelch_cdr eq "Y" ? 'CHECKED' : '' %>> <% mt($conf->exists('voip-cdr_email') ? 'Omit CDRs from printed invoices' : 'Omit CDRs from invoices') |h %> |
% } else {
-
-% }
+% }
-
+% if ( $conf->exists('voip-cust_email_csv_cdr') ) {
+ |