From c2f7d8ba623194ad1fae37b231b2e29b33d05674 Mon Sep 17 00:00:00 2001 From: Mark Wells Date: Tue, 3 Jun 2014 16:59:41 -0700 Subject: changes to support new invoice template features, #28080 --- FS/FS/part_pkg/voip_cdr.pm | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'FS/FS/part_pkg/voip_cdr.pm') diff --git a/FS/FS/part_pkg/voip_cdr.pm b/FS/FS/part_pkg/voip_cdr.pm index b8f1eee..d3eff35 100644 --- a/FS/FS/part_pkg/voip_cdr.pm +++ b/FS/FS/part_pkg/voip_cdr.pm @@ -465,6 +465,15 @@ sub calc_usage { #my @invoice_details_sort; + # for tagging invoice details + my $phonenum; + if ( $svc_table eq 'svc_phone' ) { + $phonenum = $svc_x->phonenum; + } elsif ( $svc_table eq 'svc_pbx' ) { + $phonenum = $svc_x->title; + } + $formatter->phonenum($phonenum); + #first rate any outstanding CDRs not yet rated # XXX eventually use an FS::Cursor for this my $cdr_search = $svc_x->psearch_cdrs(%options); -- cgit v1.1