diff options
Diffstat (limited to 'httemplate/edit/process/quick-charge.cgi')
| -rw-r--r-- | httemplate/edit/process/quick-charge.cgi | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/httemplate/edit/process/quick-charge.cgi b/httemplate/edit/process/quick-charge.cgi index 49175d848..477f58508 100644 --- a/httemplate/edit/process/quick-charge.cgi +++ b/httemplate/edit/process/quick-charge.cgi @@ -12,7 +12,12 @@ my $amount = $1; my $cust_main = qsearchs('cust_main', { 'custnum' => $custnum } ) or die "unknown custnum $custnum"; -my $error = $cust_main->charge( $amount, $cgi->param('pkg') ); +my $error = $cust_main->charge( + $amount, + $cgi->param('pkg'), + '$'. sprintf("%.2f",$amount), + $cgi->param('taxclass') +); if ($error) { %> |