projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
run_bill_events option for order_pkg, RT#42053
[freeside.git]
/
FS
/
FS
/
ClientAPI
/
MyAccount.pm
diff --git
a/FS/FS/ClientAPI/MyAccount.pm
b/FS/FS/ClientAPI/MyAccount.pm
index
ed7e353
..
8b04436
100644
(file)
--- a/
FS/FS/ClientAPI/MyAccount.pm
+++ b/
FS/FS/ClientAPI/MyAccount.pm
@@
-2410,7
+2410,7
@@
sub order_pkg {
my $conf = new FS::Conf;
if ( $conf->exists('signup_server-realtime') ) {
my $conf = new FS::Conf;
if ( $conf->exists('signup_server-realtime') ) {
- my $bill_error = _do_bop_realtime( $cust_main, $status );
+ my $bill_error = _do_bop_realtime( $cust_main, $status
, 'collect'=>$p->{run_bill_events}
);
if ($bill_error) {
$cust_pkg->cancel('quiet'=>1);
if ($bill_error) {
$cust_pkg->cancel('quiet'=>1);
@@
-2565,6
+2565,12
@@
sub _do_bop_realtime {
return { 'error' => '_decline', 'bill_error' => $bill_error };
}
return { 'error' => '_decline', 'bill_error' => $bill_error };
}
+ if ( $opt{'collect'} ) {
+ my $collect_error = $cust_main->collect();
+ return { 'error' => '_decline', 'bill_error' => $collect_error }
+ if $collect_error; #?
+ }
+
'';
}
'';
}