diff options
| author | Jonathan Prykop <jonathan@freeside.biz> | 2015-10-29 22:17:08 -0500 |
|---|---|---|
| committer | Jonathan Prykop <jonathan@freeside.biz> | 2015-10-29 22:30:51 -0500 |
| commit | bc03aa6e1cebc712789dfc254901c6f8d8935057 (patch) | |
| tree | 911df191e1bd17151a347e4a430388a85d66b7ec | |
| parent | 4fdc60587141db78b4baf67168cb5ab2122210d4 (diff) | |
RT#38671: Do not include charges and credits from failed signup processing [added void reason]
| -rw-r--r-- | FS/FS/ClientAPI/MyAccount.pm | 4 | ||||
| -rw-r--r-- | FS/FS/ClientAPI/Signup.pm | 4 |
2 files changed, 4 insertions, 4 deletions
diff --git a/FS/FS/ClientAPI/MyAccount.pm b/FS/FS/ClientAPI/MyAccount.pm index cb3f8d9c3..64a443fe0 100644 --- a/FS/FS/ClientAPI/MyAccount.pm +++ b/FS/FS/ClientAPI/MyAccount.pm @@ -2486,8 +2486,8 @@ sub _do_bop_realtime { #this used to apply a credit, but now we can void invoices... foreach my $cust_bill (@cust_bill) { - my $voiderror = $cust_bill->void(); - warn "Error voiding cust bill after decline: $voiderror"; + my $voiderror = $cust_bill->void('automatic payment failed'); + warn "Error voiding cust bill after decline: $voiderror" if $voiderror; } } diff --git a/FS/FS/ClientAPI/Signup.pm b/FS/FS/ClientAPI/Signup.pm index f255405d3..3208396b9 100644 --- a/FS/FS/ClientAPI/Signup.pm +++ b/FS/FS/ClientAPI/Signup.pm @@ -834,8 +834,8 @@ sub new_customer { #this used to apply a credit, but now we can void invoices... foreach my $cust_bill (@cust_bill) { - my $voiderror = $cust_bill->void(); - warn "Error voiding cust bill after decline: $voiderror"; + my $voiderror = $cust_bill->void('automatic payment failed'); + warn "Error voiding cust bill after decline: $voiderror" if $voiderror; } #should check list for errors... |