diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2012-12-09 10:37:33 -0800 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2012-12-09 10:37:33 -0800 |
| commit | 146ffcd6dcd8d3e6ad51eeb532c4b88c0a367096 (patch) | |
| tree | 5aeca14798f093aacfffeb7829f1f35152d3ebc1 | |
| parent | 076d8c9e55781a4ad292914d30eed4d954cecb13 (diff) | |
create credits by selecting line items, RT#18676
| -rw-r--r-- | FS/FS/cust_credit.pm | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/FS/FS/cust_credit.pm b/FS/FS/cust_credit.pm index f7f375874..0251cee1d 100644 --- 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( - #the lineitems + + #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') + #fields('cust_credit') + qw( custnum _date amount reason reasonnum addlinfo ), #pkgnum eventnum + ); =cut |