X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fview%2Fcust_main%2Fpayment_history.html;h=9c18fbc15d90db83ea43d7bf83e289c44b7a563c;hb=HEAD;hp=e3599bc06730661091317bafa54f21f5a18080b5;hpb=71d389e6554fd9994ac9c18bc59fd43449b8cca1;p=freeside.git diff --git a/httemplate/view/cust_main/payment_history.html b/httemplate/view/cust_main/payment_history.html index e3599bc06..9c18fbc15 100644 --- a/httemplate/view/cust_main/payment_history.html +++ b/httemplate/view/cust_main/payment_history.html @@ -136,29 +136,43 @@ % if ( $item->{'balance_forward'} ) { <& .balance_forward_row, $item->{'balance'}, $item->{'date'} &> -% } +% } %} # foreach $item +% if ( $old_history ) { +<& .hide_history_row, $old_history++ &> +% } + + <%def .balance_forward_row> % my( $b, $date ) = @_; @@ -171,7 +185,7 @@ function show_history () { <% mt("Starting balance on [_1]", time2str($date_format, $date) ) |h %> - (<% mt('show prior history') |h %>) + (<% mt('show prior history') |h %>) @@ -182,6 +196,17 @@ function show_history () { +<%def .hide_history_row> +% my $num = shift; + + + + (<% mt('hide prior history') |h %>) + + + + + <%shared> my $conf = new FS::Conf; my $date_format = $conf->config('date_format') || '%m/%d/%Y'; @@ -194,12 +219,6 @@ my $custnum = $cust_main->custnum; my $curuser = $FS::CurrentUser::CurrentUser; -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 @payby; -my %payby = map { $_=>1 } @payby; - my %status = ( 'Queued' => 'O', #Open 'In-transit' => 'I', @@ -226,11 +245,12 @@ my %opt = ( #rights ( map { $_ => $curuser->access_right($_) } ( - 'View invoices', 'Void invoices', 'Unvoid invoices', + 'View invoices', 'Void invoices', 'Unvoid invoices', 'Resend invoices', 'Apply payment', 'Refund credit card payment', 'Refund Echeck payment', + 'Post refund', 'Post check refund', 'Post cash refund ', 'Refund payment', 'Credit card void', 'Echeck void', 'Void payments', 'Unvoid payments', - 'Delete payment', 'Unapply payment', - 'Apply credit', 'Delete credit', 'Unapply credit', 'Void credit', 'Unvoid credit', + 'Unapply payment', + 'Apply credit', 'Unapply credit', 'Void credit', 'Unvoid credit', 'Delete refund', 'Billing event reports', 'View customer billing events', ) @@ -239,6 +259,7 @@ my %opt = ( #customer information 'total_owed' => $cust_main->total_owed, 'total_unapplied_refunds' => $cust_main->total_unapplied_refunds, + 'has_email_address' => scalar($cust_main->invoicing_list_emailonly), ); $opt{'date_format'} ||= '%m/%d/%Y'; @@ -483,7 +504,7 @@ sub translate_payinfo { sub areyousure_link { my ($url,$msg,$title,$label) = (shift,shift,shift,shift); - ' ('.$label.')'; + ' ('.$label.')'; }