From 20c1183d2673b62bd0e29eb65f0a9a2c974b8027 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Tue, 30 Oct 2001 19:05:27 +0000
Subject: depriciate cust_pay_batch.trancode web interface to view pending
 batch

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

(limited to 'FS')

diff --git a/FS/FS/cust_pay_batch.pm b/FS/FS/cust_pay_batch.pm
index 671cd710a..6acb4fefb 100644
--- a/FS/FS/cust_pay_batch.pm
+++ b/FS/FS/cust_pay_batch.pm
@@ -37,8 +37,6 @@ following fields are currently supported:
 
 =item paybatchnum - primary key (automatically assigned)
 
-=item trancode - 77 for charges
-
 =item cardnum
 
 =item exp - card expiration 
@@ -120,7 +118,7 @@ sub check {
 
   my $error = 
       $self->ut_numbern('paybatchnum')
-    || $self->ut_numbern('trancode')
+    || $self->ut_numbern('trancode') #depriciated
     || $self->ut_number('cardnum') 
     || $self->ut_money('amount')
     || $self->ut_number('invnum')
@@ -191,7 +189,7 @@ sub check {
 
 =head1 VERSION
 
-$Id: cust_pay_batch.pm,v 1.3 2001-10-02 16:00:30 jeff Exp $
+$Id: cust_pay_batch.pm,v 1.4 2001-10-30 19:05:27 ivan Exp $
 
 =head1 BUGS
 
-- 
cgit v1.2.1