projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
42fd3cd
)
FS RT #884; correcting date comparison logic for signup by date report
author
C.J. Adams-Collier
<cjac@colliertech.org>
Fri, 5 Sep 2014 17:17:16 +0000
(10:17 -0700)
committer
C.J. Adams-Collier
<cjac@colliertech.org>
Fri, 5 Sep 2014 17:19:04 +0000
(10:19 -0700)
httemplate/graph/signupdate.cgi
patch
|
blob
|
history
diff --git
a/httemplate/graph/signupdate.cgi
b/httemplate/graph/signupdate.cgi
index
23e4596
..
011817c
100644
(file)
--- a/
httemplate/graph/signupdate.cgi
+++ b/
httemplate/graph/signupdate.cgi
@@
-40,13
+40,13
@@
my $sdate = DateTime->new(
my $edate = DateTime->new(
year => $cgi->param('end_year'),
my $edate = DateTime->new(
year => $cgi->param('end_year'),
- month =>
($cgi->param('end_month') % 12 + 1) # first day of the next month
-)->epoch();
+ month =>
$cgi->param('end_month')
+)->
add( months => 1 )->
epoch();
my $where .= " AND signupdate >= $sdate ".
my $where .= " AND signupdate >= $sdate ".
- " AND signupdate <
=
$edate ";
+ " AND signupdate < $edate ";
-foreach my $cust (qsearch({ table => 'cust_main',
+foreach my $cust (qsearch({ table => 'cust_main',
hashref => \%where,
extra_sql => $where } )) {
next if !$cust->signupdate;
hashref => \%where,
extra_sql => $where } )) {
next if !$cust->signupdate;