diff options
author | ivan <ivan> | 2002-10-17 14:37:56 +0000 |
---|---|---|
committer | ivan <ivan> | 2002-10-17 14:37:56 +0000 |
commit | 37c0ba2a91246a5dcc24893481d9c67357500062 (patch) | |
tree | b9345b98490a5c1dab4d338c81d90751924e687b | |
parent | c2dff50b00edc76d409d8626f8362adf2fe24ea0 (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 78087e9ec..c56e1be52 100644 --- a/FS/FS/cust_svc.pm +++ b/FS/FS/cust_svc.pm @@ -384,7 +384,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; @@ -396,7 +396,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; @@ -410,7 +410,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; @@ -440,10 +440,6 @@ sub seconds_since_sqlradacct { =back -=head1 VERSION - -$Id: cust_svc.pm,v 1.15.4.2 2002-10-17 14:16:20 ivan Exp $ - =head1 BUGS Behaviour of changing the svcpart of cust_svc records is undefined and should |