From 6c7896c35adbfa139d729e28720bc6b97ed56776 Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Fri, 28 Mar 2014 11:31:43 -0700 Subject: [PATCH] fix UI nit for late fee definitions, RT#25899 --- httemplate/edit/part_fee.html | 12 ++++++------ httemplate/edit/process/part_fee.html | 10 ++++++++++ 2 files changed, 16 insertions(+), 6 deletions(-) diff --git a/httemplate/edit/part_fee.html b/httemplate/edit/part_fee.html index 080b9cd68..20defe5c3 100644 --- a/httemplate/edit/part_fee.html +++ b/httemplate/edit/part_fee.html @@ -67,10 +67,10 @@ foreach (@locales) { $n = 0; my %layer_fields = ( 'charged' => [ - 'percent' => { label => 'Fraction of invoice total', type => 'percentage', }, + 'charged_percent' => { label => 'Fraction of invoice total', type => 'percentage', }, ], 'owed' => [ - 'percent' => { label => 'Fraction of balance', type => 'percentage', }, + 'owed_percent' => { label => 'Fraction of balance', type => 'percentage', }, ], 'usage' => [ 'usage' => { type => 'part_fee_usage' } @@ -106,7 +106,7 @@ my @fields = ( 'recur' => 'a recurring charge' }, }, - { type => 'justtitle', value => 'Fee calculation' }, + { type => 'tablebreak-tr-title', value => 'Fee calculation' }, { field => 'amount', type => 'money', }, { field => 'basis', @@ -119,8 +119,8 @@ my @fields = ( layer_values_callback => sub { my ($cgi, $obj) = @_; { - 'charged' => { percent => $obj->percent }, - 'owed' => { percent => $obj->percent }, + 'charged' => { charged_percent => $obj->percent }, + 'owed' => { owed_percent => $obj->percent }, 'usage' => { usage => [ $obj->part_fee_usage ] }, } }, @@ -131,7 +131,7 @@ my @fields = ( type => 'checkbox', value => 'Y' }, - { type => 'justtitle', value => 'Taxation' }, + { type => 'tablebreak-tr-title', value => 'Taxation' }, @tax_fields, ); diff --git a/httemplate/edit/process/part_fee.html b/httemplate/edit/process/part_fee.html index 1fca231ec..075cdee6f 100755 --- a/httemplate/edit/process/part_fee.html +++ b/httemplate/edit/process/part_fee.html @@ -17,6 +17,7 @@ ], }, ], + 'precheck_callback'=> \&precheck, &> <%init> @@ -26,4 +27,13 @@ my $acl_edit_global = $curuser->access_right('Edit global fee definitions'); die "access denied" unless $acl_edit or $acl_edit_global; +sub precheck { + my $cgi = shift; + if ( $cgi->param('basis') =~ /^(\w+)$/ ) { + my $basis = $1; + $cgi->param('percent', $cgi->param($basis.'_percent') ); + } + ''; #no error +} + -- 2.11.0