projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
90bfc79
)
additional due_cust_event debugging
author
ivan
<ivan>
Thu, 4 Oct 2007 18:28:55 +0000
(18:28 +0000)
committer
ivan
<ivan>
Thu, 4 Oct 2007 18:28:55 +0000
(18:28 +0000)
FS/FS/cust_main.pm
patch
|
blob
|
history
diff --git
a/FS/FS/cust_main.pm
b/FS/FS/cust_main.pm
index
a8a9ae4
..
5e3b2e8
100644
(file)
--- a/
FS/FS/cust_main.pm
+++ b/
FS/FS/cust_main.pm
@@
-1595,8
+1595,8
@@
sub ncancelled_pkgs {
} else {
} else {
- warn "$me ncancelled_pkgs: searching for packages
for
custnum ".
- $self->custnum
+ warn "$me ncancelled_pkgs: searching for packages
with
custnum ".
+ $self->custnum
. "\n"
if $DEBUG > 1;
@cust_pkg =
if $DEBUG > 1;
@cust_pkg =
@@
-2627,6
+2627,7
@@
sub due_cust_event {
$extra_sql .= " $order";
my @part_event = qsearch( {
$extra_sql .= " $order";
my @part_event = qsearch( {
+ 'debug' => ( $opt{'debug'} > 3 ? 1 : 0 ),
'select' => 'part_event.*',
'table' => 'part_event',
'addl_from' => "$cross $join",
'select' => 'part_event.*',
'table' => 'part_event',
'addl_from' => "$cross $join",
@@
-2648,7
+2649,7
@@
sub due_cust_event {
}
warn " ". scalar(@e_cust_event).
}
warn " ". scalar(@e_cust_event).
- " subtotal possible cust events found for $eventtable"
+ " subtotal possible cust events found for $eventtable
\n
"
if $DEBUG > 1;
push @cust_event, @e_cust_event;
if $DEBUG > 1;
push @cust_event, @e_cust_event;