summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorivan <ivan>2009-03-11 09:41:51 +0000
committerivan <ivan>2009-03-11 09:41:51 +0000
commitd3c80e75b62421ea742cbe4547305227f8c10bea (patch)
treef39b7f8abd69e20ab140c7be152a0016faf6193e
parent3cc8babac7a9a1ae9f6b20979a7787a94761a6ec (diff)
add cdr display with accountcode included, RT#4405
-rw-r--r--FS/FS/cdr.pm9
1 files changed, 9 insertions, 0 deletions
diff --git a/FS/FS/cdr.pm b/FS/FS/cdr.pm
index 67c5c1c2a..f0082279e 100644
--- a/FS/FS/cdr.pm
+++ b/FS/FS/cdr.pm
@@ -464,6 +464,10 @@ my %export_names = (
'name' => 'Default with source',
'invoice_header' => 'Caller,Date,Time,Number,Destination,Duration,Price',
},
+ 'accountcode_default' => {
+ 'name' => 'Default plus accountcode',
+ 'invoice_header' => 'Caller,Date,Time,Number,Destination,Duration,Price',
+ },
);
my %export_formats = (
@@ -528,6 +532,11 @@ my %export_formats = (
],
);
$export_formats{'source_default'} = [ 'src', @{ $export_formats{'default'} }, ];
+$export_formats{'accountcode_default'} =
+ [ @{ $export_formats{'default'} }[0,1],
+ 'accountcode',
+ @{ $export_formats{'default'} }[2..5],
+ ];
sub downstream_csv {
my( $self, %opt ) = @_;