X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcust_bill.pm;h=4e34ef47ba2866c63deaae063e0cfe7db6014ae7;hb=68de99533d0612144562b0ecf8e95b3d89aa9a18;hp=a747a782da495784c7013ffabf2a1e182f2add8c;hpb=eb3bd392a89b8b666dc512951e78913c05b98810;p=freeside.git diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm index a747a782d..4e34ef47b 100644 --- a/FS/FS/cust_bill.pm +++ b/FS/FS/cust_bill.pm @@ -1972,6 +1972,13 @@ sub print_csv { if ( $format eq 'billco' ) { + my $account_num = + $self->conf->config('billco-account_num', $cust_main->agentnum); + + my $tracctnum = $account_num eq 'display_custnum' + ? $cust_main->display_custnum + : $opt{'tracctnum'}; + my $taxtotal = 0; $taxtotal += $_->{'amount'} foreach $self->_items_tax; @@ -1988,7 +1995,7 @@ sub print_csv { $csv->combine( '', # 1 | N/A-Leave Empty CHAR 2 '', # 2 | N/A-Leave Empty CHAR 15 - $opt{'tracctnum'}, # 3 | Transaction Account No CHAR 15 + $tracctnum, # 3 | Transaction Account No CHAR 15 $self->invnum, # 4 | Transaction Invoice No CHAR 15 $cust_main->zip, # 5 | Transaction Zip Code CHAR 5 $cust_main->company, # 6 | Transaction Company Bill To CHAR 30 @@ -3063,7 +3070,8 @@ sub _items_payments { my $cust_pay = $obj->isa('FS::cust_pay') ? $obj : $obj->cust_pay; my $desc = $self->mt('Payment received').' '. time2str($date_format, $cust_pay->_date ); - $desc .= $self->mt(' via ' . $cust_pay->payby_payinfo_pretty) + $desc .= $self->mt(' via ') . + $cust_pay->payby_payinfo_pretty( $self->cust_main->locale ) if $detailed; push @b, { @@ -3372,13 +3380,25 @@ sub search_sql_where { push @search, "cust_bill.custnum = $1"; } - #customer classnum + #customer classnum (false laziness w/ cust_main/Search.pm) if ( $param->{'cust_classnum'} ) { - my $classnums = $param->{'cust_classnum'}; - $classnums = [ $classnums ] if !ref($classnums); - $classnums = [ grep /^\d+$/, @$classnums ]; - push @search, 'cust_main.classnum in ('.join(',',@$classnums).')' - if @$classnums; + + my @classnum = ref( $param->{'cust_classnum'} ) + ? @{ $param->{'cust_classnum'} } + : ( $param->{'cust_classnum'} ); + + @classnum = grep /^(\d*)$/, @classnum; + + if ( @classnum ) { + push @search, '( '. join(' OR ', map { + $_ ? "cust_main.classnum = $_" + : "cust_main.classnum IS NULL" + } + @classnum + ). + ' )'; + } + } #_date