diff options
| author | ivan <ivan> | 2002-10-17 14:37:58 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2002-10-17 14:37:58 +0000 |
| commit | dbcf3603c7929de3a0f2011d6516b996541e93fa (patch) | |
| tree | 0a8d31d4385a55ea531d75a8903634e86c3d7453 | |
| parent | 8dc221c91266dc284655942bb5de6392beecbbb3 (diff) | |
fix sqlradacct calculations for old Pg
| -rw-r--r-- | FS/FS/cust_svc.pm | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/FS/FS/cust_svc.pm b/FS/FS/cust_svc.pm index 50d94452a..bed6a0ab3 100644 --- a/FS/FS/cust_svc.pm +++ b/FS/FS/cust_svc.pm @@ -380,7 +380,7 @@ sub seconds_since_sqlradacct { WHERE UserName = ? AND $str2time AcctStartTime) >= ? AND $str2time AcctStopTime ) < ? - AND AcctStopTime =! 0 + AND $str2time AcctStopTime ) =! 0 AND AcctStopTime IS NOT NULL" ) or die $dbh->errstr; $sth->execute($username, $start, $end) or die $sth->errstr; @@ -393,7 +393,7 @@ sub seconds_since_sqlradacct { WHERE UserName = ? AND $str2time AcctStartTime ) >= ? AND ( ? - $str2time AcctStartTime ) < 86400 - AND ( AcctStopTime = 0 + AND ( $str2time AcctStopTime ) = 0 OR AcctStopTime IS NULL )" ) or die $dbh->errstr; $sth->execute($end, $username, $start, $end) or die $sth->errstr; @@ -407,7 +407,7 @@ sub seconds_since_sqlradacct { AND $str2time AcctStartTime ) < ? AND $str2time AcctStopTime ) >= ? AND $str2time AcctStopTime ) < ? - AND AcctStopTime != 0 + AND $str2time AcctStopTime ) != 0 AND AcctStopTime IS NOT NULL" ) or die $dbh->errstr; $sth->execute($start, $username, $start, $start, $end ) or die $sth->errstr; @@ -438,10 +438,6 @@ sub seconds_since_sqlradacct { =back -=head1 VERSION - -$Id: cust_svc.pm,v 1.19 2002-10-17 14:16:17 ivan Exp $ - =head1 BUGS Behaviour of changing the svcpart of cust_svc records is undefined and should |