<%
-my( $cust_main ) = @_;
+my( $cust_main, %options ) = @_;
+my @invoicing_list = @{ $options{'invoicing_list'} };
my $conf = new FS::Conf;
my $payby_default = $conf->config('payby-default');
-my @payby = $conf->config('payby');
+my @payby = grep /\w/, $conf->config('payby');
#@payby = (qw( CARD DCRD CHEK DCHK LECB BILL CASH WEST COMP ))
@payby = (qw( CARD DCRD CHEK DCHK LECB BILL CASH COMP ))
- unless grep /\w/, @payby;
+ unless @payby;
if ( $payby_default eq 'HIDE' ) {
<INPUT TYPE="hidden" NAME="tax" VALUE="<%= $cust_main->tax %>">
- <INPUT TYPE="hidden" NAME="invoicing_list" VALUE="<%= join(', ', $cust_main->invoicing_list) %>">
+ <INPUT TYPE="hidden" NAME="invoicing_list" VALUE="<%= join(', ', @invoicing_list) %>">
</FORM>
<% } else {
- my @invoicing_list = $cust_main->invoicing_list;
-
my $r = qq!<font color="#ff0000">*</font> !;
%>
);
-
+ #this should use FS::payby
my %allopt = (
'CARD' => 'Credit card',
'CHEK' => 'Electronic check',
<TR>
<TD WIDTH="608" COLSPAN="2"><INPUT TYPE="checkbox" NAME="invoicing_list_POST" VALUE="POST" <%=
- ( ( ! @invoicing_list && ! $conf->exists('disablepostalinvoicedefault') )
+ ( ( ! @invoicing_list
+ && ! $conf->exists('disablepostalinvoicedefault')
+ && ! $cust_main->custnum
+ )
|| grep { $_ eq 'POST' } @invoicing_list )
? 'CHECKED'
<TD WIDTH="408"><INPUT TYPE="text" NAME="invoicing_list" VALUE="<%= join(', ', grep { $_ !~ /^(POST|FAX)$/ } @invoicing_list ) %>"></TD>
</TR>
+ <% if ( $conf->exists('voip-cust_cdr_spools') ) { %>
+ <TR>
+ <TD COLSPAN="2"><INPUT TYPE="checkbox" NAME="spool_cdr" VALUE="Y" <%= $cust_main->spool_cdr eq "Y" ? 'CHECKED' : '' %>> Spool CDRs</TD>
+ </TR>
+ <% } else { %>
+ <INPUT TYPE="hidden" NAME="spool_cdr" VALUE="<%= $cust_main->spool_cdr %>">
+ <% } %>
+
</TABLE>
</FORM>