projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
93e3a52
)
create credits by selecting line items, RT#18676
author
Ivan Kohler
<ivan@freeside.biz>
Sun, 9 Dec 2012 18:37:32 +0000
(10:37 -0800)
committer
Ivan Kohler
<ivan@freeside.biz>
Sun, 9 Dec 2012 18:37:32 +0000
(10:37 -0800)
FS/FS/cust_credit.pm
patch
|
blob
|
history
diff --git
a/FS/FS/cust_credit.pm
b/FS/FS/cust_credit.pm
index
f7f3758
..
0251cee
100644
(file)
--- a/
FS/FS/cust_credit.pm
+++ b/
FS/FS/cust_credit.pm
@@
-623,14
+623,19
@@
sub credited_sql {
Example:
my $error = FS::cust_credit->credit_lineitems(
Example:
my $error = FS::cust_credit->credit_lineitems(
- #the lineitems
+
+ #the lineitems to credit
'billpkgnums' => \@billpkgnums,
'billpkgnums' => \@billpkgnums,
+ 'setuprecurs' => \@setuprecurs,
+ 'amounts' => \@amounts,
#the credit
'newreasonnum' => scalar($cgi->param('newreasonnum')),
'newreasonnum_type' => scalar($cgi->param('newreasonnumT')),
map { $_ => scalar($cgi->param($_)) }
#the credit
'newreasonnum' => scalar($cgi->param('newreasonnum')),
'newreasonnum_type' => scalar($cgi->param('newreasonnumT')),
map { $_ => scalar($cgi->param($_)) }
- fields('cust_credit')
+ #fields('cust_credit')
+ qw( custnum _date amount reason reasonnum addlinfo ), #pkgnum eventnum
+
);
=cut
);
=cut