RT# 78450 - Fixed error with cdr import of AAPT CTOP format. Changed regex to ignore...

diff --git a/FS/FS/cdr/aapt.pm b/FS/FS/cdr/aapt.pm
index 934608c..3d7fd8a 100644 (file)
--- a/FS/FS/cdr/aapt.pm
+++ b/FS/FS/cdr/aapt.pm
@@ -77,7 +77,7 @@ my %UNIT_SCALE = ( #Table 2.1.4
     'calltypenum',          # usage ID (CUSG)
     sub {                   # ID type
       my ($cdr, $data, $conf, $param) = @_;
     'calltypenum',          # usage ID (CUSG)
     sub {                   # ID type
       my ($cdr, $data, $conf, $param) = @_;

-      if ($data !~ /^(1|50)$/) {
+      if ($data !~ /^\s*(1|50)$/) {

         warn "AAPT: service ID type is not telephone number.\n";
         $param->{skiprow} = 1;
       }
         warn "AAPT: service ID type is not telephone number.\n";
         $param->{skiprow} = 1;
       }