From 1d9d7d96b80ed08749a44501161a26a82f3cddb6 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Mon, 2 May 2011 07:21:20 +0000
Subject: [PATCH] don't skip taqua acctcode ad-ons, RT#12181

---
 FS/FS/cdr/taqua.pm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/FS/FS/cdr/taqua.pm b/FS/FS/cdr/taqua.pm
index 99e077483..390152a04 100644
--- a/FS/FS/cdr/taqua.pm
+++ b/FS/FS/cdr/taqua.pm
@@ -16,7 +16,9 @@ use FS::cdr qw(_cdr_date_parser_maker);
     #RecordType
     sub {
       my($cdr, $field, $conf, $hashref) = @_;
-      $hashref->{skiprow} = 1 unless ($field == 0 && $cdr->disposition == 100);
+      $hashref->{skiprow} = 1
+        unless ($field == 0 && $cdr->disposition == 100       )  #regular CDR
+            || ($field == 1 && $cdr->lastapp     eq 'acctcode'); #accountcode
       $cdr->cdrtypenum($field);
     },
 
@@ -48,7 +50,7 @@ use FS::cdr qw(_cdr_date_parser_maker);
     'disposition',
                                           #  -1 => '',
                                           #   0 => '',
-                                          # 100 => '',
+                                          # 100 => '', #regular cdr
                                           # 101 => '',
                                           # 102 => '',
                                           # 103 => '',
-- 
2.11.0