doc, RT#81686

[freeside.git] / FS / bin / freeside-eftca-upload

diff --git a/FS/bin/freeside-eftca-upload b/FS/bin/freeside-eftca-upload
index b66765a..afe60af 100755 (executable)
--- a/FS/bin/freeside-eftca-upload
+++ b/FS/bin/freeside-eftca-upload
@@ -47,6 +47,10 @@ foreach my $pay_batch (@batches) {
   my $filename = time2str('%Y%m%d', time) . '-' . sprintf('%06d.csv',$batchnum);
   print STDERR "Exporting batch $batchnum to $filename...\n" if $opt_v;
   my $text = $pay_batch->export_batch(format => 'eft_canada');
+  unless ($text) {
+    print STDERR "Batch is empty, resolving..." if $opt_v;
+    next;
+  }
   open OUT, ">$tmpdir/$filename";
   print OUT $text;
   close OUT;
@@ -91,7 +95,7 @@ freeside-eftca-upload - Transmit a payment batch to EFT Canada via SFTP.
 
 =head1 SYNOPSIS
 
-  freeside-paymentech-upload [ -a ] [ -v ] user batchnum
+  freeside-eftca-upload [ -a ] [ -v ] user batchnum
 
 =head1 DESCRIPTION