projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
196f70d
)
close invoices which are declined. closes: Bug#408
author
ivan
<ivan>
Mon, 14 Oct 2002 09:28:14 +0000
(09:28 +0000)
committer
ivan
<ivan>
Mon, 14 Oct 2002 09:28:14 +0000
(09:28 +0000)
fs_signup/fs_signup_server
patch
|
blob
|
history
diff --git
a/fs_signup/fs_signup_server
b/fs_signup/fs_signup_server
index
7f962e0
..
703c76e
100755
(executable)
--- a/
fs_signup/fs_signup_server
+++ b/
fs_signup/fs_signup_server
@@
-188,9
+188,15
@@
while (1) {
if $bill_error;
if ( $cust_main->balance > 0 ) {
+
+ #this makes sense. credit is "un-doing" the invoice
+ $cust_main->credit( $cust_main->balance, 'signup server decline' );
+ $cust_main->apply_credits;
+
#should check list for errors...
#$cust_main->suspend;
$cust_main->cancel;
+
$error = '_decline';
}
}