diff options
| author | ivan <ivan> | 2003-06-30 18:56:02 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2003-06-30 18:56:02 +0000 |
| commit | 36009c94710e7f677f0d2120eb8b397fa2d856ef (patch) | |
| tree | abab6c2c04a6383d96716a81292b50393b1265cd | |
| parent | e1dba90ba3c73a3de11040c93df1c705e3283d03 (diff) | |
pass additional fields to ACH processors (Authorize.Net should work now)
| -rw-r--r-- | FS/FS/cust_bill.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm index 009f6af33..8a37ada23 100644 --- a/FS/FS/cust_bill.pm +++ b/FS/FS/cust_bill.pm @@ -746,6 +746,10 @@ sub realtime_bop { ( $content{account_number}, $content{routing_code} ) = split('@', $cust_main->payinfo); $content{bank_name} = $cust_main->payname; + $content{account_type} = 'CHECKING'; + $content{account_name} = $payname; + $content{customer_org} = $self->company ? 'B' : 'I'; + $content{customer_ssn} = $self->ss; } elsif ( $method eq 'LEC' ) { $content{phone} = $cust_main->payinfo; } @@ -1222,7 +1226,7 @@ sub print_text { =head1 VERSION -$Id: cust_bill.pm,v 1.41.2.20 2003-01-10 07:42:39 ivan Exp $ +$Id: cust_bill.pm,v 1.41.2.21 2003-06-30 18:56:02 ivan Exp $ =head1 BUGS |