Vitelity API: Use new getcdr command, RT#31037
authorIvan Kohler <ivan@freeside.biz>
Sat, 25 Oct 2014 22:19:45 +0000 (15:19 -0700)
committerIvan Kohler <ivan@freeside.biz>
Sat, 25 Oct 2014 22:19:45 +0000 (15:19 -0700)
bin/cdr-vitelity.import

index a047c4a..39c0361 100755 (executable)
@@ -64,14 +64,6 @@ foreach my $export (@part_exports) {
   $export->isa('FS::part_export::vitelity') 
     or die "exportnum $exportnum is not a Vitelity export\n";
 
-  if ( $opt{'r'} ) {
-    my $result = $export->vitelity_command('resetcdrlist');
-    if ( $result ne 'ok' ) {
-      $dbh->rollback;
-      die "Failed to reset CDR list: $result\n";
-    }
-  }
-
   my $dir = $FS::UID::cache_dir . "/cache.". $FS::UID::datasrc;
   my $temp = new File::Temp ( TEMPLATE => 'download.XXXXXXXX',
                               SUFFIX   => '.csv',
@@ -106,7 +98,7 @@ foreach my $export (@part_exports) {
     $count++;
   }
   close $temp;
-  print "Selected $count records in date range." if $opt{'v'} and ($s or $e);
+  print "Selected $count records in date range." if $opt{'v'};
 
   my $format = 'vitelity';
   my $batchname = "vitelity-$exportnum-".time2str('%Y/%m/%d-%T',time);