diff options
| author | mark <mark> | 2012-01-04 21:11:01 +0000 |
|---|---|---|
| committer | mark <mark> | 2012-01-04 21:11:01 +0000 |
| commit | 0e256e7b9dcc00dedacf499b92bd1c945248a3b9 (patch) | |
| tree | 6968e9223b2a8a1622891b779bfd64bb72be5d00 /FS/FS/detail_format/sum_duration.pm | |
| parent | bdec1f077dfb7138a0df035b6f501bcb1f09024e (diff) | |
hide zero-charge summary lines, #15535
Diffstat (limited to 'FS/FS/detail_format/sum_duration.pm')
| -rw-r--r-- | FS/FS/detail_format/sum_duration.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/FS/FS/detail_format/sum_duration.pm b/FS/FS/detail_format/sum_duration.pm index 0b4cedc..16c1de5 100644 --- a/FS/FS/detail_format/sum_duration.pm +++ b/FS/FS/detail_format/sum_duration.pm @@ -42,13 +42,14 @@ sub finish { my $buffer = $self->{buffer}; foreach my $svcnum (keys %$svcnums) { + my $subtotal = $svcnums->{$svcnum}; + next if $subtotal->{amount} < 0.01; + my $cust_svc = qsearchs('cust_svc', { svcnum => $svcnum }) or die "svcnum #$svcnum not found"; my $phonenum = $cust_svc->svc_x->label; warn "processing $phonenum\n" if $DEBUG; - my $subtotal = $svcnums->{$svcnum}; - $self->csv->combine( $phonenum, $subtotal->{count}, |