From 984fff08c579ff72f6eb7f658d9373079eafb16a Mon Sep 17 00:00:00 2001 From: Mark Wells Date: Thu, 8 Mar 2012 20:30:02 -0800 Subject: "simple with accountcode" CDR format, #16348 --- FS/FS/detail_format.pm | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'FS/FS/detail_format.pm') diff --git a/FS/FS/detail_format.pm b/FS/FS/detail_format.pm index af97f36..f70acc6 100644 --- a/FS/FS/detail_format.pm +++ b/FS/FS/detail_format.pm @@ -171,11 +171,12 @@ sub single_detail { die "$me error combining ".$self->csv->error_input."\n" if !$status; - my $rated_price = $cdr->rated_price; - $rated_price = 0 if $cdr->freesidestatus eq 'no-charge'; + my $object = $self->{inbound} ? $cdr->cdr_termination(1) : $cdr; + my $price = $object->rated_price if $object; + $price = 0 if $cdr->freesidestatus eq 'no-charge'; FS::cust_bill_pkg_detail->new( { - 'amount' => $rated_price, + 'amount' => $price, 'classnum' => $cdr->rated_classnum, 'duration' => $cdr->rated_seconds, 'regionname' => $cdr->rated_regionname, -- cgit v1.1