From: Ivan Kohler <ivan@freeside.biz>
Date: Wed, 12 Dec 2012 00:34:21 +0000 (-0800)
Subject: create credits by selecting line items, RT#18676
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=a06daa0f58bed99f929b5092af9dcd381d0f0acb

create credits by selecting line items, RT#18676
---

diff --git a/httemplate/edit/process/credit-cust_bill_pkg.html b/httemplate/edit/process/credit-cust_bill_pkg.html
index d3323e6ed..8b2f3f3ea 100644
--- a/httemplate/edit/process/credit-cust_bill_pkg.html
+++ b/httemplate/edit/process/credit-cust_bill_pkg.html
@@ -28,11 +28,14 @@ foreach my $billpkgnum_setuprecur (@billpkgnum_setuprecurs) {
 }
 
 my $error = FS::cust_credit->credit_lineitems(
-  'newreasonnum'      => scalar($cgi->param('newreasonnum')),
-  'newreasonnum_type' => scalar($cgi->param('newreasonnumT')),
+  #the lineitems to credit
   'billpkgnums'       => \@billpkgnums,
   'setuprecurs'       => \@setuprecurs,
   'amounts'           => \@amounts,
+
+  #the credit
+  'newreasonnum'      => scalar($cgi->param('newreasonnum')),
+  'newreasonnum_type' => scalar($cgi->param('newreasonnumT')),
   map { $_ => scalar($cgi->param($_)) }
     #fields('cust_credit')  
     qw( custnum _date amount reason reasonnum addlinfo ), #pkgnum eventnum