diff options
| author | mark <mark> | 2010-10-12 21:01:28 +0000 |
|---|---|---|
| committer | mark <mark> | 2010-10-12 21:01:28 +0000 |
| commit | eb8d9935daec7013b9bc66a7e63c3e06d249125e (patch) | |
| tree | 6bfdf6c201c2f5b45ba05e9760cf7c9aa90397c8 | |
| parent | 66fae34f9f6b08a8bc67b3d02eafa6c20f056f5a (diff) | |
fix some noisy warnings
| -rw-r--r-- | FS/FS/cust_main.pm | 13 |
1 files changed, 5 insertions, 8 deletions
diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm index a4bebb5f2..521f77341 100644 --- a/FS/FS/cust_main.pm +++ b/FS/FS/cust_main.pm @@ -2270,7 +2270,7 @@ sub total_owed_date { AND _date <= $time "; - sprintf( "%.2f", $self->scalar_sql($sql) ); + sprintf( "%.2f", $self->scalar_sql($sql) || 0 ); } @@ -2350,8 +2350,7 @@ sub total_unapplied_credits { WHERE custnum = $custnum "; - #XXX fix harmless but loud: Argument "" isn't numeric in sprintf - sprintf( "%.2f", $self->scalar_sql($sql) ); + sprintf( "%.2f", $self->scalar_sql($sql) || 0 ); } @@ -2389,8 +2388,7 @@ sub total_unapplied_payments { WHERE custnum = $custnum "; - #XXX fix harmless but loud: Argument "" isn't numeric in sprintf - sprintf( "%.2f", $self->scalar_sql($sql) ); + sprintf( "%.2f", $self->scalar_sql($sql) || 0 ); } @@ -2428,8 +2426,7 @@ sub total_unapplied_refunds { WHERE custnum = $custnum "; - #XXX fix harmless but loud: Argument "" isn't numeric in sprintf - sprintf( "%.2f", $self->scalar_sql($sql) ); + sprintf( "%.2f", $self->scalar_sql($sql) || 0 ); } @@ -2487,7 +2484,7 @@ sub balance_date_range { my $self = shift; my $sql = 'SELECT SUM('. $self->balance_date_sql(@_). ') FROM cust_main WHERE custnum='. $self->custnum; - sprintf( '%.2f', $self->scalar_sql($sql) ); + sprintf( '%.2f', $self->scalar_sql($sql) || 0 ); } =item balance_pkgnum PKGNUM |