X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fprocess%2Fpart_fee.html;h=075cdee6f62c69be691f46ca42b8f9c5ddbc183d;hb=1fc8addc56f8daf12397da568eb1ac1b27fd3984;hp=1fca231ec3a1f0f666093f037d0ad2a11da0aeba;hpb=9c26126d2ad1eec8186d73475505782152884962;p=freeside.git 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 +} +